UC知道帮忙看下这个个语言怎么连不到数据库
来源：百度知道 编辑：UC知道 时间：2024/05/15 15:58:17
<!--#include file="nnoo.ini" -->
<%
'防止注入
dim qs,errc,iii
qs=request.servervariables("query_string")
'response.Write qs
dim deStr(16)
deStr(0)="net user"
deStr(1)="xp_cmdshell"
deStr(2)="/add"
deStr(3)="exec%20master.dbo.xp_cmdshell"
deStr(4)="net localgroup administrators"
deStr(5)="select"
deStr(6)="asc"
deStr(7)="char"
deStr(8)="mid"
deStr(9)="'"
deStr(10)=""""
deStr(11)=":"
deStr(12)="truncate"
deStr(13)="insert"
deStr(14)="delete"
deStr(15)="drop"
deStr(16)="from"
errc=false
for iii= 0 to ubound(deStr)
if instr(qs,deStr(iii))<>0 then
errc=true
end if
next
if errc then
Response.Write "<script langu
<%
'防止注入
dim qs,errc,iii
qs=request.servervariables("query_string")
'response.Write qs
dim deStr(16)
deStr(0)="net user"
deStr(1)="xp_cmdshell"
deStr(2)="/add"
deStr(3)="exec%20master.dbo.xp_cmdshell"
deStr(4)="net localgroup administrators"
deStr(5)="select"
deStr(6)="asc"
deStr(7)="char"
deStr(8)="mid"
deStr(9)="'"
deStr(10)=""""
deStr(11)=":"
deStr(12)="truncate"
deStr(13)="insert"
deStr(14)="delete"
deStr(15)="drop"
deStr(16)="from"
errc=false
for iii= 0 to ubound(deStr)
if instr(qs,deStr(iii))<>0 then
errc=true
end if
next
if errc then
Response.Write "<script langu
最后一句的if then没有END IF
那一行connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") 应该是
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
连接出什么错误了？
你这个用access，一般就是用户名，密码错误
access文件没找到
驱动问题
改成：
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Db
Server.MapPath与db的路径重复了
Db = "web08database/#web08datebase#.mdb"