注册 登录
编程论坛 ASP技术论坛

ASP代码错误

ds15fkcjj 发布于 2012-12-31 18:01, 416 次点击
如下ASP代码有误:
<html>
<head>
<title>MDB Data Write Sample</title>
</head>
<body>
</body>
</html>
<%
  Dim Conn,RS,RS2,RS3,RS4,RS5,RS6,RS7
  Set Conn = Server.CreateObject('ADODB.Connection')
  Conn.Provider = 'Microsoft.Jet.OLEDB.4.0'
  Conn.Open '\Stu.mdb' //数据库为该页根目录下的Stu.mdb
  //插入数据
  Set RS = Conn.Execute(INSERT into Stu VALUES(STU_01,'司马懿))
  Set RS2 = Conn.Execute(INSERT into Stu VALUES(STU_02,'诸葛亮'))
  Set RS3 = Conn.Execute(INSERT into Stu VALUES(STU_03,'曹操'))
  Set RS4 = Conn.Execute(INSERT into Stu VALUES(STU_04,'大乔'))
  Set RS5 = Conn.Execute(INSERT into Stu VALUES(STU_05,'黄月英'))
  Set RS6 = Conn.Execute(INSERT into Stu VALUES(STU_06,'貂婵'))
  //查询数据
  Set RS7 = Conn.Execute(Select * From Stu)
  //显示RS7
  Response.Write RS7 <BR>
  Response.Write "数据操作 已完成"
  Conn.Close
%>
错误为Syntax Error,错误句为Set Conn = Server.CreateObject('ADODB.Connection')
怎么回事?
3 回复
#2
hu9jj2013-01-01 09:21
请问楼主连接的是什么类型的数据库?
#3
ds15fkcjj2013-01-01 17:26
Access啊!代码改了N次都出错,怎么回事呢?
修改过的Code:
<html>
<head>
<title>MDB Data Write Sample</title>
</head>
<body>
</body>
</html>

<%
  Dim conn,RS,RS2,RS3,RS4,RS5,RS6,RS7
  Set conn = Server.CreateObject("ADODB.connection")
  conn.Provider = "Microsoft.Jet.OLEDB.4.0"
  conn.Open "\Stu.mdb"
  Set RS = conn.execute(insert into Stu values("STU_01","司马懿"))
  Set RS2 = conn.execute(insert into Stu values("STU_02","诸葛亮"))
  Set RS3 = conn.execute(insert into Stu values("STU_03","曹操"))
  Set RS4 = conn.execute(insert into Stu values("STU_04","大乔"))
  Set RS5 = conn.execute(insert into Stu values("STU_05","黄月英"))
  Set RS6 = conn.execute(insert into Stu values("STU_06","貂婵"))
  Set RS7 = conn.execute(Select * From Stu)
  Response.Write RS7 <BR>
  Response.Write "数据操作 已完成"
  conn.close
%>
提示这一行有错Set RS = conn.execute(insert into Stu values("STU_01","司马懿"))
#4
hu9jj2013-01-01 19:46
试试用下面的连接代码:
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("/stu.mdb")
1