哎！我又搞不懂了，又要麻烦各位大哥了.

[iwo99]

<!--#include file="../include/conn.asp"-->
<!--#include file="../include/adovbs.inc"-->

<%
bookname=request("bookname")
zz=request("zz")
cbs=request("cbs")
rq=request("rq")
nrjj=request("nrjj")
isbn=request("isbn")
jg=request("jg")
ztc=request("ztc")
fl=request("fl")
filename=request("filename")
sql="select * from fenlei where 分类名称='"&fl&"'"
set rs=conn.execute(sql)
flh=rs("分类号")

sql1="select * from book"
set rs1=conn.execute(sql1)
rs1.Open sql1,conn,3,2
rs1.addnew
rs1("书名")=bookname
rs1("isbn")=isbn
rs1("作者")=zz
rs1("出版社")=cbs
rs1("出版日期")=rq
rs1("简介")=nrjj
rs1("价格")=jg
rs1("分类号")=flh
rs1("主题")=ztc
rs1("权限")=qx
rs1("文件名")=filename
rs1.update
%>
<center><font color=red>图书添加成功！</center>
我不知道为什么，这段程序在运行时会出现
rs1.Open sql1,conn,3,2 这行错误 改成 set rs1=conn.execute(sql1)
就不提示本句错误，但那样是不能添加新记录的。
出错提示为：
Microsoft VBScript 运行时错误 错误 '800a01a8'

缺少对象: ''
我不知道为什么，原来那样写又可以。

[希偌]

rs1.Open sql1,conn,3,2是针对数据集的
如果要用的话要把
set rs1=conn.execute(sql1)
改为
set rs1=server.createobject("adodb.recordset")

[ssm1226]

rs1.open
-----------------
rs1在conn.asp中定义了吗

[iwo99]

对对对，各位大哥真厉害，我在conn.asp和本程序中都没有定义rs1，所以
给分给分