' Open Excel Connection
Set cnnExcel = Server.CreateObject("ADODB.Connection")
cnnExcel.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & strExcelFile & ";" & _
"Extended Properties=""Excel 8.0;HDR=NO;"""
Set cnnExcel = Server.CreateObject("ADODB.Connection")
cnnExcel.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & strExcelFile & ";" & _
"Extended Properties=""Excel 8.0;HDR=NO;"""
Response.Write "Excel connection opened<BR>"
' Load ADO Recordset with Excel Data
Set rstExcel = Server.CreateObject("ADODB.Recordset")
rstExcel.Open "Select * from [Sheet1$A1:B5]", cnnExcel, adOpenStatic
Response.Write "Excel Recordset loaded<BR>"
0 comments:
Post a Comment