当前位置:主页 > 查看内容

set rs=server.CreateObject("adodb.recordset&quo

发布时间:2021-05-11 00:00| 位朋友查看

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

原文链接:https://m.jb51.net/article/24452.htm
本站部分内容转载于网络,版权归原作者所有,转载之目的在于传播更多优秀技术内容,如有侵权请联系QQ/微信:153890879删除,谢谢!

推荐图文


随机推荐