📄 add.asp
字号:
<!--#include file="../inc/check.asp"-->
<%MDBpath="../inc/"%>
<!--#include file="../inc/mdb_path_info.asp"-->
<%
savetime=Now()+webtime/24
set rs=server.CreateObject("ADODB.RecordSet")
TT=TT & "<a class=JyDownSort href=>首页</a>"
if request("id")<>"" then
rs.open "select * from infotype where id="&request("id"),conn,1,1
if not rs.EOF then
TN=split(rs("tname"),"|")
TI=split(rs("ts"), ",")
for i = 0 to ubound(TN)-1
TT=TT & ">> <a class=JyDownSort href=add.asp?id="&TI(i)&">"&TN(i)&"</a>"
next
tj=rs("tj")
end if
rs.close
end if
thistype=TT
rs.open ("select * from infotype where tj>1 order by ts"),conn,1,1
tn=""
do while not rs.eof
tname=replace(rs("tname"),"|","->")
if rs("tj")=2 and rs("tn")<>tn then
i=i+1
if i=2 then
i=0
color="#808000"
else
color="#000000"
end if
end if
tn=rs("tn")
typelist=typelist&"<option style='COLOR:"&color&"' value='"&rs("id")&"'>"&tname&"</option>"
rs.MoveNext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<SCRIPT LANGUAGE="JavaScript">
function AddText(NewCode) {
document.frmAnnounce.body.value+=NewCode
}
function openscriphtml()
{
if (navigator.appName!="Microsoft Internet Explorer")
alert("此功能 Netscape 用户不能使用！")
else
{newwin=window.open('html_editor.htm','','width=544,height=294');
newwin.focus();
}
}
function runEx(){
//alert('请注意，按下确定将生成页面，按下后请稍后....');
var winEx = window.open("", "winEx", "width=300,height=200,status=yes,menubar=yes,scrollbars=yes,resizable=yes"); winEx.document.open("text/html", "replace");
winEx.document.write(unescape(event.srcElement.parentElement.children[2].value));
winEx.document.close();
}
</SCRIPT>
<script language="Javascript">
<!-- hide
function insertsmilie(smilieface){
document.frmAnnounce.body.value+=smilieface;
}
// -->
</script>
<html>
<head>
<title><%=JyDownLoginTitle%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<meta name=keywords content="用户登陆">
<LINK href="../inc/style.css" rel=stylesheet>
</head>
<body><center>
<!--#include file="../inc/top.asp"-->
<table border=0 cellpadding=0 cellspacing=0 width=760 align=center bgcolor=#ffffff>
<tr valign=top><td width=180 >
<!--#include file="left.asp"--></td><td width=600>
<table width="580" border="0" cellspacing="0" cellpadding="0"><tr>
<td height=10></td>
</tr><tr><td align=center>
<form action="add_save.asp?d=addsave&id=<%=request("id")%>" method=post name="frmAnnounce">
<div align="center">
<center>
<table border="0" width="100%" bgcolor="#E6E6E6" cellspacing="1" style="border-collapse: collapse">
<tr>
<td width="100%" bgcolor="#3FAEE4" height="26"> <b><%=thistype%> <font color="#FFFFFF"> --（添加文章 2/2）--</font></b></td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF">
<table border="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111" cellspacing="0">
<tr>
<td nowrap><font color="#FF0000"> 文章类别</font>：</td>
<td nowrap><select size="1" name="tid">
<%if request("id")<>"" then
response.write("<option selected value='"&request("id")&"'>"&thistype&"("&request("id")&")</option>")
else
response.write("<option selected value=''>- - = = = 请选择文章分类 = = = - -</option>")
end if%><%=typelist%>
</select>
</tr>
<tr>
<td nowrap><font color="#FF0000"> 文章标题</font>：</td> <td nowrap><input type="text" size=51 name="title" value="<%=request("title")%>"></td> </tr> <tr>
<td nowrap> 作者:</td> <td nowrap><input type="text" size=23 name="form_user"> * 不能为空</td> </tr>
<tr>
<td nowrap> 相关来源:</td> <td nowrap><input type="text" size=51 name="form_url"> </td> </tr>
<tr>
<td valign="top" nowrap> 文章内容：<br>
<input type="checkbox" name="html">HTML<br>
<a href="javascript:openscriphtml()">HTML编辑</a></td>
<td nowrap><textarea rows="17" name="body" cols="68"></textarea></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#F7F7F7">
<p align="center"><input name="change" value="添加" type="submit">
<input name="change1" value="重置" type="reset"> 现在时间:<%=savetime%></td>
</tr>
</table>
</center>
</div>
</form>
</td>
</tr>
</table>
</td>
</tr>
</table>
<!--#include file="../inc/foot.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -