平时写程序的时候出错时的解决方法,不太全,但是一般问题应该都有了,呵呵,欢迎大加添加新的错误信息及解决方法
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语句定义错误
MicrosoftVBscript编译器错误(0x800A0408)--> sql语句错误(?????????????????)
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)--> 数据库以只读方式打开,无法更新数据
希望大家多多讨论!
你时不是哪个字段名称写错了,或者值写错了。
一楼正解:message前边少了个单引号('"&name&"',"&tel&","&message&"')"
应该是('"&name&"',"&tel&",‘"&message&"')"
message前边少了个单引号('"&name&"',"&tel&","&message&"')"
应该是('"&name&"',"&tel&",‘"&message&"')"
set conn=server.createobject("adodb.connection")
conn.oname=request.Form("name")
tel=request.Form("tel")
message=request.Form("message")
exec="insert into feedback(name,tel,message) values ('"&name&"',"&tel&",'"&message&"')"
conn.execute exec
conn.close
set conn=nothing
response.Write "添加成功"
%>
pen "provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("chen.mdb")