Connection To Access
Dim strConnection, conn
strConnection = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” & _
Server.MapPath(“.\db\db1.mdb”) & “;User Id=admin;Password=;”
Set conn = Server.CreateObject(“ADODB.Connection”)
conn.Open
Connection To Exel
Dim strConnection, conn
strConnection = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” & _
Server.MapPath(“.\excel\Book1.xls”) & “;” & _
“Extended Properties=”"Excel 8.0;HDR=Yes;”";”
Set conn = Server.CreateObject(“ADODB.Connection”)
conn.Open
Connection To SQL Server
Dim strConnection, conn
strConnection = “Provider=sqloledb;Data Source=localhost;” & _
“Initial Catalog=master;User Id=sa;Password=password;”
Set conn = Server.CreateObject(“ADODB.Connection”)
conn.Open
Advertisement
