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

是建立一个数据集 
前面应该先定义此数据集 
dim rs as adodb.recordset 
然后就可以用 
set rs=server.CreateObject("adodb.recordset") 
来建立一个数据集的实例，当然此时数据集中是没有数据的 
rs.open ...... 
来打开一个记录集 
rs.append或者rs.insert来添加记录 
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>