book.asp

网站整站

%>
<tr><td>
<form name="w" method="post" action="book.asp?action=goaddreply">
<table  border=0 cellpadding=2 width="100%" bgcolor="#ffffff">
<tr height="25">
<td align='center'>
<input type="button" value="粗 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" style="font-size:12px"  onclick="ubbAdd('[b][/b]',4)">
<input type="button" value="斜 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[i][/i]',4)">
<input type="button" value="下 划" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[u][/u]',4)">
<input type="button" value="链 接" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[url][/url]',6)">
<input type="button" value="图 片" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[img][/img]',6)">
<input type="button" value="代 码" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[code][/code]',7)">
<input type="button" value="脚 本" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[html][/html]',7)">
<input type="button" value="引 用" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'"  onclick="ubbAdd('[quote][/quote]',8)">
</td></tr>
<tr>
<td align="center">
<textarea  <%
if gobook<>"yes" then
if checklogined=false then 
response.write"disabled" 
end if
end if
%> name="content" class="text" style="width:98%;" cols="86" rows="11" onkeydown="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);" 
onkeyup="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);"></textarea>
</td></tr>
<tr>
<tr><td align="center"  height="30">
<input type="submit" name="replySubmit" value="回 复" <%
if gobook<>"yes" then
if checklogined=false then 
response.write"disabled" 
end if
end if
%> onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" /> 
<input type="hidden" name="bookid" value="<%=request.querystring("id")%>" /> 
<input type="reset" name="Submit2" value="重 写" onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" />&nbsp;
<select onChange="document.w.content.rows=this.options[this.selectedIndex].value;document.w.content.focus();">
<option selected value="12">11行</option>
<option value="19">18行</option>
<option value="24">25行</option>
<option value="33">32行</option>
</select>
&nbsp;最多字数：<input   class="input" disabled maxLength="4" size="5" value="60000" name="total" />&nbsp;&nbsp;已用字数：<input disabled maxLength="4" size="5" value="0" name="used"  class="input" />剩余字数：<input  class="input" disabled maxLength="4" size="5" value="60000" name="remain" />&nbsp;
</td></tr></table></form></td></tr></table>
</td><td class="666" nowrap></td></tr></table>
<%
re.close
set re=nothing
rsuser.close
set rsuser=nothing
rs.close
set rs=nothing
end sub
'┏━━━━━━┓
'┃发表留言主题┃
'┗━━━━━━┛
sub addbook()
	if gobook<>"yes" then
	if checklogined()=false then
YCGO("error.asp?action=back&text="&server.urlencode("系统无法识别您的身份!"))
response.end
	end if
	end if
YC("<table border=""0"" cellspacing=""0"" cellpadding=""0"" width=""100%""><tr><td class=""444"" nowrap></td><td class=""555"" valign=""top"" nowrap>")
%>
<form name="w" method="post" action="book.asp?action=goadd" onsubmit="return book();">
<table  border=0 cellpadding=0 width="100%" bgcolor="#ffffff">
<tr height="25">
<td>&nbsp;您的主题：<input <%
if gobook<>"yes" then
if checklogined=false then 
response.write"disabled" 
end if
end if
%> class="input" type="text" name="title" maxlength="80" style="width:400px" autocomplete="off" title="最多可以输入80个英文字符或40个汉字！" />&nbsp;<select  onchange="if(this.options.selectedIndex>0&&this.form.title.value.length<46)this.form.title.value=this.options[this.options.selectedIndex].text+this.form.title.value;this.options.selectedIndex=0;">
<option selected>话题..</option>
<option>[原创]</option>
<option>[转帖]</option>
<option>[灌水]</option>
<option>[帖吧]</option>
<option>[求助]</option>
<option>[推荐]</option>
<option>[公告]</option>
<option>[注意]</option>
<option>[建议]</option>
<option>[下载]</option>
<option>[分享]</option>
</select>&nbsp;<%call addcolor()%> 
&nbsp;需积分：<input class="input" type="text" name="exper" maxlength="10" style="width:30px" autocomplete="off" onKeypress="if(event.keyCode<45||event.keyCode>57)event.returnValue=false;" value="0" />
</td></tr>
<tr height="25">
<td align='center'>
<input type="button" value="粗 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" style="font-size:12px"  onclick="ubbAdd('[b][/b]',4)">
<input type="button" value="斜 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[i][/i]',4)">
<input type="button" value="下 划" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[u][/u]',4)">
<input type="button" value="链 接" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[url][/url]',6)">
<input type="button" value="图 片" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[img][/img]',6)">
<input type="button" value="代 码" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[code][/code]',7)">
<input type="button" value="脚 本" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[html][/html]',7)">
<input type="button" value="引 用" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'"  onclick="ubbAdd('[quote][/quote]',8)">
</td></tr>
<tr>
<td align="center">
<textarea onkeydown="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);" 
onkeyup="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);" name="content" class="text" style="width:98%;" cols="86" rows="11" <%
if gobook<>"yes" then
if checklogined=false then 
response.write"disabled" 
end if
end if
%>></textarea>
</td></tr>
<tr>
<tr><td   height="30">
&nbsp;&nbsp;&nbsp;&nbsp;验&nbsp;证&nbsp;码：<%if logincode="yes" then%><input class="input" name="code" type="text" size="7" maxlength="4" onKeypress="if(event.keyCode<45||event.keyCode>57)event.returnValue=false;"  />&nbsp;<img src="inc/code.asp" style="width:40px;height:15px" border="0" align="absmiddle" style="cursor:pointer;" onclick="this.src='inc/code.asp'" alt="请点击刷新验证码"  /><%else%>验证码已经关闭<%end if%>
<input type="submit" name="Submit" value="提 交" onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" <%
if gobook<>"yes" then
if checklogined=false then 
response.write"disabled" 
end if
end if
%> /> 
<input type="reset" name="Submit2" value="重 写" onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" <%
if gobook<>"yes" then
if checklogined=false then 
response.write"disabled" 
end if
end if
%> />
<select onChange="document.w.content.rows=this.options[this.selectedIndex].value;document.w.content.focus();">
<option selected value="12">11行</option>
<option value="19">18行</option>
<option value="24">25行</option>
<option value="33">32行</option>
</select>
&nbsp;最多字数：<input   class="input" disabled maxLength="4" size="5" value="60000" name="total" />&nbsp;&nbsp;已用字数：<input disabled maxLength="4" size="5" value="0" name="used"  class="input" />剩余字数：<input  class="input" disabled maxLength="4" size="5" value="60000" name="remain" />&nbsp;
</td></tr></table></form>
<%
YC("</td><td class=""666"" nowrap></td></tr></table>")
end sub
'┏━━━━━━┓
'┃编辑留言主题┃
'┗━━━━━━┛
sub editbook()
	if checklogined()=false then
YCGO("error.asp?action=back&text="&server.urlencode("系统无法识别您的身份!"))
response.end
	end if
