电脑爱好者,提供IT资讯信息及各类编程知识文章介绍,欢迎大家来本站学习电脑知识。 最近更新 | 联系我们 RSS订阅本站最新文章
电脑爱好者
站内搜索: 
当前位置:首页>> Asp>>asp复选框删除:

asp复选框删除

来源:www.cncfan.com | 2006-11-12 | (有7239人读过)

selecthuiyuan.asp

<form action="deletehuiyuan.asp">
<table width="748" border="1" cellspacing="0" cellpadding="0">
<tr>
<td width="30px">选择</td>
<td>姓名</td>
<td>工作单位</td>
</tr>
<%
 For i = 1 to rs.pageSize
  if rs.EOF then
  Exit For
  end if  
%>
<tr>
<td>
<input name="huiyuanid" value="<%=rs("id")%>" type="checkbox">
</td>
<td>
<a href="huiyuandetail.asp?id=<%=rs("id")%>"><%=rs("xingming")%></a>
</td>
<td>
<%=rs("gongzuodanwei")%>
</td>
</tr>
<%
rs.MoveNext
next
%>
<tr>
<td colspan="4" align="right">
<input type="submit" value="删除" align="center">&nbsp;&nbsp;&nbsp;
</td>
</tr>
</table>

</form>

deletehuiyuan.asp

<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("mydb.mdb")
sql="delete from huiyuan where id in("&request("huiyuanid")&")"
conn.execute(sql)
response.redirect "./selecthuiyuan.asp"
%>
 

Asp热门文章排行
网站赞助商
购买此位置

 

关于我们 | 网站地图 | 文档一览 | 友情链接| 联系我们

Copyright © 2003-2024 电脑爱好者 版权所有 备案号:鲁ICP备09059398号