厨夫人陶瓷煲生产厂家:ASP出错!

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 23:55:10
Microsoft JET Database Engine 错误 '80004005'

未指定的错误

/word/word/conn.asp,行 16

这是怎么回事?
权限方面好像没有问题
昨天关闭了几个服务
不知道这又没有关系呢?
在线等~~~

我用的是Access

<%@language=vbscript codepage=936 LCID=2052 %>
<%
option explicit
response.buffer=true

dim conn,connstr
dim master
dim i
dim objET
set objET=new clsExeTime

Set Conn=Server.CreateObject("ADODB.Connection")
'Connstr="DBQ="+server.mappath("public/ly.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
'connstr="DBQ=" & server.mapPath("public/global.asa") & ";DRIVER={Microsoft Access Driver (*.mdb)};"
connstr ="Provider = Microsoft.Jet.OLEDB.4.0; Data Source ="& Server.MapPath("db/global.asa")
Conn.Open connstr

它提示的出错就是最后一行
Conn.Open connstr

是你的连接数据库代码有问题,所以会500报错。
你用的是什么数据库
Access
<%
dim conn,mdbfile
mdbfile=server.mappath("数据库名称.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile
%>

SQL

<%
dim conn
set conn=server.createobject("ADODB.connection")
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称
%>

你的数据库是防下载的,将你的数据库后缀名改为***.asa
把<%@language=vbscript codepage=936 LCID=2052 %删除>