Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- MyConnection = New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" +
- ofd.FileName + ";Extended Properties=Excel 12.0;")
- MyCommand = New OleDb.OleDbDataAdapter("select * from [Sheet1$]", MyConnection)
- MyConnection.Open()
- dataSet = New DataSet
- MyCommand.Fill(dataSet)
- dt_data.DataSource = dataSet.Tables(0)
- MyConnection.Close()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement