帮大家找的ASP常用错误类型 — 编程爱好者社区

主题：帮大家找的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)-->数据库以只读方式打开，无法更新数据

本帖地址： http://bbs.pfan.cn/post/28805.html

回复列表（共86个回复）

沙发

huangdou [专家分：510] 发布于 2004-03-04 09:25:00

good! [fly]谢了~~~~~~~~~~~~[/fly]

板凳

huye [专家分：0] 发布于 2004-03-04 20:57:00

请大家帮看看，这是什么错误？

我在站点中通过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&" ")
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&" "

if objFso.FileExists(FileName) Then
'--------------检查文件是否是已经访问过,如是，则简单跳转------------
Response.Redirect "http://localhost/upload/cache/"; & GetFileName(path)
Else
'----------------否则的话就先用GetBody函数读取----------------------
Response.Write "将要从远程获取以下文件内容："&Path&" "
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 &" "
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 &" "
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&" "

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>

3 楼

kevinsky [专家分：0] 发布于 2004-03-11 21:44:00

不错吗

4 楼

sharpwinner [专家分：60] 发布于 2004-04-19 21:06:00

收藏！

5 楼

心仪 [专家分：0] 发布于 2004-04-20 17:58:00

我在更新数据库时出现如下：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E2F)
请问是什么错误？

6 楼

asd835222 [专家分：10] 发布于 2004-04-21 16:18:00

ADODB.Recordset(0x800A0CB3)-->数据库以只读方式打开，无法更新数据

怎么解决啊？？？？[em10]

7 楼

pzll520 [专家分：0] 发布于 2004-04-23 19:07:00

为大家介绍个免费做网站的网址bj001.net
下面是个比较秀的网站希望大家能支持和喜欢！~ http://leigelove.home.bj001.net

8 楼

emily [专家分：0] 发布于 2004-04-25 09:42:00

谢谢

9 楼

kensin2 [专家分：0] 发布于 2004-05-05 22:34:00

“Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。”
是怎么回事啊？

10 楼

bobomouse [专家分：20] 发布于 2004-05-13 15:01:00

“Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。”
是怎么回事啊？

请问你是不是用ntfs格式的硬盘？如果是，请将Everyone用户的浏览和修改权限打开！

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：帮大家找的ASP常用错误类型

回复列表（共86个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：帮大家找的ASP常用错误类型

回复列表 （共86个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共86个回复）