注册 登录
编程论坛 ACCESS论坛

[求助]数据库连接出错,请检查连接字串。

mai_25 发布于 2007-05-06 12:33, 1652 次点击

数据库连接出错,请检查连接字串。这个是什么原因?

Dim Conn,Connstr
Dim Sqldatabase,Sql_pass_word,Sql_User_ID,Sql_Data_Source


Sqldatabase="www_videojob_Data"
Sql_pass_word="admin"
Sql_User_ID="admin"
Sql_Data_Source="(local)"

Set Conn = Server.CreateObject("ADODB.Connection")
ConnStr = "Provider=SQLOLEDB.1;Password='"&Sql_pass_word&"';Persist Security Info=False;User ID='"&Sql_User_ID&"';Initial Catalog='"&Sqldatabase&"';Data Source='"&Sql_Data_Source&"'"
Conn.Open Connstr

Function CloseDB
Conn.close
Set conn = Nothing
End Function

Function CloseRs
Rs.Close
Set Rs = Nothing
End Function

1 回复
#2
jxyga1112008-06-20 18:54
调试看看啊,把错的找出来就一目了寮了
1