📄 write.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="pageset.asp"-->
<!--#include file="lock.asp"-->
<!--#include file="css.asp"-->
<%
if request("hiddenField")<>"" then
function k(str,name,size)'isSize
k=str
if str="" then
call errmsg(name&"不能为空")
end if
if len(str)>size then
call errmsg(name&"字符宽度不能大于"& size)
end if
end function
zz=k(request("zz"),"发布者",10)
zt=k(request("zt"),"主题",25)
nr=k(request("nr"),"内容",10000)
sql="SELECT * from body"
rs.open sql,conn,1,3
rs.addnew
rs("writer")=zz
rs("title")=zt
rs("body")=nr
rs("ip")=request.servervariables("remote_addr")
rs.update
rs.close
session("user")=zz
response.redirect"default.asp"
response.end
end if
%>
<SCRIPT LANGUAGE="JavaScript">
function insert(name,left,right)
{
var text=prompt("请输入"+name+"地址","");
if(text){form1.textarea.value=form1.textarea.value+left+text+right}
}
function insert2(name,left,right,size)
{
var text2=prompt("请输入"+name+"宽度,高度",size);
if (text2){
var text=prompt("请输入"+name+"地址","");
if(text){form1.textarea.value=form1.textarea.value+left+text2+"]"+text+right}
}
}
</SCRIPT>
<%if session("admin")<>"" then%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<!--#include file="top.asp"--> </td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table>
<table border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<form name="form1" method="post" action="" onSubmit="form1.Submit.disabled=true">
<td>
<table border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="42" height="23"> 主题: </td>
<td>
<input name="zt" type="text" id="zt" size="48" maxlength="25">
发布者:
<input name="zz" type="text" id="textfield2" value="<%=session("user")%>" size="20" maxlength="10">
</td>
</tr>
<tr>
<td height="13"> </td>
<td><img src="images/type_img.gif" width="13" height="16" alt="Image" onClick='insert("图片","[IMG]","[/IMG]")' onMouseMove="this.style.cursor='hand'">
<img src="images/type_url.gif" alt="URL" width="16" height="16" onClick='insert("链接","[URL]","[/URL]")' onMouseMove="this.style.cursor='hand'">
<img src="images/type_flash.gif" width="13" height="16" alt="Flash" onClick='insert2("Flash","[FLASH=","[/FLASH]","500,300")' onMouseMove="this.style.cursor='hand'">
<img src="images/type_rm.gif" width="16" height="16" alt="Real" onClick='insert2("Real","[RM=","[/RM]","352,288")' onMouseMove="this.style.cursor='hand'">
<img src="images/type_mp.gif" width="16" height="16" alt="Media" onClick='insert("Media","[MP]","[/MP]")' onMouseMove="this.style.cursor='hand'">
</td>
</tr>
<tr>
<td height="60" valign="top">内容:</td>
<td valign="top"> <textarea name="nr" cols="77" rows="10" id="textarea"></textarea></td>
</tr>
<tr>
<td height="25" valign="top"> </td>
<td> <input type="submit" name="Submit" value="发布"> <input type="reset" name="Submit22" value="重置">
<input name="hiddenField" type="hidden" value="hiddenField"> </td>
</tr>
</table>
</td>
</form>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table></td>
</tr>
<tr>
<td>
<!--#include file="bottom.asp" --> </td>
</tr>
</table>
<%else %>
<p align="center"><font size="7" color="#FF0000">
<img border="0" src="images/err.gif" width="31" height="32">非管理员不能更改或者添加公告!</font></p>
<script language = javascript>
setTimeout('history.back()',2000);
</script>
<%end if%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -