asp資料庫連接失敗
Ⅰ ASP連接資料庫錯誤
<%
Dim Conn,ConnStr
'On error resume next
Set Conn=Server.CreateObject("Adodb.Connection")
ConnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("資料庫路徑/資料庫名.mdb")
Conn.Open ConnStr
%>
用這個~`
另外把路徑改成相對的~`比如~`你的資料庫和這段代碼所在的頁面是同一個目錄~`那麼就是:
Server.MapPath("資料庫名.mdb")
如果資料庫在database文件夾里~`就改成:
Server.MapPath("database/資料庫名.mdb")
如果在代碼文件的上級目錄~`就改成:
Server.MapPath("../資料庫名.mdb")
Ⅱ asp鏈接資料庫失敗
看你的陳述你用的是sql Server,請將代碼改成如下:
<%
'打開資料庫連接
dim conn,connstr,db,rs
'db="db/db.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
connstr="driver={SQL Server};server=你的IP地址;uid=sa;pwd=111111;database=sqlserver"
conn.Open connstr
%>
也就是將local改為你電腦所用的或者是伺服器的IP地址,看看能否解決問題。祝福你!
Ⅲ ASP連接資料庫錯誤
2000下打開winnt\temp 將其安全選項內增加 everyone 用戶 許可權設置為完全控制 然後重啟計算機
如果不重啟。會出另外一個未指定錯誤。
2003下的目錄是windows\temp
重新檢查一下資料庫或網站所在目錄許可權,確認everyone用戶能夠有獲取data信息的許可權。 怕麻煩就直接設為完全控制許可權。然後從新啟動。
Ⅳ asp資料庫連接出錯,請高手解決。謝謝
現在都用這種啦
Dim Conn,ConnStr
Const Db="data/test.mdb"
Connstr="Provider=Microsoft.Jet.OleDb.4.0;Data Source="&Server.Mappath(Db)
Set Conn = Server.Createobject("adodb.connection")
Conn.open ConnStr
If Err Then
Err.Clear
Conn.Close:Set Conn=Nothing
Response.Write "資料庫連接出錯"
Response.End()
End If
Function CloseDatabase
Conn.Close:Set Conn=Nothing
End Function
Ⅳ 關於ASP資料庫連接錯誤的問題
netbox是可以實現ASP的測試的,你可以考慮另外一種連接方法啊,ACCESS資料庫的連接方法有很多啊,你這種連接方式太麻煩了,如果是SQL資料庫用你這樣的連接一般就不會出錯,ACCESS資料庫建議你用以下的方式連接,保證你正常連接
<%
Set conn=server.CreateObject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("Data_ACT/#ACTCMS20A17.mdb")
conn.open connstr
%>
<%
'============================
'過濾SQL非法字元
'Num 0一般 1數字
'============================
Function CheckStr(Strer,Num)
Dim Shield,w
If Strer = "" Or IsNull(Strer) Then Exit Function
Select Case Num
Case 0
Strer = Trim(Strer)
Strer = Replace(Strer,CHR(39),"'") '單引號
Strer = Replace(Strer,CHR(34),""") '雙引號
Strer = Replace(Strer,CHR(32)," ") '空格
Strer = Replace(Strer,CHR(60),"<") '<
Strer = Replace(Strer,CHR(62),">") '>
Strer = Replace(Strer,vbCrLf,"<br>")
Case 1
If IsNumeric(Strer) = 0 Then
Response.Write "操作錯誤"
Response.End
End If
Strer = Int(Strer)
Case 2'文本域提交
Strer = Replace(Strer,CHR(39),"'") '單引號
Strer = Replace(Strer,CHR(34),""") '雙引號
Strer = Replace(Strer,CHR(32)," ") '空格
Strer = Replace(Strer,CHR(60),"<") '<
Strer = Replace(Strer,CHR(62),">") '>
Strer = Replace(Strer,vbCrLf,"<br>")
Case 3'文本域顯示
Strer = Replace(Strer,"'",CHR(39)) '單引號
Strer = Replace(Strer,""",CHR(34)) '雙引號
Strer = Replace(Strer," ",CHR(32)) '空格
Strer = Replace(Strer,"<",CHR(60)) '<
Strer = Replace(Strer,">",CHR(62)) '>
Strer = Replace(Strer,"<br>",vbCrLf)
Case 4'替換字元(<script><//script><iframe></iframe>)
Strer = Replace(Strer,"script"," ")
Strer = Replace(Strer,"SCRIPT"," ")
Strer = Replace(Strer,"iframe", " ")
Strer = Replace(Strer,"IFRAME", " ")
End Select
' Shield = Split(KM_Kill,"|")
' For w=0 To Ubound(Shield)
'If Shield(w) <> "" Then
'Strer=Replace(Strer,Split(Shield(w),"=")(0),Split(Shield(w),"=")(1))
'End If
'Next
CheckStr = Strer
End Function
%>
Ⅵ 為什麼我在用asp連接資料庫總是失敗的呢
<%
dim conn,connstr
connstr="Driver={SQL Server};server=(local);uid=sa;pwd=123456;database=master;"
set conn=server.CreateObject("adodb.connection")
conn.open connstr
%>
換成local試試 按理來說沒有錯
Ⅶ ASP和資料庫連接不上
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\youdb.mdb"
set conn=Server.CreateObject("ADODB.Connection")
conn.open connstr
sql="你的sql語句"
set rs=conn.execute(sql)
或者
set rs=Server.CreateObject("ADODB.recordset")
rs.open sql,conn,1,1
Ⅷ ASP資料庫連接文件連接提示錯誤,如何解決
你把資料庫放根目錄C:\Inetpub\wwwroot下db="data.mdb" 如果能用就說明是你的這代碼的路徑錯了,換換它的連接路徑多試就好了.
Ⅸ ASP資料庫連接失敗問題
<%
dim connstr
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("1/cheshi1.mdb")
set conn = server.createobject("ADODB.Connection")
conn.open connstr
%>
看得出大家都明白,可是我覺得應該是這樣的.
Ⅹ ASP 資料庫連接失敗!急幫
是為是你的網站必須到根目錄下.而你傳到子目錄下了?