主题:  请教ASP与数据库连接问题

luolanxisi
职务：普通成员
等级：1
金币：0.0
发贴：156
#12002/10/9 1:27:40
我的这段代码有错吗?为什么会显示:
-------------------------------------------------------------------
Microsoft VBScript 运行时错误 错误 '800a01a8'

缺少对象: 'ActiveConnection'

/ice/gb/add.asp，行47
------------------------------------------------------------------

出错页面在这里:http://www.sakurabbs.net/ice/gb/add.asp
以下是我出错的代码,请各位高手帮我找找问题.

<%
Set Rs = Server.CreateObject("ADODB.Recordset")
Set Rs.ActiveConnection=conn
Rs.open "select * from sakurasky",sql,conn,3,2
Rs.addnew
Rs("name")=name
Rs("time")=time
Rs("message")=message
Rs.update
Rs.close
set Rs = nothing
conn.close
set conn = nothing
%>

编辑历史:[这消息被luolanxisi编辑过(编辑时间2002-10-09 01:29:04)]

生存方式
职务：普通成员
等级：1
金币：0.0
发贴：9
#22002/10/9 14:13:13
set cmd=server.createobject("ADODB.command")
cmd.commandtext="select * from sakurasky"
cmd.commandtype=1
set cmd.activeconnection=conn
rs.open cmd,,1,3