my provider for office 2007
If FileUpload1.HasFile Then
Try
Dim Path As String = String.Concat(Server.MapPath("~/Files/" + FileUpload1.FileName))
FileUpload1.SaveAs(Path)
Dim exlconn As String = String.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0};Extended Properties=Excel 8.0", Path)
Using oconn As OleDbConnection = New OleDbConnection(exlconn)
oconn.Open()
Dim dx As DataTable = oconn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim query As String = "select * from [Sheet1$]"
Dim ocmd As New OleDbCommand(query, oconn)
Dim odr As OleDbDataReader = ocmd.ExecuteReader()
Using conn As SqlConnection = New SqlConnection(c.Readconnectionstring())
conn ...
Go to the complete details ...