set rs=server.CreateObject(adodb.recordset) 的中文详细说明

　　是建立一个数据集
前面应该先定义此数据集
dim rs as adodb.recordset
然后就可以用
set rs=server.CreateObject(adodb.recordset)
来建立一个数据集的实例，当然此时数据集中是没有数据的
rs.open ......
来打开一个记录集
rs.append或者ert来添加记录
rs.edit来修改记录
对于添加或修改的记录，可以用
rs.fields(字段名)=xxx
来进行赋值
rs.update
把更改过的值更新回数据库
当你添加一个数据（rs1）进数据库时：
rs.addnew
rs(rs1)=添加的数据
rs.update
rs.close
set rs=nothing
下面我们来个实例：
Set mRs= Server.CreateObject(adodb.recordSet)
mRs.open Select * from book, conn, 1, 3
mRs.addnew
mRs(Name) = Name
mRs(Mail) = Mail
mRs(Qq) = Qq
mRs(Info) = Info
mRs(time) = now()
mRs.update
mRs.close
Set mRs = nothing
//下面是调用html输入框
复制代码 代码如下:
<table border=0 cellpadding=0 style=border-collapse: collapse width=100%>
<form name=form1 method=post action=admin/<% =filename %>?action=Reply&id=<% =id %>>
<tr>
<td width=118 height=37 align=center bgcolor=#EFEFEF>昵称：</td>
<td width=640>
<input name=Name type=text class=input value=<% =mRs(Name) %>>
</td>
</tr>
<tr>
<td width=118 height=37 align=center bgcolor=#EFEFEF>内容是否公开：</td>
<td width=640>
<input type=radio name=Qq value=1 <%if mRs(qq)=1 then response.write checked end if%> >
是
<input name=Qq type=radio value=0 <%if mRs(qq)=0 then response.write checked end if%> >
否 </td>
</tr>
<tr>
<td width=118 height=37 align=center bgcolor=#EFEFEF>邮箱：</td>
<td width=640>
<input name=Mail type=text class=input value=<% =mRs(Mail) %>>
</td>
</tr>
<tr>
<td width=118 height=37 align=center bgcolor=#EFEFEF>留言：</td>
<td width=640>
<textarea name=Info rows=9 cols=57 class=button><% =mRs(Info) %></textarea>
</td>
</tr>
<tr>
<td height=25 align=center bgcolor=#EFEFEF width=118>回复：</td>
<td height=100 rowspan=2 bgcolor=#EFEFEF width=640>
<textarea name=Reply rows=6 cols=50 class=button><% =Reply %></textarea>
</td>
</tr>
<tr>
<td height=70 bgcolor=#EFEFEF width=118></td>
</tr>
<tr>
<td height=20 colspan=2 align=center bgcolor=#EFEFEF>
<input name=Submit1 type=submit id=Submit value= 回复留言 class=button>
<input name=reSet type=reSet id=reSet4 value= 重新输入 class=button>
</td>
</tr>
</form>
</table>