|
#2
hu9jj2015-03-08 16:05
|
我用ASP编一个简单的程序，是把数据插入到 access 中结果出错，提示信息如下：
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
--------------------------------------------------------------------------------
技术信息（用于支持人员）
错误类型：
Microsoft JET Database Engine (0x80040E21)
由于数据表 '专业' 需要一个相关记录，不能添加或修改记录。
/11-8.asp, 第 22 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0)
应怎样解决，代码如下
程序代码：<% '表示新增数据
dim conn,rs
set conn = server.createobject("adodb.connection")
conn.connectionstring = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("学生管理系统.mdb")
conn.open
set rs = server.createobject("adodb.recordset")
rs.open "班级",conn,1,3
rs.addnew
rs("年级") = "2015"
rs("专业代码") = "505"
rs("班级名称") = "2015年计算机网络A班"
rs("班主任") = "陈冲"
rs("联系电话") = "81513969"
rs.update
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write("新增成功")
%>
dim conn,rs
set conn = server.createobject("adodb.connection")
conn.connectionstring = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("学生管理系统.mdb")
conn.open
set rs = server.createobject("adodb.recordset")
rs.open "班级",conn,1,3
rs.addnew
rs("年级") = "2015"
rs("专业代码") = "505"
rs("班级名称") = "2015年计算机网络A班"
rs("班主任") = "陈冲"
rs("联系电话") = "81513969"
rs.update
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write("新增成功")
%>