主题：帮大家找的ASP常用错误类型
绝对零度
[专家分：820] 发布于 2004-03-04 08:56:00
ActiveServerPages,ASP0126(0x80004005)-->找不到包含文件
MicrosoftOLEDBProviderforODBCDrivers(0x80040E21)-->sql语句出错(数据类型不匹配或表名(字段名)错误或表处于编辑状态，或表不存在于conn打开的数据库中)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E14)-->sql语句出错(字段名错误,或数据类型不匹配)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E07)-->sql语句出错(要插入或更新的字段的类型与变量数据类型不匹配)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E57)-->sql语句出错(要插入或更新的数据溢出)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E10)-->sql语句出错(update字段名或要更新的数据类型错误)
MicrosoftOLEDBProviderforODBCDrivers(0x80004005)-->sql语句出错(要插入或更新的字段的数值不能为空值)
MicrosoftOLEDBProviderforODBCDrivers(0x80004005) -->打开数据库出错，没有在指定目录发现数据库
MicrosoftOLEDBProviderforODBCDrivers(0x80040E37)-->没有发现表
MicrosoftVBscript运行时错误(0x800A000D)-->错误引用rs变量(rs对像已关闭或未定义)
MicrosoftVBscript运行时错误(0x800A01C2)-->vbscript脚本错误(vbscript语句出错)
MicrosoftVBscript运行时错误(0x800A0006)-->vbscript脚本错误(溢出错误)
MicrosoftVBscript编译器错误(0x800A040E)-->缺少loop
MicrosoftVBscript编译器错误(0x800A03EA)-->缺少if或endif
MicrosoftVBscript编译器错误(0x800A03EE)--> 语句未结束(缺少")")
MicrosoftVBscript编译器错误(0x800A03F6)-->if语句出错(缺少endif)
MicrosoftVBscript运行时错误(0x800A005B)-->缺少set
MicrosoftVBscript运行时错误(0x800A0005)-->变量未定义
MicrosoftVBscript编译器错误(0x800A03F9)-->if语句缺少then
MicrosoftVBscript编译器错误(0x800A0411)-->dim语句定义错误
ADODB.Recordset(0x800A0BB9)-->sql语句出错(sql语句或conn语句未定义或对一个rs属性进行赋值时发生错误)
ADODB.Recordset(0x800A0CC1)-->rs对像出错(rs对像本身不存在或错误地引用了一个不存在的字段名)
ADODB.Recordset(0x800A0BCD)-->rs对像出错(记录集中没有记录却对记录集进行操作)
ADODB.Recordset(0x800A0E78)-->rs对像出错(记录集不存在,缺少rs.open语句)
ADODB.Recordset(0x800A0CC1) -->rs对像出错(引用了一个不存在的字段名)
ADODB.Recordset(0x800A0E7D)-->conn定义错误
ADODB.Recordset(0x800A0CB3)-->数据库以只读方式打开，无法更新数据
回复列表 （共86个回复）
61 楼
gkxstar [专家分：0] 发布于 2006-08-03 10:04:00
好，先收藏起来，慢慢看！~~
62 楼
gkxstar [专家分：0] 发布于 2006-08-03 10:22:00
Microsoft VBScript 运行时错误 错误 '800a01a8'
是什么错误呀！~~
63 楼
zslufo [专家分：0] 发布于 2006-08-08 10:59:00
我在链接数据库的时候可以链接但是我加入这条代码
set rst1=conn.Execute("insert into user (u_user,u_code) values ('"&request.form("f_user")&"','"&request.form("f_code")&"')") 网页就报错了显示如下:
"操作必须使用一个可更新的查询。"
搞了这么久就这过不去,郁闷啊!有哪位高手可以告诉我解决的办法不!
64 楼
寻觅 [专家分：30] 发布于 2006-08-21 19:47:00
[quote]请大家帮看看，这是什么错误？
我在站点中通过js代码调用了中华网的新闻，但每次打开该页面的时候都很慢，所以就想通过这个程序把调用的内容加载到缓冲，并保存到服务器端。结果是：可以获取新闻的内容，但无法保存到文件中，执行将缓冲中内容写入文件部分时，返回信息是：在该环境中不允许操作。拜托各位高手帮忙看看。先谢了。
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd";>
<html>
<head>
<title>缓存</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<%
On Error Resume Next
'Set the content type to the specific type that you are sending.
Response.ContentType = "text/plain"
'-------------------------------定义输出格式-----------------------------
Path="http://localhost/upload/content.asp";
sPath = Path
if left(lcase(path),7) <> "http://"; then
'-------------如果前面没有http就是本地文件，交给LocalFile处理------------
LocalFile(path)
else
'--------------------否则为远程文件，交给RemoteFile处理------------------
RemoteFile(Path)
end if
if err.Description<>"" then
Response.Write ("30行有错："&err.Description&"<br>")
end if
sub LocalFile(Path)
'-------------------如果为本地文件则简单的跳转到该页面-------------------
Response.Redirect Path
End Sub
Sub RemoteFile(sPath)
'-------------------------处理远程文件函数------------------------------
FileName = GetFileName(sPath)
'-------------GetFileName为把地址转换为合格的文件名过程-------------
FileName = Server.MapPath("Cache/" & FileName)
Set objFso = Server.CreateObject("Scripting.FileSystemObject")
Response.Write "这里是第44行执行转换后的文件名是："&fileName&"<br>"
if objFso.FileExists(FileName) Then
'--------------检查文件是否是已经访问过,如是，则简单跳转------------
Response.Redirect "http://localhost/upload/cache/"; & GetFileName(path)
Else
'----------------否则的话就先用GetBody函数读取----------------------
Response.Write "将要从远程获取以下文件内容："&Path&"<br>"
t = GetBody(Path)
'-----------------用二进制方法写到浏览器上--------------------------
Response.BinaryWrite t
Response.Flush
'-----------------输出缓冲------------------------------------------
SaveFile t,GetFileName(path)
'------------------将文件内容缓存到本地路径，以待下次访问-----------
End if
Set objFso = Nothing
End Sub
'第一个函数 用于获取某个地址的内容
Function GetBody(url)
'-----------------------本函数为远程获取内容的函数---------------------
on error resume next
Set Retrieval = CreateObject("Microsoft.XMLHTTP")
'----------------------建立XMLHTTP对象-----------------------------
With Retrieval
.Open "Get", url, False, "", ""
'------------------用Get，异步的方法发送-----------------------
.Send
'GetBody = .ResponseText
GetBody = .ResponseBody
'------------------函数返回获取的内容--------------------------
End With
Set Retrieval = Nothing
if err.Description<>"" then
response.Write "程序在执行获得内容的过程中出错，位置为第80行,内容如下："&err.Description &"<br>"
end if
End Function
Function GetFileName(str)
'-------------------------本函数为合格化的文件名函数-------------------
str = Replace(lcase(str),"http://";,"")
str = Replace(lcase(str),"//","/")
str = Replace(str,"/","")
str = replace(str,vbcrlf,"")
GetFileName = str
if err.Description<>"" then
response.Write "程序在执行文件名转换的过程中出错，位置为第105行,内容如下："&err.Description &"<br>"
end if
End Function
sub SaveFile(str,fName)
'-------------------------本函数为将流内容存盘的函数-------------------
on error resume next
Set objStream = Server.CreateObject("ADODB.Stream")
'--------------建立ADODB.Stream对象，必须要ADO 2.5以上版本---------
objStream.Type = adTypeBinary
'-------------以二进制模式打开-------------------------------------
objStream.Open
objstream.write str
'--------------------将字符串内容写入缓冲--------------------------
response.Write "将要以下文件名将缓冲中的内容存入磁盘："&fname&"<br>"
objstream.SaveToFile "c:\inetpub\wwwroot\upload\cache\" & fName,adSaveCreateOverWrite
'--------------------将缓冲的内容写入文件--------------------------
response.BinaryWrite objstream.Read
objstream.Close()
set objstream = nothing
'-----------------------关闭对象，释放资源-------------------------
response.Write "有错误，相关信息如下："& err.Description
End sub
%>
</body>
</html>
[/quote]
对于你这个问题我也同样出现过!
也同样是采集中华网的内容!
也许这是在 中华网 上代码里出现了问题吧
65 楼
chenh [专家分：30] 发布于 2006-08-23 19:15:00
我也遇到同样的问题,不过在下愚昧,不知在何处去修改Everyone的浏览和修改权限?
还望在指教.闭人在此先行谢了.
66 楼
123ytm [专家分：0] 发布于 2006-08-24 02:23:00
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft JET Database Engine 错误 '80004005'
操作必须使用一个可更新的查询。
/oemui/media/mediaface.asp，行8
67 楼
joe0616 [专家分：0] 发布于 2006-08-24 11:51:00
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e37'
[Microsoft][ODBC Microsoft Access Driver] Microsoft Jet 数据库引擎找不到输入表或查询 'arecord'。 确定它是否存在，以及它的名称的拼写是否正确。
/admin/admin_movie_class.asp，行59
我是个初学者，这个错误怎么解决
68 楼
joe0616 [专家分：0] 发布于 2006-08-24 14:49:00
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e37'
[Microsoft][ODBC Microsoft Access Driver] Microsoft Jet 数据库引擎找不到输入表或查询 'arecord'。 确定它是否存在，以及它的名称的拼写是否正确。
/admin/admin_movie_class.asp，行59
rs.close
set rs=nothing
set rs2=server.createobject("adodb.recordset")
sql2="select * from arecord"
rs2.open sql2,conn,1,3
rs2.addnew
rs2("aid")=session("aid")
rs2("logip")=Request.ServerVariables("REMOTE_ADDR")
rs2("ltime")=Now
rs2("demo")="登添加影片类型"
rs2.update
rs2.close
set rs2=nothing
response.write "<script language=JavaScript>{window.alert('影片类型添加成功！');window.location='admin_movie_class.asp'}</script>"
response.end
end if
%>
<%
我是个初学者，好些东西还都不懂，请哪位前辈指点怎么解决问题，谢谢！
69 楼
joe0616 [专家分：0] 发布于 2006-08-24 14:50:00
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e37'
[Microsoft][ODBC Microsoft Access Driver] Microsoft Jet 数据库引擎找不到输入表或查询 'arecord'。 确定它是否存在，以及它的名称的拼写是否正确。
/admin/admin_movie_class.asp，行59
rs.close
set rs=nothing
set rs2=server.createobject("adodb.recordset")
sql2="select * from arecord"
rs2.open sql2,conn,1,3
rs2.addnew
rs2("aid")=session("aid")
rs2("logip")=Request.ServerVariables("REMOTE_ADDR")
rs2("ltime")=Now
rs2("demo")="登添加影片类型"
rs2.update
rs2.close
set rs2=nothing
response.write "<script language=JavaScript>{window.alert('影片类型添加成功！');window.location='admin_movie_class.asp'}</script>"
response.end
end if
%>
我是个初学者，好些东西还都不懂，请哪位前辈指点怎么解决问题，谢谢！
70 楼
pangxufang [专家分：0] 发布于 2006-09-05 16:10:00
谢谢!我得好好学!!
我刚来,这里真好!
我来回复
您所在位置：