newfile_news.asp

仿雅虎论坛静态生成html版 后台管理：admin/admin.asp 用户名：admin 密码：admin TOP/top.htm 顶部模板 left.htm 左边树形菜单模板

   set textStream = fileStreamObj.OpenTextFile(myFile,ForWriting,False)
   textStream.Write(nl)
   textStream.Close()
   Application.unlock
  '---------------清除首页缓存页面
   Application.Lock
   Application(BBSname&boardname+"bs")=Application(BBSname&boardname+"bs")+1
   Application(BBSname&"index")=""
   Application(BBSname&boardname)=""
   Application.UnLock
   Set rs=conn.execute("select id,所属分类ID,所属分类,版面名称,版面状态,访问控制,版面介绍,版主,主题总数,回复总数,版面标记图片,版面最后发帖,认证论坛用户 from 版面分类 ")
   if not (rs.bof and rs.eof) then Application(BBSname&"BT_Board")=rs.GetRows(-1) end if
   rs.close
   set rs=nothing
   AccessNum=AccessNum+1
%>
 <center><br><br><br>
 主题添加完成<meta HTTP-EQUIV=refresh Content='3;url=bbs<%=Bmid%>/<%=titlefilename%>'>
 &nbsp;<a href=dislist.asp?boardname=<%=boardname%>&boardid=<%=Bmid%>>返回到主题列表</a>&nbsp;
 <a href=bbs<%=Bmid%>/<%=titlefilename%>>返回到主题</a>
 <br><br><br><br></center>
<%
else
 if login="Y" then
%>

<script>
    var ValidationPassed = true;
	function ctlkey()
	{
		if(event.ctrlKey && window.event.keyCode==13){if(ValidationPassed)document.newfile.submit();}
		if(event.altKey && (window.event.keyCode==83 || window.event.keyCode==115)){if(ValidationPassed)document.newfile.submit();}
	}
	function changemode(mode)
	{
		if(ValidationPassed == true)
		{

			document.newfile.submit();
		}
	}
	var ie = (document.all)? true:false
	if (ie)
	{
		window.document.onkeydown=ctlkey;
	}
  </script>

 <form name=newfile  method="post" action="newfile_news.asp?boardid=<%=Bmid%>&boardname=<%=boardname%>">
 <table width=743><tr><td><a href=index.asp><font class=NavColor>论坛首页</font></a>>> <a href=index.asp?bbsid=<%=bbsid%>><font class=NavColor><%=Flname%></a>  >>  </font><a href=dislist.asp?boardid=<%=Bmid%>><font class=NavColor><%=boardname%></font></a>  >>  新帖子</font></td></tr></table>
 <table border=1 width=743 cellspacing=0 cellpadding=0 align=center class=table1>
   <tr><td class=light1>&nbsp;<b>*帖子类型</b></td><td class=light>
   <form name="myform">
   <select name="select" size="1" onchange="location=this.options[this.selectedIndex].value">
   <option value="newfile_news.asp?boardid=<%=Bmid%>">新闻格式</option>
   <option value="newfile.asp?boardid=<%=Bmid%>">普通论坛帖子</option>
   <option value="NewPoll.asp?boardid=<%=Bmid%>">投票帖子</option>
   </select>
   </td></tr>
   <tr><td class=light1>&nbsp;<b>*用户名</b></td><td class=light><INPUT class=fminpt name=username type=text size=30 value=<%=username%>></td></tr>
   <tr><td class=light1>&nbsp;&nbsp;<b>密&nbsp;&nbsp;码</b></td><td class=light><INPUT class=fminpt name=password type=password size=30></td></tr>
   <tr><td width=150 class=light1>
   <table border=0><tr><td><b>*标&nbsp;&nbsp;题</b></td><td>
   <SELECT name=font onchange="document.newfile.titlename.value=this.value+document.newfile.titlename.value;">
	              <OPTION selected value="">选择话题<OPTION value=[原创]>[原创] 
	              <OPTION value=[转帖]>[转帖] <OPTION value=[灌水]>[灌水] 
	              <OPTION value=[讨论]>[讨论] <OPTION value=[求助]>[求助] 
	              <OPTION value=[推荐]>[推荐] <OPTION value=[公告]>[公告] 
	              <OPTION value=[注意]>[注意] <OPTION value=[贴图]>[贴图]
	              <OPTION value=[建议]>[建议] <OPTION value=[下载]>[下载]
	              <OPTION value=[分享]>[分享]
   </SELECT></td></tr></table>
   </td><td class=light>
   <INPUT class=fminpt name=titlename type=text size=60>&nbsp;最长<%=TitleLen%>个字符</td></tr>
   <tr><td class=light1>&nbsp;<b>发帖表情</b></td><td class=light>
   <table><tr><td><input name=ftbq type=radio value=FACE1.gif></td><td><img src=../images/ftbq/FACE1.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE2.gif></td><td><img src=../images/ftbq/FACE2.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE3.gif></td><td><img src=../images/ftbq/FACE3.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE5.gif></td><td><img src=../images/ftbq/FACE5.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE6.gif></td><td><img src=../images/ftbq/FACE6.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE7.gif></td><td><img src=../images/ftbq/FACE7.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE15.gif></td><td><img src=../images/ftbq/FACE15.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE16.gif></td><td><img src=../images/ftbq/FACE16.gif>&nbsp;</td></tr><tr><td><input name=ftbq type=radio value=FACE8.gif></td><td><img src=../images/ftbq/FACE8.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE9.gif></td><td><img src=../images/ftbq/FACE9.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE12.gif></td><td><img src=../images/ftbq/FACE12.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE13.gif></td><td><img src=../images/ftbq/FACE13.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE14.gif></td><td><img src=../images/ftbq/FACE14.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE4.gif></td><td><img src=../images/ftbq/FACE4.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE11.gif></td><td><img src=../images/ftbq/FACE11.gif>&nbsp;</td><td><input name=ftbq type=radio value=FACE10.gif></td><td><img src=../images/ftbq/FACE10.gif>&nbsp;</td></tr></table>
   </td></tr>

              <tr>
          <td width="150" height="30" class=light1>&nbsp;<b>UBB标签：</b></td>
          <td height="30" class=light>
<img onclick=bold() src="pic/icon_editor_bold.gif" width="22" height="22" alt="粗体" border="0">
<img onclick=italicize() src="pic/icon_editor_italicize.gif" width="23" height="22" alt="斜体" border="0">
<img onclick=underline() src="pic/icon_editor_underline.gif" width="23" height="22" alt="下划线" border="0">
<img onclick=center() src="pic/icon_editor_center.gif" width="22" height="22" alt="居中" border="0">
<img onclick=hyperlink() src="pic/icon_editor_url.gif" width="22" height="22" alt="超级连接" border="0">
<img onclick=email() src="pic/icon_editor_email.gif" width="23" height="22" alt="Email连接" border="0">
<img onclick=image() src="pic/icon_editor_image.gif" width="23" height="22" alt="图片" border="0">
<img onclick=flash() src="pic/swf.gif" width="23" height="22" alt="Flash图片" border="0">
<img onclick=showcode() src="pic/icon_editor_code.gif" width="22" height="22" alt="编号" border="0">
<img onclick=quote() src="pic/icon_editor_quote.gif" width="23" height="22" alt="引用" border="0">
<img onclick=list() src="pic/icon_editor_list.gif" width="23" height="22" alt="目录" border="0">
<IMG onclick=setfly() height=22 alt=飞行字 src="pic/fly.gif" width=23 border=0>
<IMG onclick=move() height=22 alt=移动字 src="pic/move.gif" width=23 border=0>
<IMG onclick=glow() height=22 alt=发光字 src="pic/glow.gif" width=23 border=0>
<IMG onclick=shadow() height=22 alt=阴影字 src="pic/shadow.gif" width=23 border=0>
<img onclick=Cdir() src="pic/Shockwave.gif" width="23" height="22" alt="Shockwave文件" border="0">
<img onclick=Crm() src="pic/rm.gif" width="23" height="22" alt="realplay视频文件" border="0">
<img onclick=Cwmv() src="pic/mp.gif" width="23" height="22" alt="Media Player视频文件" border="0">
<img onclick=Cmov() src="pic/qt.gif" width="23" height="22" alt="QuickTime视频文件" border="0">
<img onclick=Csound() src="pic/csound.gif" width="23" height="22" alt="背景音乐" border="0">
<br>
可授限资源
<input type=Button name=fj value="影视" onclick=window.open("WriteTopic.asp?lx=1","","width=300,height=330")>
<input type=Button name=fj value="音乐" onclick=window.open("WriteTopic.asp?lx=2","","width=300,height=330")>
<input type=Button name=fj value="下载" onclick=window.open("WriteTopic.asp?lx=3","","width=300,height=330")>
<br><br>
字体：
				<SELECT onchange=showfont(this.options[this.selectedIndex].value) name=font>
                                <option value="宋体" selected>宋体</option>
				<option value="楷体_GB2312">楷体</option>
				<option value="新宋体">新宋体</option>
				<option value="黑体">黑体</option>
				<option value="隶书">隶书</option>
                                <OPTION value="Andale Mono">Andale Mono</OPTION> 
                                <OPTION value=Arial>Arial</OPTION> 
                                <OPTION value="Arial Black">Arial Black</OPTION> 
                                <OPTION value="Book Antiqua">Book Antiqua</OPTION>
                                <OPTION value="Century Gothic">Century Gothic</OPTION> 
                                <OPTION value="Comic Sans MS">Comic Sans MS</OPTION>
                                <OPTION value="Courier New">Courier New</OPTION>
                                <OPTION value=Georgia>Georgia</OPTION>
                                <OPTION value=Impact>Impact</OPTION>
                                <OPTION value=Tahoma>Tahoma</OPTION>
                                <OPTION value="Times New Roman" >Times New Roman</OPTION>
                                <OPTION value="Trebuchet MS">Trebuchet MS</OPTION>
                                <OPTION value="Script MT Bold">Script MT Bold</OPTION>
                                <OPTION value=Stencil>Stencil</OPTION>
                                <OPTION value=Verdana>Verdana</OPTION>
                                <OPTION value="Lucida Console">Lucida Console</OPTION>
                                </SELECT>&nbsp;&nbsp;&nbsp;&nbsp;
字体大小<select name="size" onChange="showsize(this.options[this.selectedIndex].value)">
	<option value="1">1</option>
	<option value="2">2</option>
	<option value="3" selected>3</option>
	<option value="4">4</option>
</select>
                                &nbsp;&nbsp;&nbsp;<font face="宋体" color=#333333>颜色：</font>
              <SELECT onchange=showcolor(this.options[this.selectedIndex].value) name=color> 
              <option style="background-color:#F0F8FF;color: #F0F8FF" value="#F0F8FF">#F0F8FF</option>
	      <option style="background-color:#FAEBD7;color: #FAEBD7" value="#FAEBD7">#FAEBD7</option>
	      <option style="background-color:#00FFFF;color: #00FFFF" value="#00FFFF">#00FFFF</option>
              <option style="background-color:#7FFFD4;color: #7FFFD4" value="#7FFFD4">#7FFFD4</option>
              <option style="background-color:#F0FFFF;color: #F0FFFF" value="#F0FFFF">#F0FFFF</option>
              <option style="background-color:#F5F5DC;color: #F5F5DC" value="#F5F5DC">#F5F5DC</option>
              <option style="background-color:#FFE4C4;color: #FFE4C4" value="#FFE4C4">#FFE4C4</option>
              <option style="background-color:#000000;color: #000000" value="#000000">#000000</option>
              <option style="background-color:#FFEBCD;color: #FFEBCD" value="#FFEBCD">#FFEBCD</option>
              <option style="background-color:#0000FF;color: #0000FF" value="#0000FF">#0000FF</option>
              <option style="background-color:#8A2BE2;color: #8A2BE2" value="#8A2BE2">#8A2BE2</option>