conn.asp数据库怎么修改
<%DimConn,Conn3OnErrorResumeNextsetConn=Server.CreateObject("Adodb.Connection")Conn.O...
<%
Dim Conn,Conn3
On Error Resume Next
set Conn=Server.CreateObject ("Adodb.Connection")
Conn.Open "provider=microsoft.jet.oledb.4.0;" & "data source = " & server.mappath("/zf/zf_data/#wapvy_data")
If Err Then
err.Clear
if v=1 then
Response.Write "<?xml version=""1.0"" encoding=""utf-8""?>"
Response.Write "<!DOCTYPE html PUBLIC ""-//WAPFORUM//DTD XHTML Mobile 1.0//EN"" ""http://www.wapforum.org/DTD/xhtml-mobile10.dtd"">"
Response.Write "<html xmlns=""http://www.w3.org/1999/xhtml"">"
Response.Write "<head>"
' Response.Write "<meta name=""keywords"" content=""源码之家""/>"
Response.Write "<meta http-equiv=""Content-Type"" content=""application/vnd.wap.xhtml+xml;charset=UTF-8""/>"
Response.Write "<link href=""/inc/css.css"" rel=""stylesheet"" type=""text/css"" />"
End If
if v=2 then
Response.Write "<?xml version=""1.0"" encoding=""utf-8""?>"
Response.Write "<!DOCTYPE html PUBLIC ""-//WAPFORUM//DTD XHTML Mobile 1.0//EN"" ""http://www.wapforum.org/DTD/xhtml-mobile10.dtd"">"
Response.Write "<html xmlns=""http://www.w3.org/1999/xhtml"">"
Response.Write "<head>"
' Response.Write "<meta name=""keywords"" content=""源码之家""/>"
Response.Write "<meta http-equiv=""Content-Type"" content=""application/vnd.wap.xhtml+xml;charset=UTF-8""/>"
Response.Write "<link href=""/inc/css1.css"" rel=""stylesheet"" type=""text/css"" />"
End If
Response.Write "<card id='index' title='数据库出错'>"
Response.Write "<p>数据库连接出错，请检查连接字符串。"
Response.Write "</p></card></wml>"
Response.end
End If 展开
Dim Conn,Conn3
On Error Resume Next
set Conn=Server.CreateObject ("Adodb.Connection")
Conn.Open "provider=microsoft.jet.oledb.4.0;" & "data source = " & server.mappath("/zf/zf_data/#wapvy_data")
If Err Then
err.Clear
if v=1 then
Response.Write "<?xml version=""1.0"" encoding=""utf-8""?>"
Response.Write "<!DOCTYPE html PUBLIC ""-//WAPFORUM//DTD XHTML Mobile 1.0//EN"" ""http://www.wapforum.org/DTD/xhtml-mobile10.dtd"">"
Response.Write "<html xmlns=""http://www.w3.org/1999/xhtml"">"
Response.Write "<head>"
' Response.Write "<meta name=""keywords"" content=""源码之家""/>"
Response.Write "<meta http-equiv=""Content-Type"" content=""application/vnd.wap.xhtml+xml;charset=UTF-8""/>"
Response.Write "<link href=""/inc/css.css"" rel=""stylesheet"" type=""text/css"" />"
End If
if v=2 then
Response.Write "<?xml version=""1.0"" encoding=""utf-8""?>"
Response.Write "<!DOCTYPE html PUBLIC ""-//WAPFORUM//DTD XHTML Mobile 1.0//EN"" ""http://www.wapforum.org/DTD/xhtml-mobile10.dtd"">"
Response.Write "<html xmlns=""http://www.w3.org/1999/xhtml"">"
Response.Write "<head>"
' Response.Write "<meta name=""keywords"" content=""源码之家""/>"
Response.Write "<meta http-equiv=""Content-Type"" content=""application/vnd.wap.xhtml+xml;charset=UTF-8""/>"
Response.Write "<link href=""/inc/css1.css"" rel=""stylesheet"" type=""text/css"" />"
End If
Response.Write "<card id='index' title='数据库出错'>"
Response.Write "<p>数据库连接出错，请检查连接字符串。"
Response.Write "</p></card></wml>"
Response.end
End If 展开
1个回答
展开全部
server.mappath("/zf/zf_data/#wapvy_data")
这里就是数据库的地址了，如果改地址就修改这里。
如果说你是别的意思，那就不明白你所说的改数据库是什么意思了。
这里就是数据库的地址了，如果改地址就修改这里。
如果说你是别的意思，那就不明白你所说的改数据库是什么意思了。
追问
("/zf/zf_data/#wapvy_data")这个怎么输入数据库的用户名和密码，麻烦详细点，数据库地址该怎么改
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
