奇怪的 多步 OLE DB 操作产生错误

来源:互联网 发布:leopold淘宝店铺 编辑:程序博客网 时间:2024/05/16 10:07
1,虽err错误,但程序可以正常运行,没有发现丝毫影响。
2,On Error Resume Next语句有无都一样报错。

IE页面
ACCESS链接数据库失败
--------------------------------------------------------------------------------
多步 OLE DB 操作产生错误。如果可能,请检查每个 OLE DB 状态值。没有工作被完成。

源代码

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>无标题文档</title>
</head>
<%
dim Connstr,conn
On Error Resume Next
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath("\Database\SiteWeaver.mdb")+""
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open ConnStr
if conn.errors.count<>0 then
  response.write "ACCESS链接数据库失败<hr/>"
  for i =0 to conn.errors.count-1
response.write conn.errors.item(i)&"<hr>"
response.write Err.Description
  next
 'response.End()
else
  response.write("数据库连接成功!")
end if 
%>
<body>
</body>
</html>
0 0
原创粉丝点击