showm.asp

一个不错的asp程序

<!--#include file="my_conn.asp"-->
<!--#include file="my_cookie.asp"-->

<%
dim query
query="update message set RShow=abs(RShow-1) where RcdId="&cstr(request("RcdId"))
set rs=server.createobject("adodb.recordset")
rs.Open query,conn,1,3
%>
<script>
alert("成功执行所需操作！");
</script>

<%
set rs=nothing
response.redirect("showmessage.asp?uclass=" & request("uclass"))
%>