📄 admin_ads.asp

📁 1、采用4.5修改而成。 2、添加了求片区
💻 ASP
字号:
<!-- #include file="../inc/sub.asp" -->
<!-- #include file="check.asp" -->
<%'====================================================================
'=              Copyright (c) 2005-2007,马克斯(QQ448265)开发             =
'=                      All rights reserved.                        =
'=------------------------------------------------------------------=
'=                     文件名称：admin_ads.asp                   =
'=                     摘    要：后台—广告管理                 =
'=------------------------------------------------------------------=
'=                     用   途：免费电影系统                         =
'=                     最后更新：2007-10-30                         =
'====================================================================%>
<%
Dim action
action=Request.QueryString ("action")
Select Case Lcase(action)
Case "edit"
	Call edit
Case "add"
	Call add
Case Else
	Call main'
End Select

Sub add
zt_mb=request.Form("zt_mb")
zt_file=request.Form("zt_file")
If Right(zt_file,3)=".js" Or Right(zt_file,4)=".xml" Or Right(zt_file,5)=".html" Then 
Else 
response.write"你这是想做什么，老兄？"
response.end
End If 
zt_file="../"&zt_file
createhtml zt_file,zt_mb
response.write"<script>alert('修改成功！');location.href='?';</script>"
End Sub 
Sub main%><html>
<head>
<title>模板管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="admin.css" type=text/css rel=stylesheet>

</head>
<body>
说明：动态代表使用PLAY.ASP播放需要的模板(系统默认，也推荐这样做)，静态代表生成播放页需要的模板(两者的区别主要是路径和参数调用)
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr>
<th>广告JS模板</th></tr>
<tr><td class="forumrow"><input type="button" value="首页幻灯片管理" onClick="javascript:location.href='?action=edit&a=首页幻灯片管理&b=images/hot/pic.xml';" name="Input"></td></tr>
<tr><td class="forumrow"><input type="button" value="顶部广告JS" onClick="javascript:location.href='?action=edit&a=顶部广告JS&b=js/top.js';" name="Input">&nbsp;<input type="button" value="底部广告JS" onClick="javascript:location.href='?action=edit&a=底部广告JS&b=js/foot.js';" name="Input"></td></tr>
<tr><td class="forumrow"><input type="button" value="首页广告JS1" onClick="javascript:location.href='?action=edit&a=首页广告JS1&b=js/index1.js';" name="Input">&nbsp;<input type="button" value="首页广告JS2" onClick="javascript:location.href='?action=edit&a=首页广告JS2&b=js/index2.js';" name="Input"></td></tr>
<tr><td class="forumrow"><input type="button" value="分类页广告JS1" onClick="javascript:location.href='?action=edit&a=分类页广告JS1&b=js/item1.js';" name="Input">&nbsp;<input type="button" value="分类页广告JS2" onClick="javascript:location.href='?action=edit&a=分类页广告JS2&b=js/item2.js';" name="Input"></td></tr>
<tr><td class="forumrow"><input type="button" value="内容页广告JS1" onClick="javascript:location.href='?action=edit&a=内容页广告JS1&b=js/view1.js';" name="Input">&nbsp;<input type="button" value="内容页广告JS2" onClick="javascript:location.href='?action=edit&a=内容页广告JS2&b=js/view2.js';" name="Input">&nbsp;<input type="button" value="内容页广告JS3" onClick="javascript:location.href='?action=edit&a=内容页广告JS3&b=js/view3.js';" name="Input">&nbsp;<input type="button" value="内容页广告JS4" onClick="javascript:location.href='?action=edit&a=内容页广告JS4&b=js/view4.js';" name="Input"></td></tr>
<tr><td class="forumrow"><input type="button" value="播放页广告JS1" onClick="javascript:location.href='?action=edit&a=播放页广告JS1&b=js/play1.js';" name="Input"></td></tr>
</table>
</body>
</html><%
end Sub

Sub edit
a=request.querystring("a")
b=request.querystring("b")
If Right(b,3)=".js" Or Right(b,4)=".xml" Or Right(b,5)=".html" Then 
Else 
response.write"你这是想做什么，老兄？"
response.end
End If 
%><html>
<head>
<title>模板管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="admin.css" type=text/css rel=stylesheet>
</head>
<body>
<table  width="97%" height="98%" border="0" align="center" cellpadding="0" cellspacing="1" class="tableBorder">
<form method="post" action="?action=add"><tr>
<th><%=a%>模板管理</th></tr>
<tr><td width="100%" bgcolor="#FFFFFF" height="100%"><input type="hidden" name="zt_file" value="<%=b%>" /><textarea style="width:100%; height:100%;" rows="19" name="zt_mb" cols="102"><%=FSOFileRead("../"&b&"")%></textarea></td></tr>
<tr><td bgcolor="#BEBFD9" align="center">&nbsp;<input type="submit" value="更新当前模板" /></td></tr>
</form></table>
</body>
</html><%
end Sub
%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -