fu.asp

来自「一个简单的留言板」· ASP 代码 · 共 10 行

<!-- #include file=conn.asp -->
<%
dim rs
set rs=server.createobject("adodb.recordset")
rs.open "select * from txt where id="&clng(request("id")),conn,1,3
rs("txt")=rs("txt")&"\^"&request("name")&"\~"&request("txt")&"\~"&now()
rs.update
rs.close : set rs=nothing : conn.close : set conn=nothing   
%>
<script>alert("要查看您刚刚写的留言\n请刷新网页！");self.close()</script>