📄 showtopic.asp
字号:
<td width="13" background="images/pp_32.gif"><img src="images/pp_32.gif" width="13" height="100%"></td>
</tr>
<tr>
<td width="25" height="13"><img src="images/pp_14.gif" width="25" height="13"></td>
<td height="13" background="images/pp_22.gif"><img src="images/pp_22.gif" width="1" height="13"></td>
<td width="13" height="12" align="right" background="images/pp_22.gif"><img src="images/pp_33.gif" width="12" height="13"></td>
</tr>
</table>
<hr size="1" noshade color="cccccc"><%=rs("QM")%></td>
</tr>
</table></td>
<td width="230" valign="top" bgcolor="f4f4f4">
<table width="100%" height="130" border="0" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td bgcolor="#FFFFFF">文章总数：<%=rs("Tcount")%> | 精华文章：<%=rs("Tcounts")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">注册时间： <%=rs("regtime")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">金钱数：<%=rs("money")%> | 魅力值：<%=rs("glamour")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">在线状态：
<%
sql="select * from Online where Username='"&rply("Username")&"'"
set sss=Server.CreateObject("ADODB.Recordset")
sss.open sql,conn,1,1
if sss.recordcount<>0then
response.write("在线")
else
response.write("离线")
end if
%>
| 登陆次数：<%=rs("Dlcs")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><a href="#replys" onClick="reply.titles.value='回复给(<%=k%>楼)<%=rply("username")%>的《<%=rply("Title")%>》';reply.bodys.value='';">回复</a> <%if session("username")=rply("username") or session("username")="Desner" then%>
<a href="#" onClick="window.open('edtopic.asp?topicID=<%=rply("ID")%>&topicclass=2','edreply','width=500,height=540')">编辑
</a> <%end if%>
<%if session("username")=rply("username") or session("username")="Desner" then%>
<a href="deltopic.asp?TopID=<%=TopID%>&ID=<%=ID%>&TopicID=<%=TopicID%>&reID=<%=rply("ID")%>">删除</a>
<%end if%></td>
</tr>
</table>
<%
rs.close
%> </td>
</tr>
<%
k=k+1
rply.movenext
loop
end if
%>
</table>
<%if session("username")<>"游客" then%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2" background="images/7_bg.gif"><img src="images/7_bg.gif" width="1" height="10"></td>
</tr>
<tr>
<td width="26" bgcolor="#FF4E00"><img src="images/8_left.gif" width="26" height="23"></td>
<td bgcolor="#FF4E00" class="white">发表回复<a name="replys" id="replys"></a></td>
</tr>
<tr>
<td colspan="2" background="images/9_bg.gif"><img src="images/9_bg.gif" width="1" height="3"></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="10" cellspacing="1" bgcolor="#CCCCCC">
<form name="reply" method="post" action="replytopic.asp" onSubmit="return voss()"><tr>
<td background="images/top_td_bg.gif" bgcolor="f4f4f4"><span class="red">回复标题：</span><input name="titles" type="text" class="TopicTitle" id="titles" size="35" maxlength="30">
（*限制 30 字符！
<input name="TopID" type="hidden" id="TopID" value="<%=TopID%>"> <input name="ID" type="hidden" id="ID" value="<%=ID%>"> <input name="TopicID" type="hidden" id="TopicID" value="<%=TopicID%>">
） </td>
<td width="230" background="images/top_td_bg.gif" bgcolor="f4f4f4" class="red">作者信息:<%=session("username")%></td>
</tr>
<tr>
<td bgcolor="f4f4f4"><table width="100%" height="130" border="0" cellpadding="10" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td valign="top" bgcolor="#FFFFFF"><textarea name="bodys" cols="55" rows="7" id="bodys" onKeyDown="ctlent()">同上……</textarea>
<table border="0" cellspacing="1" cellpadding="2">
<tr align="center">
<td width="48" align="left" nowrap>表情：</td>
<td><a href="#bottom" onClick="face('1')"><img src="face/face1.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('2')"><img src="face/face2.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('3')"><img src="face/face3.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('4')"><img src="face/face4.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('5')"><img src="face/face5.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('6')"><img src="face/face6.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('7')"><img src="face/face7.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('8')"><img src="face/face8.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('9')"><img src="face/face9.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('10')"><img src="face/face10.gif" width="15" height="15" border="0"></a></td>
<td><a href="#bottom" onClick="face('11')"><img src="face/face11.gif" width="22" height="15" border="0"></a></td>
</tr>
</table>
<Script language="javascript">
var width=window.screen.width;
if (width==1152){
reply.bodys.cols='105';
}
if (width==800){
reply.bodys.cols='55';
}
if (width==1024){
reply.bodys.cols='88';
}
function insertimg(){
imgsrc=prompt('请输入图片地址：','http://');
imgsrc='[LYL_IMG]'+imgsrc+'[LYL_/IMG]';
reply.bodys.value=(reply.bodys.value+'\n'+imgsrc);
}
function inserturl(){
urls=prompt('请输入链接地址：','http://');
urlname=prompt('请输入链接名称：','http://');
reply.bodys.value=(reply.bodys.value+'\n[LYL_URL]'+urls+'[LYL_NAME]'+urlname+'[LYL_/URL]');
}
function face(NMBOR){
reply.bodys.value=('[FACE'+NMBOR+']'+'\n'+reply.bodys.value);
}
function voss()
{
if (reply.bodys.value==''||reply.bodys.value==' '||reply.bodys.value==' '||reply.titles.value==''||reply.titles.value==' '||reply.titles.value==' '){
alert('[回复标题]或[回复内容] 为空，不能提交！');
return false;
}
else{
document.reply.Submit.disabled=true;
}
}
function ctlent(eventobject){
if(event.ctrlKey && window.event.keyCode==13){
if (reply.bodys.value==''||reply.bodys.value==' '||reply.bodys.value==' '||reply.titles.value==''||reply.titles.value==' '||reply.titles.value==' '){
alert('[回复标题]或[回复内容] 为空，不能提交！');
return false;
}
else{
document.reply.bodys.onKeyDown=false;
document.reply.submit();
document.reply.Submit.disabled=true;
}
}
}
</Script>
<hr size="1">
<span class="red">附加功能：</span>（<a href="#bottom" onClick="insertimg()"><span class="red">插入图片</span></a> | <a href="#bottom" onClick="inserturl()"><span class="red">插入链接</span></a>）
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置"></td></tr>
</table></td>
<td width="230" valign="top" bgcolor="f4f4f4">
<%
sql="select * from users where username='"&session("username")&"'"
set rs=Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
%>
<table width="100%" height="130" border="0" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td bgcolor="#FFFFFF">文章总数：<%=rs("Tcount")%> | 精华文章：<%=rs("Tcounts")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">注册时间： <%=rs("regtime")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">金钱数：<%=rs("money")%> | 魅力值：<%=rs("glamour")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">在线状态：
<%
sql="select * from Online where Username='"&session("Username")&"'"
set sss=Server.CreateObject("ADODB.Recordset")
sss.open sql,conn,1,1
if sss.recordcount<>0then
response.write("在线")
else
response.write("离线")
end if
%>
| 登陆次数：<%=rs("Dlcs")%></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"> </td>
</tr>
</table>
<%
rs.close
%></td>
</tr> </form>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td background="images/10_bg.gif"><img src="images/10_bg.gif" width="2" height="23"></td>
</tr>
</table>
<%end if%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td background="images/10_bg.gif"><img src="images/10_bg.gif" width="2" height="23"><a name="replybottom"></a></td>
</tr>
</table>
<!--#include file="bottom.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -