Advertisement
Guest User

Untitled

a guest
Jun 30th, 2015
189
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.45 KB | None | 0 0
  1. Using MyConnection = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;" + "Data Source=H:ImportSER 2901 Fellow Cmts 063015B.xml;" + "Extended Properties=Excel 8.0;")
  2. Using MyCommand = New OleDbDataAdapter("select * from [SER export$]", MyConnection)
  3. Dim ds = New System.Data.DataSet
  4. MyCommand.Fill(ds)
  5. End Using
  6. End Using
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement