<%
conn.CommandTimeout = 0
conn.ConnectionTimeout = 0
strconn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPATH("../数据库位置")&";Persist Security Info=False"
conn.open strconn
<%
Set conn=Server.CreateObject("ADODB.Connection")
Dim StrServer,StrUid,StrPwd,StrDbName
StrServer="'数据库服务器名"
StrUid="您的登录帐号"
StrPwd="'您的登录密码"
StrDbName="您的数据库名称 "
strconn="driver={sql server};server="&strserver&";uid="&struid&";pwd="&strpwd&";database="&strdbname&""
conn.open strconn
827



被折叠的 条评论
为什么被折叠?



