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>