代码如下:
<%
if Session.Contents("UserName")=""then
%>
<script language=vbscript>
MsgBox "请注册后登陆社区再发帖子!"
location.href="../index.asp"
</script>
<%
else
dim conn,rs
owner=request.querystring("owner")
id=request.querystring("id")
%>
<html>
<head>
<title>@论坛 ->发布新帖子</title>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
<!--页面样式-->
<style type=text/css><!--td {font family:宋体;font-szie:9pt}body{ font-family:宋体;font-size:9pt}select{ font-family:宋体;font-size:9pt}A{text-decoration:none;font-family:宋体;font-size:9pt}A:hover{text-decoration:underline;color:#CC0000;font-family:"宋体";font-size:9pt};big{font-family:宋体;font-size:12pt}.text{font-family:"宋体";font-size:11pt}
--></style>
</head>
<body text="#000000" vlink="#000099" background="../images/tty.GIF">
<table width="100%" border=0 cellspacing=0 cellpadding=0 align=center>
<tr><td><b>发布新帖子:</font></td>
<!--放弃发表并返回-->
<td align=right><a href=javascript:history.back()>返回>></a></td></tr>
</table>
第29号:<form action=newplan.asp?action=new&owner=<%=owner%> method=post>
<table border=0 cellspacing=0 cellpadding=0 align=center width="755">
<tr><td align="right" width="60"><b>主题 : </b></td>
<!--输入帖子主题-->
<td height="26"><input name=topic size=71> </td>
<td width="180" height="26">主题最长30字</td></tr>
<tr><td align="right" width="40"> </td>
<td height="18"><b><img src=../images/parrot1.jpg width="18" height="15">
请 在 下 面 写 上 您 的 帖 子
<!--选择自己的性别-->
<input type=radio value=mycat name=owner>
<image src=../image/mycat.gif>
<input type=radio value=mycat name=owner>
<image src=image/mycat.gif></b></td><td height="18"></td></tr>
<tr><td width="40"> </td>
<!--输入帖子内容的文本编辑框-->
<td><textarea name=text cols=70 rows=15></textarea> </td>
<td align="center" width="180" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr><td colspan="4" height="20">选择一个表情</td></tr>
<!--下面定义了18种可供选择的表情图片,前面放置单选按钮-->
<tr><td colspan="4">
<input type=radio value=1 name=face checked><image src=../image/mycat.gif>
[此贴子已经被作者于2006-1-15 22:34:36编辑过]
不是啦,不难的,你以后也会的
应该没问题了吧