YC("<table border=""0"" cellspacing=""0"" cellpadding=""0"" width=""100%""><tr><td class=""444"" nowrap></td><td class=""555"" valign=""top"" nowrap>")
sqleditbook="select id,title,color,exper,content from [YC_book] where id="&request.querystring("id")
set rs=conn.execute(sqleditbook)
%>
<form name="w" method="post" action="book.asp?action=goeditbook" onsubmit="return book();">
<table  border=0 cellpadding=2 width="100%" bgcolor="#ffffff">
<tr height="23">
<td>&nbsp;您的主题：<input class="input" type="text" name="title" maxlength="80" style="width:200px" autocomplete="off" value="<%=rs("title")%>" title="最多可以输入80个英文字符或40个汉字！" />&nbsp;<select  onchange="if(this.options.selectedIndex>0&&this.form.title.value.length<46)this.form.title.value=this.options[this.options.selectedIndex].text+this.form.title.value;this.options.selectedIndex=0;">
<option selected>话题..</option>
<option>[原创]</option>
<option>[转帖]</option>
<option>[灌水]</option>
<option>[帖吧]</option>
<option>[求助]</option>
<option>[推荐]</option>
<option>[公告]</option>
<option>[注意]</option>
<option>[建议]</option>
<option>[下载]</option>
<option>[分享]</option>
</select>&nbsp;<select name="color" class="yecao">
<option value="#000000" <%if rs("color")="#000000" then YC("selected")%>>黑色</option>
<option value="#FF0000" <%if rs("color")="#FF0000" then YC("selected")%>>红色</option>
<option value="#0000FF" <%if rs("color")="#0000FF" then YC("selected")%>>蓝色</option>
<option value="#FF8000" <%if rs("color")="#FF8000" then YC("selected")%>>橙色</option>
<option value="#00C600" <%if rs("color")="#00C600" then YC("selected")%>>绿色</option>
<option value="#8080C0" <%if rs("color")="#8080C0" then YC("selected")%>>紫色</option>
<option value="#FF0080" <%if rs("color")="#FF0080" then YC("selected")%>>洋红</option>
</select>
&nbsp;需积分：<input class="input" type="text" name="exper" maxlength="10" style="width:30px" autocomplete="off" onKeypress="if(event.keyCode<45||event.keyCode>57)event.returnValue=false;"  value="<%=rs("exper")%>" /> 
</td></tr>
<tr height="25">
<td align='center'>
<input type="button" value="粗 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" style="font-size:12px"  onclick="ubbAdd('[b][/b]',4)">
<input type="button" value="斜 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[i][/i]',4)">
<input type="button" value="下 划" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[u][/u]',4)">
<input type="button" value="链 接" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[url][/url]',6)">
<input type="button" value="图 片" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[img][/img]',6)">
<input type="button" value="代 码" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[code][/code]',7)">
<input type="button" value="脚 本" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[html][/html]',7)">
<input type="button" value="引 用" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'"  onclick="ubbAdd('[quote][/quote]',8)">
</td></tr>
<tr>
<td align="center">
<textarea name="content" class="text" style="width:98%;" cols="86" rows="11" onkeydown="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);" 
onkeyup="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);"><%=rs("content")%></textarea>
</td></tr>
<tr><td align="center"  height="30">
<input type="hidden" name="bookid" value="<%=rs("id")%>" /> 
<input type="submit" name="Submit" value="编 辑" onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" /> 
<input type="reset" name="Submit2" value="重 写" onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" />&nbsp;&nbsp;最多字数：<input   class="input" disabled maxLength="4" size="5" value="60000" name="total" />&nbsp;&nbsp;已用字数：<input disabled maxLength="4" size="5" value="0" name="used"  class="input" />剩余字数：<input  class="input" disabled maxLength="4" size="5" value="60000" name="remain" />&nbsp;
<select onChange="document.w.content.rows=this.options[this.selectedIndex].value;document.w.content.focus();">
<option selected value="12">11行</option>
<option value="19">18行</option>
<option value="24">25行</option>
<option value="33">32行</option>
</select>
</td></tr></table></form>
<%
YC("</td><td class=""666"" nowrap></td></tr></table>")
end sub
'┏━━━━━━┓
'┃编辑回复留言┃
'┗━━━━━━┛
sub editreplybook()
YC("<table border=""0"" cellspacing=""0"" cellpadding=""0""  width=""100%""><tr><td class=""444"" nowrap></td><td class=""555"" valign=""top"" nowrap>")
sqleditreplybook="select id,title,bookid,content from [YC_bookreply] where id="&request.querystring("id")
set rs=conn.execute(sqleditreplybook)
%>
<form name="w" method="post" action="book.asp?action=goeditreply">
<table  border=0 cellpadding=2 width="100%" bgcolor="#ffffff">
<tr height="25">
<td align='center'>
<input type="button" value="粗 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" style="font-size:12px"  onclick="ubbAdd('[b][/b]',4)">
<input type="button" value="斜 体" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[i][/i]',4)">
<input type="button" value="下 划" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[u][/u]',4)">
<input type="button" value="链 接" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[url][/url]',6)">
<input type="button" value="图 片" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[img][/img]',6)">
<input type="button" value="代 码" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[code][/code]',7)">
<input type="button" value="脚 本" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'" onclick="ubbAdd('[html][/html]',7)">
<input type="button" value="引 用" class="put" onmouseover="this.className='overput'" onmouseout="this.className='put'"  onclick="ubbAdd('[quote][/quote]',8)">
</td></tr>
<tr>
<td align="center">
<textarea name="content" class="text" style="width:98%;" cols="86" rows="11" onkeydown="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);" 
onkeyup="bookcount(this.form.content,this.form.total,this.form.used,this.form.remain);"><%=rs("content")%></textarea>
</td></tr>
<tr><td align="center"  height="30">
<input type="submit" name="replySubmit" value="回 复" onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" /> 
<input type="hidden" name="bookid" value="<%=rs("bookid")%>" /> 
<input type="hidden" name="id" value="<%=rs("id")%>" /> 
<input type="reset" name="Submit2" value="重 写" onmouseover="this.className='overput'" onmouseout="this.className='put'" class="put" />&nbsp;&nbsp;最多字数：<input   class="input" disabled maxLength="4" size="5" value="60000" name="total" />&nbsp;&nbsp;已用字数：<input disabled maxLength="4" size="5" value="0" name="used"  class="input" />剩余字数：<input  class="input" disabled maxLength="4" size="5" value="60000" name="remain" />&nbsp;
<select onChange="document.w.content.rows=this.options[this.selectedIndex].value;document.w.content.focus();">
<option selected value="12">11行</option>
<option value="19">18行</option>
<option value="24">25行</option>
<option value="33">32行</option>
</select>
</td></tr></table></form>
<%
YC("</td><td class=""666"" nowrap></td></tr></table>")
end sub
%>