凹丫丫网络社区 » 【网页编程】 » 删除一条记录

Amm 发表于 2008-5-15 16:21

删除一条记录

<STRONG><FONT size=4><FONT color=#cc0000><FONT face=新宋体>删除数据库记录主要用到rs.delete,rs.update<WBR><WBR><BR><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em">&nbsp;&nbsp; &lt;!--#include file=conn.asp--&gt;&nbsp;&nbsp;&nbsp;&nbsp;(包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)</FONT></FONT></FONT></FONT><WBR><WBR><BR></STRONG><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&lt;%</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; dim name</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; name="xx"</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; set rs=server.CreateObject("adodb.recordset")&nbsp;&nbsp;(建立recordset对象)</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; sqlstr="select * from message"&nbsp;&nbsp;----&gt;(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; rs.open sqlstr,conn,1,3&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ----&gt;(表示打开数据库的方式)</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>-------------------------------------------------------&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; while not rs.eof</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if rs.("name")=name then</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; rs.delete</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; rs.update&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 查询数据表中的name字段的值是否等于变量name的值"xx"，如果符合就执行删除，</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em"><FONT style="LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;else&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 否则继续查询,直到指针到末尾为止</FONT><WBR></FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; rs.movenext</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;emd if</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; wend</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>------------------------------------------------------&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; rs.close</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; conn.close&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;这几句是用来关闭数据库</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; set rs=nothing</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; set c</FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>------------------------------------------------------- </FONT><WBR></B><WBR><BR><B><WBR><FONT style="FONT-SIZE: medium; LINE-HEIGHT: 1.3em" face=新宋体 color=#cc0000>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;%&gt;</FONT></B>

查看完整版本: 删除一条记录