急急急，本地调试出错

Question

我还原了mssql数据库，conn.asp和include中的conn.asp的路径都修改正确，还提示“数据库连接出错，请检查连接字串。”
我看了下，关键是数据库的路径问题：Db = "/data/jyrc.asp"我数据库是还原在E/下的，那这个路径如何修改呢？是不是Db = "E/jyrc.mdf"？？？？这样还是提示数据库连接错误！以下都没问题：Sub connectionsql()
Sqldatabase="jyrc"  '数据库名称          
Sql_pass_word="sa"   '数据库密码
Sql_User_ID="sa"      '数据库用户名
Sql_Data_Source="(local)"  '数据库地址，本地填(local) ,外地填IP
Set Conn = Server.CreateObject("ADODB.Connection")
ConnStr = "Provider=SQLOLEDB.1;Password='"&Sql_pass_word&"';Persist Security Info=False;User ID='"&Sql_User_ID&"';Initial Catalog='"&Sqldatabase&"';Data Source='"&Sql_Data_Source&"'"
Conn.Open Connstr
End Sub

Answer 1

是不是Db = "E/jyrc.mdf"？？？？和这个无关.只要你连接上数据库后,和数据库的物理地址无关.

Answer 2

完整代码是这样的：可能是哪里有问题呢？
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Option Explicit
Response.Buffer = TrueDim Conn,Db,PagePath,rs,sql,AdUrl,AdType,Adname,AdNote,ComName,AdPicUrl,ComId,MemberType,EditDate,Job_Str,Rs_Job,j,Jobid,JobName
dim i,JobName_Len,str,Rs_ads,yjhid,yjhmc,yjhnr,yjhdz,yjhdh,yjhlxr,yjhyx,yjhzw,yjhsj,yjhsh,yjhtj,yjhgg,ViewQuantity
dim MemberBeginDate,MemberEndDate,Combz,Comgg,Comcf
dim jianzhiid,jianzhimc,jianzhizw,jianzhinr,jianzhidz,jianzhilxr,jianzhiyx,jianzhish,jianzhitj,jianzhisj,jianzhidh,jianzhigg
Dim Db_C,Conn_C,ComPic
dim jianjie1,jianjie2,jianjie3,jianjie4,jianjie5,jianjie6,jianjie7
dim qiuzhiid,qiuzhizw,qiuzhinr,qiuzhimc,qiuzhidz,qiuzhidh,qiuzhixs,qiuzhiyx,qiuzhish,qiuzhitj,qiuzhisj
dim jianzhiqzid,jianzhiqzzw,jianzhiqznr,jianzhiqzmc,jianzhiqzdz,jianzhiqzdh,jianzhiqzxs,jianzhiqzyx,jianzhiqzsh,jianzhiqztj,jianzhiqzsj,sjksjxz1,sjksjxz2,sjksjxz3,sjksjxz4,sjksjxz5,sjksjxz6
Dim Qsite,jyrcw
Dim Connstr,isdatabase
Dim Sqldatabase,Sql_pass_word,Sql_User_ID,Sql_Data_Source,sjksjxz,iRs,nRs
isdatabase=0if isdatabase=0 then
sjksjxz="'d',ValidityDate,now()"
sjksjxz1="'d',EditDate,now()"
sjksjxz2="'d',yjhsj,now()"
sjksjxz3="'d',jianzhisj,now()"
sjksjxz4="'d',AddDate,now()"
sjksjxz5="'d',MemberEndDate,now()"
sjksjxz6="'d',MemberBeginDate,now()"
else
sjksjxz="d,ValidityDate,GetDate()"
sjksjxz1="d,EditDate,GetDate()"
sjksjxz2="d,yjhsj,GetDate()"
sjksjxz3="d,jianzhisj,GetDate()"
sjksjxz4="d,AddDate,GetDate()"
sjksjxz5="d,MemberEndDate,GetDate()"
sjksjxz6="d,MemberBeginDate,GetDate()"
end if
PagePath = ""
Db = "/data/jyrcw.asp"Sub ConnectionDatabase()
Dim ConnStr

ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(Db)

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
End SubSub connectionsql()
Sqldatabase="jyrc"  '数据库名称          
Sql_pass_word="sa"   '数据库密码
Sql_User_ID="sa"      '数据库用户名
Sql_Data_Source="(local)"  '数据库地址，本地填(local) ,外地填IP
Set Conn = Server.CreateObject("ADODB.Connection")
ConnStr = "Provider=SQLOLEDB.1;Password='"&Sql_pass_word&"';Persist Security Info=False;User ID='"&Sql_User_ID&"';Initial Catalog='"&Sqldatabase&"';Data Source='"&Sql_Data_Source&"'"
Conn.Open Connstr
End SubSub F_Sql()
Dim Q_Post,Q_Get,Q_In,Q_Inf,i
Q_In = "exec|insert|select|delete|update|truncate|declare"

Q_Inf = Split(Q_In , "|")

If Request.Form <> "" Then
For Each Q_Post In Request.Form
For i = 0 To Ubound(Q_Inf)
If InStr(LCase(Request.Form(Q_Post)) , Q_Inf(i)) <> 0 Then
Response.Write("请不要在参数中包含非法字符尝试注入")
Response.End()
End If
Next
Next
End If

If Request.QueryString <> "" Then
For Each Q_Get In Request.QueryString
For i = 0 To Ubound(Q_Inf)
If InStr(LCase(Request.QueryString(Q_Get)) , Q_Inf(i)) <> 0 Then
Response.Write("请不要在参数中包含非法字符尝试注入")
Response.End()
End If
Next
Next
End If

End SubF_Sql()if isdatabase=1 then
connectionsql()
else
ConnectionDatabase()
end if
%>                                                                                              

Answer 3

Db = "/data/jyrcw.asp"是什么意思 没有找到这个文件啊？

Answer 4

怎么可以这么连呢？？
把你的mdf文件附加到数据库上。然后只需要
Me.SqlConnection1.ConnectionString = 
"workstation id=""你的计算机名""; 
packet size=4096; 
integrated security=SSPI; 
data source=""你的计算机名""; 
persist security info=False; 
pwd = 你的数据库密码;uid = 你的用户名
initial catalog=你的数据库名" 

Answer 5

源码就是这样的啊，那个Db = "/data/jyrcw.asp"到底什么意思呢？这个jyrcw.asp文件我没找到。
我不知道什么原因老是提示数据库出错

Answer 6

你这是asp的内容吗?那帮不了了.

Answer 7

baidu一下access的数据链接串，应该就行