UC知道数据库连接出错!
来源：百度知道 编辑：UC知道 时间：2024/06/16 07:29:17
打开IIS浏览网页就会出现 数据库连接出错！
上传到网络空间就正常显示~~~！
我的ASP程序有2个Conn.asp
这是Coon.asp里面的代码
<%
GaoBeiSys = "GaoBeiSys" '不能改动
dim conn
dim connstr
dim db
db=""&Gaobeidb_All&"" '设定数据名称,建议改成.asp
dim dbset:setdb = 1 '设定连接类型
On error resume next
Set conn = Server.CreateObject("ADODB.Connection")
select case setdb
case "1"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
case "2"
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"")
case "3"
connstr="driver={SQL Server};server=localhost;UID=sa;PWD=123;database=GaoBei_Sys_data"
case else
connstr= "Dns=GaoBei_Sys_data"
end select
if err.number>0 then
err.clear
上传到网络空间就正常显示~~~！
我的ASP程序有2个Conn.asp
这是Coon.asp里面的代码
<%
GaoBeiSys = "GaoBeiSys" '不能改动
dim conn
dim connstr
dim db
db=""&Gaobeidb_All&"" '设定数据名称,建议改成.asp
dim dbset:setdb = 1 '设定连接类型
On error resume next
Set conn = Server.CreateObject("ADODB.Connection")
select case setdb
case "1"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
case "2"
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"")
case "3"
connstr="driver={SQL Server};server=localhost;UID=sa;PWD=123;database=GaoBei_Sys_data"
case else
connstr= "Dns=GaoBei_Sys_data"
end select
if err.number>0 then
err.clear
(*^__^*) 嘻嘻……
你的IIS是不是有问题啊？
要不就是：
IIS是不支持多线数据连接的!
你没指定数据库路径,Server.MapPath(db)
改成Server.MapPath ("Database/#21___21#.mdb")
里面的路径根据你的数据所在位置填写,如果Database文件夹在第一层,就这样写,如果不是,你再在前面加上你的实际文件夹路径,
试一下!