📄 admin_mb_add.asp
字号:
<%
if session("dj")<>"1" then
Response.Write "<BR><BR><BR><BR><center>权限不足，你没有此功能的管理权限"
Response.end
end if
ON ERROR RESUME NEXT
%>
<!--#include file = admin_chk.asp -->
<script language="JavaScript">
<!--
//显示图层
function show_icon_cho(i)
{
var xx=document.FrontPage_Form1.select_icon.options[document.FrontPage_Form1.select_icon.selectedIndex].value;
// if(xx.indexOf("images")!=1)
if(xx.length>5)
{
i.style.display = ""
document.show_icon.src=xx;
document.FrontPage_Form1.icon.value="<img src=\""+xx+"\" border=\"0\">";
}
else
{
i.style.display = "none";
document.FrontPage_Form1.icon.value=xx;
}
}
// -->
</script>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE type="text/css">
<!--
a:link {text-decoration: none; color: #000000 }
a:visited {text-decoration: none; color: #000000 }
A:hover {COLOR: green; TEXT-DECORATION: underline}
body {font-size: 9pt;color: #000000}
TD {FONT-SIZE: 9pt; color: #000000;table-layout:fixed;word-break:break-all}
p {FONT-SIZE: 9pt; color: #000000}
input {FONT-SIZE: 9pt; color: #000000}
body {margin-top: 0; margin-bottom: 0;margin-left:0;margin-right:0; color: #000000}
select {FONT-SIZE: 9PT;}
option {FONT-SIZE: 9pt;}
textarea {FONT-SIZE: 9pt;}
-->
</STYLE>
</head>
<!--#include file = admin_conn.asp -->
<body bgcolor="#EFEFDE">
<div align="center">
<%
id=trim(request("id"))
lx=trim(request("lx"))
if lx="" then lx=1
if id<>"" then
sql = "select * from newsmb where id="&id
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
title=rs("title")
midd=rs("top")+rs("mid")+rs("down")
listmb=rs("listmb")
listshu=rs("list")
somb=rs("somb")
tb=rs("tb")
picw=rs("picw")
pich=rs("pich")
picx=rs("picx")
picy=rs("picy")
pictitle=rs("pictitle")
pictitlecolor=rs("pictitlecolor")
pictitlesize=rs("pictitlesize")
lmname=rs("lmname")
newshit=rs("newshit")
newstime=rs("newstime")
open=rs("openwindow")
updown=rs("updown")
icon=rs("icon")
listtumb=rs("listtumb")
rs.close:set rs=nothing
conn.close:set conn=nothing
else
'属于新的情况时，则默认值
picw=100
pich=100
picx=4
picy=2
pictitle=18
pictitlecolor=FFFFFF
pictitlesize=9
listshu=10
tb=38
somb=""
end if
%>
<br><a href="admin_mb.asp">返回模版列表</a><br><br>
</div>
<div align="center">
<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript" Type="text/javascript"><!--
function FrontPage_Form1_Validator(theForm)
{
if (theForm.title.value == "")
{
alert("请在 标题 域中输入值。");
theForm.title.focus();
return (false);
}
if (theForm.title.value.length < 5)
{
alert("在 标题 域中，请至少输入 5 个字符。");
theForm.title.focus();
return (false);
}
if (theForm.title.value.length > 10)
{
alert("在 标题 域中，请最多输入 10 个字符。");
theForm.title.focus();
return (false);
}
if (theForm.mid.value == "")
{
alert("请在 模版 中部 域中输入值。");
theForm.mid.focus();
return (false);
}
if (theForm.mid.value.length < 10)
{
alert("在 模版 中部 域中，请至少输入 10 个字符。");
theForm.mid.focus();
return (false);
}
if (theForm.list.value == "")
{
alert("请在 列表代码 域中输入值。");
theForm.list.focus();
return (false);
}
if (theForm.list.value.length < 1)
{
alert("在 列表代码 域中，请至少输入 1 个字符。");
theForm.list.focus();
return (false);
}
return (true);
}
//--></script><!--webbot BOT="GeneratedScript" endspan --><form method="POST" action="admin_mb_add_save.asp?lx=<%=lx%><%if id<>"" then response.write "&id="&id%>" name="FrontPage_Form1" onsubmit="return FrontPage_Form1_Validator(this)" language="JavaScript">
<table border="1" width="800" id="table1" cellspacing="0" cellpadding="5" style="border-collapse: collapse" bordercolor="#C0C0C0">
<tr>
<td width="94" bgcolor="#FFFFFF">
<p align="center">标题</td>
<td bgcolor="#FFFFFF">
<!--webbot bot="Validation" s-display-name="标题" b-value-required="TRUE" i-minimum-length="5" i-maximum-length="10" --><input type="text" name="title" size="58" maxlength="10" value="<%if id<>"" then response.write title%>" <%if lx=2 then response.write "readonly"%>></td>
</tr>
<tr>
<td width="94">
<p align="center">新闻显示页面<br>
(news_view.asp)</p>
<p align="center"><font color="#999999">可以使用<br>
HTML代码</font></p>
<p align="center"><font color="#999999">$$标题$$<br>
$$副标题$$<br>
$$时间$$<br>
$$栏目名$$<br>
$$内容$$<br>
$$访问量$$<br>
$$来源$$<br>
$$作者$$<br>
$$图片作者$$<br>
$$相关$$<br>
$$上下条$$<br>
$$工具栏$$<br>
$$评论$$<br>
$$路径$$<br>
$$NEWSID$$</font></td>
<td>
<!--webbot bot="Validation" s-display-name="模版 中部" b-value-required="TRUE" i-minimum-length="10" --><textarea rows="21" name="mid" cols="98" <%if lx=2 then response.write "readonly"%>>
<%
if id<>"" then
response.write midd
else
%><div align="center">
<table border="0" width="737" id="table1" cellspacing="0" cellpadding="5">
<tr><td>
$$路径$$
</td></tr>
<tr>
<td><center><font size=5><b>$$标题$$</b></font></center></td>
</tr>
<tr>
<td><hr>
<CENTER> $$栏目名$$ 加入时间：$$时间$$ 来源：$$来源$$ 访问量：$$访问量$$</CENTER>
</td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td>$$内容$$</td>
</tr>
</table>
</div>
<%end if%>
</textarea></td>
</tr>
<tr>
<td width="94" bgcolor="#F5F5F5">
<p align="center">更多新闻列表<br>
(news_more.asp)</p>
<p align="center"><font color="#999999">可以使用<br>
HTML代码</font><p align="center">
<font color="#999999">$$列表$$<br>
$$栏目名$$<br>
$$LMID$$<br>
$$路径$$<br>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -