帮我改一段ASP代码
我下了个网站~~想改下数据库~~可是这次怪了 这个conn.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
set conn=nothing
response.write "数据库连接出错!"
Response.End
else
conn.open connstr
if err then
err.clear
set conn=nothing
response.write "数据库连接出错!"
Response.End
end if
end if
Sub CloseConn()
conn.close
set conn=nothing
End sub
%>
参考答案:db=""&Gaobeidb_All&"" '设定数据名称,建议改成.asp
这个就是数据库名称.
参考资料: