<%
sub showForm()
dim e
%>
<form action="SaveAnnounce.asp?boardID=<%=request("boardid")%>" method="POST" onSubmit="submitonce(this)" name="frmAnnounce">
<div align="center"><center>
<script src="inc/ubbcode2.js"></script>
<table bgColor="<%=Tablebackcolor%>" cellpadding=0 cellspacing=0 border=0 width="<%=TableWidth%>" cellspacing="0">
    <tr>
      <td width="100%">
<table cellpadding=3 cellspacing=1 border=0 width=100%>
    <tr>
      <td width="100%" bgcolor="<%=Tabletitlecolor%>" colspan=2><div align="left"><font color="<%=TableFontcolor%>"><p>&nbsp;&nbsp;<b>*为必填项目 <%=boardstat%></b></font></td>
    </tr>
<%if membername="" then%>
        <tr bgcolor="<%=TablebodyColor%>">
          <td width="20%"><font color="<%=TableContentcolor%>"><b>用户名</b></font></td>
          <td width="80%"><input name="username" value="<%if membername<>"" then%><%=htmlencode(membername)%><%else%><%if boardskin=2 then response.write "客人"%><%end if%>" class=FormClass>&nbsp;&nbsp;<font color="<%=AlertFontColor%>"><b>*</b></font><a href=reg.asp><font color="<%=TableContentcolor%>">您没有注册？</font></a> 
          </td>
        </tr>
        <tr bgcolor="<%=TablebodyColor%>">
          <td width="20%"><font color="<%=TableContentcolor%>"><b>密码</b></td>
          <td width="80%"><input name="passwd" type="password" value="<%=htmlencode(memberword)%>" class=FormClass><font color="<%=AlertFontColor%>">&nbsp;&nbsp;<b>*</b></font><a href=lostpass.asp><font color="<%=TableContentcolor%>">忘记密码？</font></a></td>
        </tr>
<%end if%>
        <tr bgcolor="<%=TablebodyColor%>">
          <td width="20%"><font color="<%=TableContentcolor%>"><b>主题标题</b>
              <SELECT name=font onchange=DoTitle(this.options[this.selectedIndex].value)>
              <OPTION selected value="">选择话题</OPTION> <OPTION value=[原创]>[原创]</OPTION> 
              <OPTION value=[转帖]>[转帖]</OPTION> <OPTION value=[灌水]>[灌水]</OPTION> 
              <OPTION value=[讨论]>[讨论]</OPTION> <OPTION value=[求助]>[求助]</OPTION> 
              <OPTION value=[推荐]>[推荐]</OPTION> <OPTION value=[公告]>[公告]</OPTION> 
              <OPTION value=[注意]>[注意]</OPTION> <OPTION value=[贴图]>[贴图]</OPTION>
              <OPTION value=[建议]>[建议]</OPTION> <OPTION value=[下载]>[下载]</OPTION>
              <OPTION value=[分享]>[分享]</OPTION><OPTION value=[提问]>[提问]</OPTION></SELECT>
	  </td>
		            <td width="80%"><font color="<%=TableContentcolor%>"><input name="subject" size=60 maxlength=80 class=FormClass>&nbsp;&nbsp;<font color="<%=AlertFontColor%>"><strong>*</strong></font>不得超过 50 个汉字</font>
<INPUT TYPE="hidden" name="boardtype" value="<%=htmlencode(boardtype)%>">
<INPUT TYPE="hidden" name="skin" value="<%=request("skin")%>">
	 </td>
        </tr>
        <tr bgcolor="<%=TablebodyColor%>">
          <td width="20%" valign="top"><font color="<%=TableContentcolor%>"><b>当前心情</b><br><li>将放在帖子的前面<BR></font></td>
          <td width="80%">
<%for i=1 to 9%>
	<input type="radio" value="face<%=i%>" name="Expression" <%if i=1 then response.write "checked"%>><img src="face/face<%=i%>.gif" WIDTH="15" HEIGHT="15">&nbsp;&nbsp;
<%next%>
<br>
<%for i=10 to 18%>
	<input type="radio" value="face<%=i%>" name="Expression"><img src="face/face<%=i%>.gif" WIDTH="15" HEIGHT="15">&nbsp;&nbsp;
<%next%>
<br>
 </td>
        </tr>
        <tr bgcolor="<%=TablebodyColor%>">
          <td width="20%" valign=top rowspan="2"><font color="<%=TableContentcolor%>">
<b>内容</b><br><br>
在此论坛中<br>
<li>HTML标签： <%if strAllowHTML=0 then%>不可用<%else%>允许<%end if%>
<li>UBB标签： <%if strAllowForumCode=0 then%>不可用<%else%>允许<%end if%>
<li>帖图标签： <%if strIcons=0 then%>不可用<%else%>允许<%end if%>
<li>Flash标签： <%if strflash=0 then%>不可用<%else%>允许<%end if%>
<li>表情字符转换： <%if strIMGInPosts=0 then%>不可用<%else%>允许<%end if%>
<li>上传图片： <%if Uploadpic=0 then%>不可用<%else%>允许<%end if%>
<li>最多<%=AnnounceMaxBytes\1024%>KB</font>
	  </td>
          <td width="80%" height="256">
<% if Uploadpic=1 then %>
<iframe name="ad" frameborder=0 width=100% height=30 scrolling=no src=saveannounce_upload.asp?boardid=<%=boardid%>></iframe> 
<font color="<%=TableContentcolor%>">点击复制上传的文件地址：</font><INPUT id=agent onclick="this.select();window.clipboardData.setData('text',this.value);alert('已经复制文件地址到剪贴板，在发帖中插入即可，不用带“http：//”')"size=49
name=upload size="40"><font color="<%=TableContentcolor%>"> </font> 
<br>
<% end if %>
<%if TopicFlag=1 then%>
<%end if%>&nbsp;<input type="hidden" name="content" value="">


<script type="text/javascript" src="./KindEditor.js"></script>
<script type="text/javascript">
var editor = new KindEditor("editor");
editor.hiddenName = "content";
editor.editorWidth = "700px";
editor.editorHeight = "400px";
editor.show();
function kSubmit() {
  editor.data()
}
</script>
          </td>
        </tr>
		<tr>
          <td width="80%" bgcolor="<%=TablebodyColor%>">
　</td>
        </tr>
                <tr bgcolor="<%=TablebodyColor%>">
                <td valign=top><font color="<%=TableContentcolor%>"><b>选项</b><p><a href="boardhelp.asp?boardid=<%=boardid%>"><img src="<%=picurl%>help_b.gif" border=0></a></font></td>
                <td valign=middle><font color="<%=TableContentcolor%>"><input type=checkbox name="signflag" value="yes" checked>是否显示您的签名？<br>
                <input type=checkbox name="emailflag" value="yes">有回复时使用邮件通知您？</font>
<BR><BR></td>
                </tr><tr bgcolor="<%=TablebodyColor%>">
                <td valign=middle colspan=2 align=center><font color="<%=TableContentcolor%>">
                <input type=submit value="  发 表  " name=Submit onclick=kSubmit()> &nbsp; 
				<input type=button value='  预 览  ' name=Button onclick="goopreview()">&nbsp;&nbsp;
<input type="reset" name="Submit2" value="  清 除  ">
                </td></form></tr>
      </table>
      </td>
    </tr>
  </table>
  </center></div>
</form>
		<form name=preview action=preview.asp method=post target=preview_page>
		<input type=hidden name=title value=""><input type=hidden name=body value="">
		</form>
		<script>
		function goopreview()
		{
		editor.data()
		document.forms[1].title.value=document.forms[0].subject.value;
		document.forms[1].body.value=document.forms[0].content.value;
		var popupWin = window.open('preview.asp', 'preview_page', 'scrollbars=yes,width=750,height=450');
		document.forms[1].submit()
		
		}
		</script>
<%
	end sub
%>