📄 admin_newseditart.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="admin_loginchk.asp"-->
<%admin2%>
<title>新 闻 修 改</title>
<!--#include file="top.asp"-->
<!--#include file="code.asp"-->
<%
dim rs
dim sql
dim count
set rs=server.createobject("adodb.recordset")
sql = "select * from ANclass order by Nclassid asc"
rs.open sql,conn,1,1
%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("Nclass"))%>","<%= trim(rs("classid"))%>","<%= trim(rs("Nclassid"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.myform.Nclassid.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.myform.Nclassid.options[document.myform.Nclassid.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<table border="0" width="99%" cellspacing="1" cellpadding="1" style="margin-top:6px;margin-bottom:6px" align="center">
<tr>
<td valign=top width="20%" style="border:1px solid black;" bgcolor="#999999">
<!--#include file="admin_left.asp"-->
</td>
<td align=center valign=top>
<table border="0" cellpadding="4" cellspacing="1" width="98%" align="center" bgcolor="#333333">
<tr align="center" bgcolor="#999999">
<td><font color="#CCCCCC">::</font>新 闻 修 改<font color="#CCCCCC">::</font></td>
</tr>
<tr align="center" bgcolor="#CCCCCC">
<td align="center" valign="top" >
<form method="POST" name="myform" action="admin_newssave.asp?id=<%=request("id")%>&action=edit">
<div align="center"><center>
<table width="100%" cellpadding="0" cellspacing="1" style="border:1px solid black;" >
<tr>
<td width="100%">
</td>
</tr>
<tr align="center">
<td width="100%">
<table border="0" cellspacing="1" width="98%" cellpadding="0">
<tr>
<td width="15%" align="right" valign="top" height="20"><b>新闻类型:</b></td>
<td width="85%">
<select class="smallSel" name="classid" size="1" onChange="changelocation(document.myform.classid.options[document.myform.classid.selectedIndex].value)" >
<%
dim classid,Nclassid
classid=request("classid")
Nclassid=request("Nclassid")
sid=request("sid")
set rs=server.createobject("adodb.recordset")
sql="select * from Aclass"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "Not record."
else
do while not rs.eof
if classid=cstr(rs("classid")) then
sel="selected"
else
sel=""
end if
response.write "<option " & sel & " value='"+CStr(rs("classID"))+"' name=classid>"+rs("class")+"</option>"+chr(13)+chr(10)
rs.movenext
loop
end if
rs.close
%>
</select>
选择分类:
<select name="Nclassid" size="1">
<%
sql="select * from ANclass"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "Not record."
else
do while not rs.eof
if Nclassid=cstr(rs("Nclassid")) then
sel="selected"
else
sel=""
end if
response.write "<option " & sel & " value='" + Cstr(rs("Nclassid")) + "'>" + rs("Nclass") + "</option>"
rs.MoveNext
Loop
end if
rs.close
%>
</select>
** </td>
</tr>
<tr>
<td width="13%" align="right" valign="top" height="20"><b>所属专题:</b></td>
<td width="87%">
<select name="special">
<option value="">不属于任何专题</option>
<%
sql="select * from special"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "Not record."
else
do while not rs.eof
if sid=cstr(rs("sid")) then
sel="selected"
else
sel=""
end if
response.write "<option " & sel & " value='" + Cstr(rs("sid")) + "'>" + rs("sname") + "</option>"
rs.MoveNext
Loop
end if
rs.close
%>
</select>
</td>
</tr>
<%
sql="select * from article where articleid="&request("id")
rs.open sql,conn,1,1
%>
<tr>
<td width="15%" align="right" height="30"><b>新闻标题:</b></td>
<td width="85%" height="30">
<input type="text" name="txttitle" size="70"
class="smallinput" maxlength="100" value="<%=rs("title")%>">
</td>
</tr>
<tr>
<td width="15%" align="right" height="30"><b>UBB标签:</b></td>
<td width="85%" height="30"> <img onclick=bold() src="pic/icon_editor_bold.gif" width="22" height="22" alt="粗体" border="0">
<img onclick=italicize() src="pic/icon_editor_italicize.gif" width="23" height="22" alt="斜体" border="0">
<img onclick=underline() src="pic/icon_editor_underline.gif" width="23" height="22" alt="下划线" border="0">
<img onclick=center() src="pic/icon_editor_center.gif" width="22" height="22" alt="居中" border="0">
<img onclick=hyperlink() src="pic/icon_editor_url.gif" width="22" height="22" alt="超级连接" border="0">
<img onclick=email() src="pic/icon_editor_email.gif" width="23" height="22" alt="Email连接" border="0">
<img onclick=image() src="pic/icon_editor_image.gif" width="23" height="22" alt="图片" border="0">
<img onclick=flash() src="pic/swf.gif" width="23" height="22" alt="Flash图片" border="0">
<img onclick=showcode() src="pic/icon_editor_code.gif" width="22" height="22" alt="编号" border="0">
<img onclick=quote() src="pic/icon_editor_quote.gif" width="23" height="22" alt="引用" border="0">
<img onclick=list() src="pic/icon_editor_list.gif" width="23" height="22" alt="目录" border="0">
<IMG onclick=setfly() height=22 alt=飞行字 src="pic/fly.gif" width=23 border=0>
<IMG onclick=move() height=22 alt=移动字 src="pic/move.gif" width=23 border=0>
<IMG onclick=glow() height=22 alt=发光字 src="pic/glow.gif" width=23 border=0>
<IMG onclick=shadow() height=22 alt=阴影字 src="pic/shadow.gif" width=23 border=0><br>
字体:
<SELECT onchange=showfont(this.options[this.selectedIndex].value) name=font>
<option value="宋体" selected>宋体</option>
<option value="楷体_GB2312">楷体</option>
<option value="新宋体">新宋体</option>
<option value="黑体">黑体</option>
<option value="隶书">隶书</option>
<OPTION value="Andale Mono">Andale Mono</OPTION>
<OPTION value=Arial>Arial</OPTION>
<OPTION value="Arial Black">Arial Black</OPTION>
<OPTION value="Book Antiqua">Book Antiqua</OPTION>
<OPTION value="Century Gothic">Century Gothic</OPTION>
<OPTION value="Comic Sans MS">Comic Sans MS</OPTION>
<OPTION value="Courier New">Courier New</OPTION>
<OPTION value=Georgia>Georgia</OPTION>
<OPTION value=Impact>Impact</OPTION>
<OPTION value=Tahoma>Tahoma</OPTION>
<OPTION value="Times New Roman" >Times New Roman</OPTION>
<OPTION value="Trebuchet MS">Trebuchet MS</OPTION>
<OPTION value="Script MT Bold">Script MT Bold</OPTION>
<OPTION value=Stencil>Stencil</OPTION>
<OPTION value=Verdana>Verdana</OPTION>
<OPTION value="Lucida Console">Lucida Console</OPTION>
</SELECT>
字体大小
<select name="size" onChange="showsize(this.options[this.selectedIndex].value)">
<option value="1">1</option>
<option value="2">2</option>
<option value="3" selected>3</option>
<option value="4">4</option>
</select>
<font face="宋体" color=#333333>颜色:</font>
<SELECT onchange=showcolor(this.options[this.selectedIndex].value) name=color>
<option style="background-color:#F0F8FF;color: #F0F8FF" value="#F0F8FF">#F0F8FF</option>
<option style="background-color:#FAEBD7;color: #FAEBD7" value="#FAEBD7">#FAEBD7</option>
<option style="background-color:#00FFFF;color: #00FFFF" value="#00FFFF">#00FFFF</option>
<option style="background-color:#7FFFD4;color: #7FFFD4" value="#7FFFD4">#7FFFD4</option>
<option style="background-color:#F0FFFF;color: #F0FFFF" value="#F0FFFF">#F0FFFF</option>
<option style="background-color:#F5F5DC;color: #F5F5DC" value="#F5F5DC">#F5F5DC</option>
<option style="background-color:#FFE4C4;color: #FFE4C4" value="#FFE4C4">#FFE4C4</option>
<option style="background-color:#000000;color: #000000" value="#000000">#000000</option>
<option style="background-color:#FFEBCD;color: #FFEBCD" value="#FFEBCD">#FFEBCD</option>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -