ASP怎和Access连接啊?哪个大哥帮帮忙最好是详细步骤。谢谢

来源:百度知道 编辑:UC知道 时间:2024/05/31 08:46:12
我是菜鸟,想知道详细步骤。

Dim IsSqlData, Conn, DB, Connstr, DataBaseName, DataPassword, DataUserName, DataLocal

Rem ACCESS数据库IsSqlData=0;SQL SERVER数据库IsSqlData=1

IsSqlData = 0
On Error Resume Next

If IsSqlData = 1 Then
Rem Sql Server数据库的连接
DataBaseName = "数据库名"
DataPassword = "数据库访问密码"
DataUserName = "数据库访问用户名"
DataLocal = "数据库位置"
Connstr = "Provider = Sqloledb; User ID = " & DataUserName & "; Password = " & DataPassword & "; Initial Catalog = " & DataBaseName & "; Data Source = " & DataLocal & ";"
Else
Rem ACCESS数据库的连接
DB = "数据库位置+数据库名"
Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&DB&"")
End If

Set Conn = Server.CreateObject("ADODB.Connection")
Conn