![]() |
#2
ysf01812015-03-02 13:57
|
麻烦请高手帮帮忙,是这样的:
我用文本编辑器写了一个ASP简单程序是在网页插入数据,插入到Access 2003中,结果网页提示出错如下:
单击刷新按钮,或稍后重试。
打开 localhost 主页,然后查找与所需信息相关的链接。
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
--------------------------------------------------------------------------------
技术信息(用于支持人员)
错误类型:
Microsoft JET Database Engine (0x80040E09)
不能更新。数据库或对象为只读。
/11-8.asp, 第 13 行
浏览器类型:
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0)
网页:
GET /11-8.asp

代码如下:
<% '表示新增数据
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 '3如果要新增数据,必须能写入数据
'新增数据的方法用addnew,还要结合update完成新增
rs.addnew
'rs("班级号")班级号是自动编号它能够自动生成,所以不用添加
rs("年级") = "2015"
rs("专业代码") = "505"
rs("专业名称") = "计算机网络"
rs("班主任") = "陈冲"
rs("联系电话") = "81513969"
rs.update
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write("新增成功")
%>
应怎样解决,谢谢