www.gusucode.com > 超文本多用户论坛程序 1.1 > bbs/htz.asp

    <!--#include file="conn.asp"-->
<!--#include file="gyhs.asp"-->
<%
'判断登陆
if dlhs=true then
%>
<script  language=vbscript>
<!--
window.alert"对不起!你还没有登陆"
window.location="index.asp?ltbh=<%=ltbh%>"
-->
</script>
<%end if%>
<head>
<title><%=request.cookies("mc")%></title>
<meta name="keywords" content="<%=request.cookies("gjz")%>">
</head>
<body topmargin=0>
<!--#include file="gyym.asp"-->
<table class="a2" cellSpacing="1" cellPadding="4" width="97%" align="center" border="0">
	<tr class="a3">
		<td height="25">&nbsp;<img src="imgs/Forum_nav.gif" width="9" height="9">&nbsp;<a href="index.asp?ltbh=<%=ltbh%>"><%=request.cookies("mc")%></a>&nbsp;>>&nbsp;回复文章
		>><a href="ShowPost.asp?ltbh=<%=ltbh%>&ids=<%=request("id")%>&id=<%=request("bk")%>&bt=<%=request("topic")%>">返回</a></td>
	</tr>
</table>
</p>
<script language=javascript>
function doSubmit(){
    // getHTML()为eWebEditor自带的接口函数,功能为取编辑区的内容
    if (eWebEditor1.getHTML()==""){
      alert("帖子内容不能为空!");
      return false;
    }
    document.myform.submit();
  }
</Script>
<SCRIPT>valigntop()</SCRIPT>
<table class="a2" cellSpacing="1" cellPadding="5" width="97%" align="center" border="0">
	<form action="htzcl.asp?act=D&ltbh=<%=ltbh%>&bkid=<%=request("bk")%>&bt=<%=request("topic")%>" method="post" name="myform">
	<input type=hidden name="id" value="<%=request("id")%>">
		<tr>
			<td class="a1" vAlign="left" colSpan="2" height="25"><b>回复文章 </b>>><%=request("topic")%> </td>
		</tr>
		<tr>
			<td class="a4" width="160" height="25"><b>用户名称</b></td>
			<td class="a4" width="574" height="25"><%=request.cookies("username")%> [<a href="tuichu.asp">退出登录</a>]</td>
		</tr>
		<tr>
			<td class="a4" align="left" colspan="2">
			<INPUT type="hidden" name="47"><IFRAME ID="eWebEditor1" SRC="eWebEditor/ewebeditor.asp?id=47&style=luntan" FRAMEBORDER="0" SCROLLING="no" WIDTH="100%" HEIGHT="350"></IFRAME>
			<p align=center>
			<input type=button name=btnSubmit value=" 回 复 " onclick="doSubmit()"> <input type=reset name=btnReset value=" 重 填 ">
			</td>
		</tr>
	</form>
</table>
<SCRIPT>valignbottom()</SCRIPT>
</p>
<%
call bq
dbjl.close
set dbjl=nothing
%><%dbclose%>