<%
'定义发帖编辑器区域
Function getPostForm(isPost)
If isPost=1 Then 
	checkname="postCheck"
	codename="index"
	submitname="主题"
Else
	checkname="reCheck"
	codename="back"
	submitname="回复"
End If 
	postform="<!-- 发帖编辑区开始 --><script type=""text/javascript"" charset=""utf-8"" src=""images/xheditor-zh-cn.js""></script><script type=""text/javascript"" src=""images/ubb.js""></script>"& vbCrlf
	postform=postform&"<script type=""text/javascript"">$(pageInit);var editor,dd;function pageInit(){$('#content').xheditor(true,{tools:'mini',forcePtag:false,showBlocktag:false,beforeSetSource:ubb2html,beforeGetSource:html2ubb"
	if Dreamsun_Name<>"" Then postform=postform & ubbupload
	postform=postform&"});editor=$('#content').xheditor(true)[0].objxhe;}</script>"
	postform=postform&"	<TABLE class=""m15"" width=""95%"" align=center border=0><TR><TD align=left valign=top><B>发布文章须知：</B><BR>1、发布文章请遵守《计算机信息网络国际联网安全保护管理办法》、《互联网信息服务管理办法》、 《互联网电子公告服务管理规定》、《维护互联网安全的决定》等法律法规。<BR><BR>2、请对您的言论负责，我们将保留您的上网记录和发帖信息。<BR><BR>3、在此发布文章表示认同我们的条款，我们有权利对您的言论进行审核、删除或者采取其他在法律、地方法规等条款规定之内的管理操作。 </TD><TD  width=650><form name=""save"" method=""post"" action=""tzsave.asp?cz=addsave"" onSubmit=""return "&checkname&"(this);""><TABLE width=""100%"">"
	If isPost=1 Then 
		postform=postform&"<TR><TD width=80>　　分类：</TD><TD>"&BoardSelect(BoardID)&""
		If IsAdmin>0 Then postform=postform&"&nbsp;&nbsp;回复： <input name=""isRe"" type=""radio"" id=""isRe1"" value=""1"" checked><label for=""isRe1"">允许</label><input name=""isRe"" type=""radio"" id=""isRe2"" value=""0""><label for=""isRe2"">不允许</label>"
		postform=postform&"</TD></TR><TR><TD>　　标题：</TD><TD><input name=""title"" type=""text"" id=""title"" size=""40""  maxlength=""50"" value="""">"
		If IsAdmin>0 Then
			postform=postform&" 字体：<input type=""radio"" name=""titleBold"" value=""0"" checked id=""titleBold1""><label for=""titleBold1"">正常</label><input type=""radio"" name=""titleBold"" value=""1""  id=""titleBold2""><label for=""titleBold2"">粗体</label> &nbsp;<select name=""titlecolor""><option value="""">标题醒目</option>"
                For i=0 To UBound(TitleColorArray)
				postform=postform&"<option style=""COLOR: "&TitleColorArray(i)&""" value="""&TitleColorArray(i)&""">"&TitleColorArray(i)&"</option>"
			Next
			postform=postform&"</select>"
		End If
		postform=postform&"</TD></TR>"
		Else
		postform=postform&"<input name=""ycid"" id=""ycid"" type=""hidden"" value="""&id&""" />"
	End If 
	postform=postform&"<TR><TD>　　内容：</TD><TD><textarea id=""content"" name=""content"" rows=""10"" cols=""70"" class=""ubbeditor""></textarea></TD></TR>"& vbCrlf
	If Dreamsun_name="" Then
			
		postform=postform&"<TR><TD>验证：</TD><TD><input name=""zd_code"" type=""text"" id=""zd_code"" size=""8"" maxlength=""4""  onFocus=""document.all.checkcode.src='inc/GetCode.asp?a="&codename&"&s='+Math.random()""/> <img id='checkcode' src='images/circle.gif' alt='验证码,看不清楚?请点击刷新验证码' style='cursor : pointer;' onclick=""src='inc/GetCode.asp?a="&codename&"&s='+Math.random()""/> * 匿名发表需要进行验证！<input type=""Submit"" name=""Submit"" id=""Submit"" value=""发表"&submitname&"帖子"" /></TD></TR>"
	Else
		postform=postform&"<TR><TD></TD><TD><input name=""zd_code"" type=""hidden"" id=""zd_code"" value=""dreamsun""/>尊敬的会员<span class=hot>"&Dreamsun_name&"</span>，欢迎您发布文章！"
		If IsAdmin>1 Then postform=postform&"<input name=""isRemote"" id=""isRemote"" type=""checkbox"" value=""1"" /><label for=""isRemote"">远程存图</label>"
		postform=postform&" <input type=""Submit"" name=""Submit"" id=""Submit"" value=""发表"&submitname&"帖子"" />"
		If isPost=1 And Sys_isReView=1 Then postform=postform&"<BR>发帖道具：<a href=""javascript:;"" onclick=""editor.pasteHTML('<hr class=replyview />这里替换为回复可见内容，仅对主题帖子有效，回复无效！<hr class=replyview />');"">回复可见</a>"
		postform=postform&"</TR>"
	End If 
	getPostForm=postform&"</TABLE></form></TD></TR></TABLE><!-- 发帖编辑区结束 -->"
End Function 

%>