📄 hipbbs.asp
字号:
bbscont=replace(bbscont,"[xx(]"," <img src=facepic/main_16.gif border=0 align=absmiddle> ")
bbscont=replace(bbscont,"[8)]"," <img src=facepic/main_17.gif border=0 align=absmiddle> ")
bbscont=replace(bbscont,"[:-]"," <img src=facepic/main_18.gif border=0 align=absmiddle> ")
bbscont=replace(bbscont,"[:F]"," <img src=facepic/main_19.gif border=0 align=absmiddle> ")
bbscont=replace(bbscont,"[:$]"," <img src=facepic/main_20.gif border=0 align=absmiddle> ")
response.Write("<tr><td height=25></td>"&_
"<td valign=middle>"&bbscont&"</td>"&_
"</tr>")
bbsRS.movenext
i=i+1
loop
end if%>
</table>
<table width="520" border=0 cellspacing=3 cellpadding=0 align="center">
<tr bgcolor=CCF4B9>
<%
response.Write("<form action="&filename&" method='post' name='tiaozhuan2' target='_self'>"&_
"<td height=24> 总共有评论：<font color=""red"">"&totalPut&"</font> 条 "&_
"<font color=""red"">"¤tpage&"/"&TotalPages&"</font> 页 ")
if currentpage<2 then
response.write ("<font color='999966'>首页 上一页</font> ")
else
response.write ("<a href="&filename&"?page=1&>首页</a> "&_
"<a href="&filename&"?page="&CurrentPage-1&">上一页</a> ")
end if
if TotalPages-currentpage<1 then
response.write ("<font color='999966'>下一页 尾页</font>")
else
response.write ("<a href="&filename&"?page="&(CurrentPage+1))
response.write (">下一页</a> <a href="&filename&"?page="&TotalPages&">尾页</a>")
end if
response.write (" 转到第 "&_
"<input style=""font-size:10px;height:17px;BACKGROUND-COLOR: #99FFCC;"" value='页码' type=text name=""page"" size=3 onFocus=""this.value=''"">页"&_
" <input name='submit' type=submit STYLE=""BORDER-RIGHT: #000000 1px solid;height:17px; BORDER-TOP: #000000 1px solid; BORDER-LEFT: #000000 1px solid;font-size:11px; COLOR: #000000; BORDER-BOTTOM: #000000 1px "&_
"solid; BACKGROUND-COLOR: #99FFCC"" value=""确 定""></td></form>")
%>
</tr></table>
<br style="line-height:7px;">
<table width="517" border=0 cellpadding=3 cellspacing=1 bgcolor="#C6C6C6" align="center">
<tr>
<form action="savebbs.asp" method="post" name="bbsform" onSubmit="return bbssent();">
<td align=center bgcolor="F7F7F7">
<table width=500 height=39 border=0 cellpadding=2 cellspacing=0>
<tr>
<td width=59><img src="images/pen.gif" width=30 height=30></td>
<td width=218><font color="#246F00"><strong>发表留言：</strong></font><br>
<td width="211" align=right valign=bottom><a name="facemotion" style="cursor:hand;color:#00aaff" onClick="MM_showHideLayers('Layer1','','show');" onMouseOver="facemotion.style.color='#ff3333';" onMouseOut="facemotion.style.color='#00aaff';">选择表情</a>
<div id="Layer1" style="visibility: hidden;position:absolute; width:124px; height:122px; z-index:20; left: expression(facemotion.getBoundingClientRect().left+45+document.body.scrollLeft); top: TOP: expression(facemotion.getBoundingClientRect().top+document.body.scrollTop);">
<table width="120" height="100%" border="2" cellpadding="0" cellspacing="0">
<tr>
<td width="65">
<table width="120" border="0" cellspacing="0" cellpadding="0" bgcolor="#00CCFF">
<tr>
<td colspan="5"><img src="images/xiaoIE.gif" width="120" height="18" border="0" usemap="#Map"></td>
</tr>
<tr align="center">
<td height="25"><a name="face1" style="cursor:hand;" onClick="biaoqing('[:)]')"><img src="facepic/main_1.gif" border="0" alt="微笑"></a></td>
<td><a name="face2" style="cursor:hand;" onClick="biaoqing('[:P]')"><img src="facepic/main_2.gif" border="0" alt="吐舌头"></a></td>
<td><a name="face3" style="cursor:hand;" onClick="biaoqing('[:V]')"><img src="facepic/main_3.gif" border="0" alt="不支持"></a></td>
<td><a name="face4" style="cursor:hand;" onClick="biaoqing('[8D]')"><img src="facepic/main_4.gif" border="0" alt="耍酷"></a></td>
<td><a name="face5" style="cursor:hand;" onClick="biaoqing('[P~]')"><img src="facepic/main_5.gif" border="0" alt="流口水"></a></td>
</tr>
<tr align="center">
<td height="25"><a name="face6" style="cursor:hand;" onClick="biaoqing('[:(]')"><img src="facepic/main_6.gif" border="0" alt="大哭"></a></td>
<td><a name="face7" style="cursor:hand;" onClick="biaoqing('[:X]')"><img src="facepic/main_7.gif" border="0" alt="Kiss"></a></td>
<td><a name="face8" style="cursor:hand;" onClick="biaoqing('[:O]')"><img src="facepic/main_8.gif" border="0" alt="吃惊"></a></td>
<td><a name="face9" style="cursor:hand;" onClick="biaoqing('[:A]')"><img src="facepic/main_9.gif" border="0" alt="天使"></a></td>
<td><a name="face10" style="cursor:hand;" onClick="biaoqing('[:>]')"><img src="facepic/main_10.gif" border="0" alt="不服气"></a></td>
</tr>
<tr align="center">
<td height="25"><a name="face11" style="cursor:hand;" onClick="biaoqing('[:D]')"><img src="facepic/main_11.gif" border="0" alt="大笑"></a></td>
<td><a name="face12" style="cursor:hand;" onClick="biaoqing('[:!(]')"><img src="facepic/main_12.gif" border="0" alt="愤怒"></a></td>
<td><a name="face13" style="cursor:hand;" onClick="biaoqing('[:?]')"><img src="facepic/main_13.gif" border="0" alt="疑问"></a></td>
<td><a name="face14" style="cursor:hand;" onClick="biaoqing('[:S]')"><img src="facepic/main_14.gif" border="0" alt="不舒服"></a></td>
<td><a name="face15" style="cursor:hand;" onClick="biaoqing('[|)]')"><img src="facepic/main_15.gif" border="0" alt="睡着了"></a></td>
</tr>
<tr align="center">
<td height="25"><a name="face16" style="cursor:hand;" onClick="biaoqing('[xx(]')"><img src="facepic/main_16.gif" border="0" alt="死翘翘"></a></td>
<td><a name="face17" style="cursor:hand;" onClick="biaoqing('[8)]')"><img src="facepic/main_17.gif" border="0" alt="害羞"></a></td>
<td><a name="face18" style="cursor:hand;" onClick="biaoqing('[:-]')"><img src="facepic/main_18.gif" border="0" alt="闭嘴"></a></td>
<td><a name="face19" style="cursor:hand;" onClick="biaoqing('[:F]')"><img src="facepic/main_19.gif" border="0" alt="郁闷"></a></td>
<td><a name="face20" style="cursor:hand;" onClick="biaoqing('[:$]')"><img src="facepic/main_20.gif" border="0" alt="嘘,安静"></a></td>
</tr>
</table>
</td>
</tr>
</table>
<map name="Map">
<area shape="rect" coords="102,2,118,16" name="closeIE" onClick="MM_showHideLayers('Layer1','','hide')">
</map>
</div> <a href="yourface.htm" target=_blank class=cla2>留言表情使用帮助</a></td>
</tr>
</table>
<table width=500 border=0 cellpadding=3 cellspacing=1 bgcolor="#C6C6C6">
<tr>
<td align=center bgcolor=EAFFE0> <font color=46A718><strong>您的留言内容</strong>(留言请不要超过500个字)</font>
</td>
</tr>
</table><br style="line-height:3px;">
<%if action<>"" and action="modify" then
dim contRS,str
set contRS=server.createobject("adodb.recordset")
contRS.open "select * from filmbbs where bbsID="&request.QueryString("bbsID"),conn,1,1
str=contRS("bbscont")
str=replace(str,"<","<")
str=replace(str," "," ")
str=replace(str,"<br>",chr(13))
response.Write("<input type=""hidden"" name=""bbsID"" value="&request.QueryString("bbsID")&">")
response.Write("<textarea name=""bbscont"" cols=80 rows=8 class=input1>"&str&"</textarea>")
else
response.Write("<textarea name=""bbscont"" cols=80 rows=8 class=input1></textarea>")
%>
<%contRS.close
set contRS=nothing
end if
bbsRS.close
set bbsRS=nothing
set conn=nothing
%>
<br>
<br style="line-height:7px;"><div align="center">
<input type="submit" style="BORDER-RIGHT: #000000 1px solid;height:18px;BORDER-TOP: #000000 1px solid; BORDER-LEFT: #000000 1px solid;
font-size:12px; COLOR: #000000; BORDER-BOTTOM: #000000 1px solid; BACKGROUND-COLOR: #99FFCC;" value="发表留言">
<input type="reset" style="BORDER-RIGHT: #000000 1px solid;height:18px;BORDER-TOP: #000000 1px solid; BORDER-LEFT: #000000 1px solid;
font-size:12px; COLOR: #000000; BORDER-BOTTOM: #000000 1px solid; BACKGROUND-COLOR: #99FFCC;" value="重写留言"><br><br style="line-height:5px;">
</div>
</td>
</form>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="2" bgcolor="#FBAF0C" height="7"></td>
</tr>
</table>
</body>
</html>
<script language="VBScript" type="text/VBScript">
function tiaozhuan2_onSubmit()
dim shuru
shuru=document.tiaozhuan2.page.value
if isNumeric(shuru) then
if shuru><%=TotalPages%> OR shuru<=0 then
alert"对不起，您的输入页码不存在"
tiaozhuan2_onSubmit=false
document.tiaozhuan2.page.focus()
end if
else
alert"对不起，您的输入有误"
tiaozhuan2_onSubmit=false
document.tiaozhuan2.page.focus()
end if
end function
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -