UC知道将asp 点击链接删除数据页面整合到一页
来源：百度知道 编辑：UC知道 时间：2024/06/24 17:14:27
sub delete()
set rs=server.createobject("adodb.recordset")
sql="select * from news order by id desc"
rs.open sql,conn,1,1
do until rs.eof %>
<table width="712" border="0" cellpadding="1" cellspacing="1">
<tr><td bgcolor="#CCCCCC" ><a href="news_read.asp?id=<%=rs("id")%>" target="_blank"><%=rs("title")%></a></td>
<td width="57" bgcolor="#CCCCCC" ><a href=javascript:if(confirm("确实要删除吗?"))location="news_del_exe.asp?id=<%=rs("id")%>">删除</a></td>
</tr>
</table>
<% rs.movenext
loop
rs.close
set rs=nothing
end sub
news_del_exe.asp是做删除功能的页面。
<!--#include file="book_conn.asp"-->
<%
id=request
set rs=server.createobject("adodb.recordset")
sql="select * from news order by id desc"
rs.open sql,conn,1,1
do until rs.eof %>
<table width="712" border="0" cellpadding="1" cellspacing="1">
<tr><td bgcolor="#CCCCCC" ><a href="news_read.asp?id=<%=rs("id")%>" target="_blank"><%=rs("title")%></a></td>
<td width="57" bgcolor="#CCCCCC" ><a href=javascript:if(confirm("确实要删除吗?"))location="news_del_exe.asp?id=<%=rs("id")%>">删除</a></td>
</tr>
</table>
<% rs.movenext
loop
rs.close
set rs=nothing
end sub
news_del_exe.asp是做删除功能的页面。
<!--#include file="book_conn.asp"-->
<%
id=request
首先><input type='checkbox' value='"&rs("ID")&"' name=newsid>这句是错的，我在你的另一个提问里做了回答。
其次，你可以添加url参数，如用<a href="?action=delete&id=<%=rs("id")%>">删除</a>
在页内再用if request("action")="delete" then
call delete
esle
显示页面
end if
我觉得，只要你对asp有差不多的了解就应该知道我上面所说的了。其次，我不想对不是我做的商业应用程序提供太多的精力，因此只能说到上面所说了。
写这个就给
10分的啊
太小气了
一写ASP就是2小时
ASP还要做页面,太繁了不做
NET还考虑下
你重开标题200分我就写
好的