📄 editarticle.asp
字号:
<!--#include file="conn.asp"-->
<%
if session("admin")="" then
response.redirect "admin.asp"
else
if session("flag")>2 then
response.write "<br><p align=center>您没有操作的权限</p>"
response.end
end if
end if
%>
<!--#include file="const.asp"-->
<!--#include file="code.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>修 改 文 章</title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body background="image/bg.gif">
<table width="600" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#999999" class="table">
<form method="POST" name="myform" action="adminsave.asp?id=<%=request("id")%>&action=edit">
<tr align="center">
<td colspan="3" bgcolor="#f7f7f7"><font color="#333333"><strong>修改内容</strong></font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="3"> <font color="#333333">
<%
dim rs,sql,sel
dim content
set rs=server.createobject("adodb.recordset")
%>
</font></td>
</tr>
<%
sql="select * from article where articleid="&request("id")
rs.open sql,conn,1,1
%>
<tr bgcolor="#FFFFFF">
<td width="10%" align="right"><font color="#333333"><b>文章名称：</b></font></td>
<td colspan="2"> <font color="#333333">
<input type="text" name="txttitle" size="70"
class="input" maxlength="100" value="<%=rs("title")%>">
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="10%" align="right"><font color="#333333"><b>UBB标签：</b></font></td>
<td width="75%"> <font color="#333333"><a href=# onclick=bold()>粗</a> <a href=# onclick=italicize()>斜</a>
<a href=# onclick=underline()>下划</a> <a href=# onclick=center()>中</a>
<a href=# onclick=hyperlink()>URL</a> <a href=# onclick=email()>Email</a>
<a href=# onclick=image()>图</a> <a href=# onclick=showcode()>编号</a> <a href=# onclick=quote()>引用</a>
<a href=# onclick=list()>目录</a>
<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=Arial>Arial</OPTION>
<OPTION value=Georgia>Georgia</OPTION>
<OPTION value=Tahoma>Tahoma</OPTION>
<OPTION value=Verdana>Verdana</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>
<A href="javascript:openscriphtml()">HTML编辑器</A></font></td>
<td width="15%"><div align="center"><a href="ftp.asp" target="_blank">文件上传</a></div></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="10%" align="right" valign="top"><font color="#333333"><b>文章内容：</b></font></td>
<td colspan="2"> <font color="#333333">
<textarea rows="15" name="txtcontent" cols="60" class="smallarea">
<%
content=replace(rs("content"),"<BR>",chr(13))
content=replace(content," "," ")
response.write content
%>
</textarea>
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="10%" align="right"><font color="#333333"><b>作者：</b></font></td>
<td colspan="2"> <font color="#333333">
<input type="text" name="writer" size="70"
class="input" maxlength="100" value=<%=rs("writer")%>>
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="10%" align="right"><font color="#333333"><b>来源：</b></font></td>
<td colspan="2"> <font color="#333333">
<input type="text" name="writefrom" size="70"
class="input" maxlength="100" value=<%=rs("writefrom")%>>
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="10%" align="right"><font color="#333333"><b>支持HTML：</b></font></td>
<td colspan="2"> <font color="#333333">
<input type="checkbox" name="htmlable" value="yes" checked>
选择后文章全部支持HTML语法，UBB语法将没有任何作用</font></td>
</tr>
<tr align="center" bgcolor="#FFFFFF">
<td colspan="3"> <font color="#333333">
<input type="submit" value=" 添加 " name="cmdok" class="button">
<input type="reset" value=" 清除 " name="cmdcancel" class="button">
</font></td>
</tr>
</form>
</table>
</body>
</html>
<%
set rs=nothing
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -