ASP查询网站链接SQL数据库
发布网友
发布时间:2022-04-10 17:52
我来回答
共3个回答
热心网友
时间:2022-04-10 19:22
<%
dim IsSqlDataBase,conn,connstr,db,SqlLocalName,SqlUserName,SqlPassword,SqlDataBase
IsSqlDataBase=1 '定义数据库类别,1为Access数据库,0为SQL数据库
if IsSqlDataBase=1 then
db="data/data.asp"
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath(db)
else
SqlLocalName="10.42.64.187"
SqlUserName="sa"
SqlPassword="Inside.01"
SqlDataBase="hccx"
connstr="Provider=SQLOLEDB; User ID="&SqlUserName&"; Password="&SqlPassword&"; Initial CataLog="&SqlDataBase&"; Data Source="&SqlLocalName&";"
end if
on error resume next
'数据库地址设置,根据相应情况作更改,名称越复杂越好。
set conn = server.createobject("adodb.connection")
conn.open connstr
if err then
err.clear
set conn = nothing
response.write "数据库连接出错,请检查连接字串。"
response.end
end if
%>
热心网友
时间:2022-04-10 20:40
把这段db="data/data.asp"
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath(db)
set conn = server.createobject("adodb.connection")
换了
set conn=server.CreateObject("adodb.connection")
conn.open "Driver={SQL Server};Description=sqldemo;SERVER="&conn_server&";UID="&conn_name&";Password="&conn_pass&";DATABASE="&database&"
conn_server:服务器
conn_name:sa
conn_pass:数据库密码
热心网友
时间:2022-04-10 22:14
学习