📄 allreply.asp
字号:
<html>
<head>
<title>回复主题</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<BODY vLink=#333333 aLink=#333333 link=#333333 bgColor=#ffffff leftMargin=0
topMargin=0><LINK href="forum.css" type=text/css
rel=stylesheet>
<Script language="VBScript">
Sub datacheck()
dim username,title,content
username=trim(answer.username.value)
title=trim(answer.title.value)
content=trim(answer.content.value)
If username = Empty Then
MsgBox "「用户名」不得为空白!", 64, "Oh no!"
answer.username.focus
Exit Sub
End if
If answer.password.value = Empty Then
MsgBox "「密码」不得为空白!", 64, "Oh no!"
answer.password.focus
Exit Sub
End if
If title = Empty Then
MsgBox "「文章主题」不得为空白!", 64, "Oh no!"
answer.title.focus
Exit Sub
End if
If content = Empty Then
MsgBox "「文章内容」不得为空白!", 64, "Oh no!"
answer.content.focus
Exit Sub
End if
answer.Submit
End Sub
</Script>
<TABLE cellSpacing=0 cellPadding=1 width="95%" align=center bgColor=#777777
border=0>
<TBODY>
<TR>
<TD height="10">
<TABLE style="COLOR: #000000" cellSpacing=0 cellPadding=4 width="100%"
border=0 bgcolor="#a9d46d">
<TBODY>
<tr>
<td width="27%" height="2"><font color="#FF0000">>></font>欢迎您,<b><%if session("loginname")="" then %>请先登录!<%end if%><%=session("loginname")%></b></td>
<td width="62%" height="2"><img src="images/reg.gif" width="16" height="16" align="absmiddle"><a href="reg.asp">用户注册</a>|<img src="images/login.gif" width="16" height="16"><a href="login.asp">用户登录</a>|<img src="images/update.gif" width="16" height="16"><a href="usermodify.asp">修改资料</a>|<img src="images/message.gif" width="21" height="14">现在时间:<%=now()%></td>
<td width="11%" height="2">
<div align="right"><img src="images/home.gif" width="14" height="14" align="absmiddle">返回首页</div>
</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<!--#include file="replybody.asp"-->
<%artid=request.querystring("titleid")%>
<form name="answer" method="post" action="reply.asp?titleid=<%=artid%>">
<table width="95%" border="0" align="center" bgcolor="#777777" cellpadding="1" cellspacing="1" height="185">
<tr bgcolor="#a9d46d">
<td colspan="2" height="21">
<div align="center"><b>回复主题</b></div>
</td>
</tr>
<tr bgcolor="#f4faed">
<td width="24%" height="19"><b>用户名</b></td>
<td width="76%" height="19" bgcolor="#f4faed">
<input type="text" name="username" value=<%=Session("loginname")%> size="20" maxlength="20">
</td>
</tr>
<tr bgcolor="#f4faed">
<td width="24%"><b>密码</b></td>
<td width="76%">
<input type="password" name="password" value=<%=Session("password")%> size="20" maxlength="20">
</td>
</tr>
<tr bgcolor="#f4faed">
<td width="24%"><b>文章主题</b></td>
<td width="76%">
<input type="text" name="title" maxlength="60" size="35">
<font color="#FF0000">(不要超过30个字)</font>
<input type="hidden" name="posttype" value="true">
</td>
</tr>
<tr bgcolor="#f4faed">
<td width="24%"><b>表情</b></td>
<td width="76%">
<% for i=1 to 18
if i=1 then %>
<input type="radio" name="face" value="<%=i%>" checked>
<img src="images/<%=i%>.gif" width="15" height="15">
<%else%>
<input type="radio" name="face" value="<%=i%>">
<img src="images/<%=i%>.gif" width="15" height="15">
<%
if i mod 9=0 then response.write "<br>"
end if
next%>
</td>
</tr>
<tr bgcolor="#f4faed">
<td width="24%" height="21"><b>内容</b></td>
<td width="76%" height="21">
<textarea name="content" cols="80" rows="10" ></textarea>
</td>
</tr>
<tr bgcolor="#f4faed">
<td colspan="2" height="21">
<div align="center">
<input type="button" value="提交" onclick="datacheck">
<input type="reset" value="重填">
</div>
</td>
</tr>
</table>
</form>
<!--#include file="footer.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -