网页弹出框 确认是否删除

原创 2005年03月01日 11:46:00

1.asp

<%
set Conn=server.createobject("adodb.Connection")
conn.open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("db1.mdb")
set rs=server.createobject("adodb.recordset")
function connClose
Conn.close
Set conn = Nothing
End Function
%>
<SCRIPT LANGUAGE="JavaScript">
function admin(text,url)
{
if(confirm(text)){location=url}
}
</SCRIPT>

<style type="text/css">
<!--
body {  font-size: 9pt}
table {  font-size: 9pt}
select {  font-size: 9pt}
input {  font-size: 9pt}
textarea {  font-size: 9pt}
.smallbox {  font-size: 1pt}
.p9 {  font-size: 9pt}
a:visited {text-decoration: none}
a:link { font-size: 9pt; text-decoration: none}
a:hover { font-size: 9pt;text-decoration:underline}
-->
</style>


<table width="100%"  border="0" cellspacing="0" cellpadding="0">
<%
sql="SELECT * from nodes "
rs.open sql,conn,1,3
do while not rs.eof
%>
  <tr>
    <td><%=rs("name")%></td>
    <td><a onclick='admin("你确定要删除此贴和相关回复吗?","2.asp?id=<%=rs("id")%>")' onMouseMove="this.style.cursor='hand'"><font color="#CC0000">[删除]</font></a></td>
  </tr>
<%
rs.movenext
loop
%>
</table>



2.asp

<%
set Conn=server.createobject("adodb.Connection")
conn.open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("db1.mdb")
set rs=server.createobject("adodb.recordset")
function connClose
Conn.close
Set conn = Nothing
End Function
%>

<% id =request("id")
   sql="SELECT * from nodes where id="&id&""
   rs.open sql,conn,1,3
   rs.delete
   rs.close
response.redirect"1.asp"
   %>



db1.mdb

表名:nodes
字段:
id        自动编号
name    文本

相关文章推荐

弹出提示框,确认、取消按钮分别转跳到不同的网页

layer.open({ title: ['温馨提示'], content: '您只需投资一款指定的金融产品,即可免费获得此商品。投资期满后,您即可提取本金和投资收益。', btn: ['...

js网页右下角弹出提示框

  • 2014年04月23日 15:23
  • 3KB
  • 下载

Asp.net点击按钮弹出文件夹选择框的实现(网页利用ActiveX)

在Asp.net网站实际的开发中,比如:需要实现点击一个类似于FileUpload的浏览...按钮,弹出文件夹选择框,然后选择本地路径下的某一文件夹,将该路径值付给TextBox。参考了好多网络资料,...

网页右下角弹出提示框

  • 2013年04月02日 22:29
  • 44KB
  • 下载

网页弹出框

  • 2016年09月18日 11:29
  • 26KB
  • 下载

Android加载网页输入框无法弹出输入法

今天在把坐车网触屏版直接加载到WebView里,结果发现输入框无法使用,一些按钮也无法使用,想了想,可能是没有设置WebView属性能够执行JavaScript脚本,便在代码里加了 wb.getSet...
  • wu_wxc
  • wu_wxc
  • 2016年03月22日 22:56
  • 1118

【Bootstrap】一个在当前网页弹出的对话框,可以关闭,不用跳转,非弹窗

使用弹窗在网页中显示短信息还行,虽然不那么地友好。然而,弹窗对于如同网站服务条款的长信息就无能为力的了。这是需要使用一个叫模态框modal的东西,并且在模态框里面嵌入一个多行文本框textarea。 ...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:网页弹出框 确认是否删除
举报原因:
原因补充:

(最多只允许输入30个字)