📄 guest.asp
字号:
<!--#include file="syssetup.asp"-->
<!--#include file="inc/func.INC"-->
<!--#include file="inc/chkonline.asp"-->
<%call online()
userid=session("myuserid")
password=session("mypwd")
if isuser(userid,password)=0 then
%>
<script>
alert("你还没有登录，无权进入！");
parent.location.href="index.asp";
</script>
<%
response.end
end if
id=request("id")
if id<>"" then
sql="delete from private where id="&id
conn.execute(sql)
end if
geter=userid
%>
<html>
<head>
<title>:::长沙理工大学土木试点班:::</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!-- Fireworks MX Dreamweaver MX target. Created Sat Oct 25 08:11:34 GMT+0800 (?D1ú±ê×?ê±??) 2003-->
<style type="text/css">
<!--
@import url("css.css");
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>
<script language="javascript" type="text/javascript" src="img/chromeless_35.js"></script>
<script language="javascript">
function openIT(u,W,H,X,Y,n,b,x,m,r,jj,tt) {
var cU ='img/close_up.gif'
var cO ='img/close_ovr.gif'
var cL ='img/clock.gif'
var mU ='img/min_up.gif'
var mO ='img/min_ovr.gif'
var xU ='img/max_up.gif'
var xO ='img/max_ovr.gif'
var rU ='img/res_up.gif'
var rO ='img/res_ovr.gif'
var tH =jj
var tW =tt
var wB ='#000000'
var wBs ='#FFFFFF'
var wBG ='#e0e0e0'
var wBGs='#e0e0e0'
var wNS ='toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0'
var fSO ='scrolling=no noresize'
var brd =b||0;
var max =x||false;
var min =m||false;
var res =r||false;
var tsz =20;
return chromeless(u,n,W,H,X,Y,cU,cO,cL,mU,mO,xU,xO,rU,rO,tH,tW,wB,wBs,wBG,wBGs,wNS,fSO,brd,max,min,res,tsz)
}
</script>
<body bgcolor="#CCCCCC" leftmargin="0" topmargin="0">
<%tablename="private"%>
<table width="774" border="0" align="center" cellpadding="0" cellspacing="0">
<!-- fwtable fwsrc="txl2.png" fwbase="index.gif" fwstyle="Dreamweaver" fwdocid = "742308039" fwnested="0" -->
<tr>
<td><img src="images/spacer.gif" width="6" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="60" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="98" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="28" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="5" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="16" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="38" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="94" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="97" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="105" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="103" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="101" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="15" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="2" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="6" height="1" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="1" border="0" alt=""></td>
</tr>
<tr>
<td colspan="15"><img name="index_r1_c1" src="images/index_r1_c1.gif" width="774" height="25" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="25" border="0" alt=""></td>
</tr>
<tr>
<td><img name="index_r2_c1" src="images/index_r2_c1.gif" width="6" height="77" border="0" alt=""></td>
<td colspan="5"><img name="index_r2_c2" src="images/index_r2_c2.gif" width="207" height="77" border="0" alt=""></td>
<td colspan="7"><a href="http://txl.bob365.net/" target="_blank"><img name="index_r2_c7" src="images/index_r2_c7.gif" width="553" height="77" border="0" alt=""></a></td>
<td colspan="2"><img name="index_r2_c14" src="images/index_r2_c14.gif" width="8" height="77" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="77" border="0" alt=""></td>
</tr>
<tr>
<td colspan="15"><img name="index_r3_c1" src="images/index_r3_c1.gif" width="774" height="9" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="9" border="0" alt=""></td>
</tr>
<tr>
<td colspan="2"><img name="index_r4_c1" src="images/index_r4_c1.gif" width="66" height="19" border="0" alt=""></td>
<td><a href="index.asp" target="_parent"><img name="index_r4_c3" src="images/index_r4_c3.gif" width="98" height="19" border="0" alt=""></a></td>
<td colspan="4"><a href="int.asp" target="_parent"><img name="index_r4_c4" src="images/index_r4_c4.gif" width="87" height="19" border="0" alt=""></a></td>
<td><a href="modify.asp" target="_parent"><img name="index_r4_c8" src="images/index_r4_c8.gif" width="94" height="19" border="0" alt=""></a></td>
<td><a href="note.asp" target="_parent"><img name="index_r4_c9" src="images/index_r4_c9.gif" width="97" height="19" border="0" alt=""></a></td>
<td><a href="card.asp" target="_parent"><img name="index_r4_c10" src="images/index_r4_c10.gif" width="105" height="19" border="0" alt=""></a></td>
<td><a href="showpic.asp" target="_parent"><img name="index_r4_c11" src="images/index_r4_c11.gif" width="103" height="19" border="0" alt=""></a></td>
<td><a href="guest.asp" target="_parent"><img name="index_r4_c12" src="images/index_r4_c12.gif" width="101" height="19" border="0" alt=""></a></td>
<td colspan="3"><img name="index_r4_c13" src="images/index_r4_c13.gif" width="23" height="19" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="19" border="0" alt=""></td>
</tr>
<tr>
<td colspan="15"><img name="index_r5_c1" src="images/index_r5_c1.gif" width="774" height="4" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="4" border="0" alt=""></td>
</tr>
<tr>
<td><img name="index_r6_c1" src="images/index_r6_c1.gif" width="6" height="202" border="0" alt=""></td>
<td colspan="13"><img name="index_r6_c2" src="images/index_r6_c2.gif" width="762" height="202" border="0" alt=""></td>
<td><img name="index_r6_c15" src="images/index_r6_c15.gif" width="6" height="202" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="202" border="0" alt=""></td>
</tr>
<tr>
<td valign="top" background="images/index_r7_c1.gif"><img name="index_r7_c1" src="images/index_r7_c1.gif" width="6" height="553" border="0" alt=""></td>
<td colspan="3" valign="top" bgcolor="#FFFFFF" class="unnamed1"><table width="100%" border="0" class="unnamed1">
<tr>
<td><div align="center"><a href="#" onClick="window.open('sender.asp','ToseePlay','top=0,scrollbars=1,resizable=1,height=160,width=400,left='+(screen.width-650)/2);return false;" title="发送私人留言"><font color="#FF0000">签写私人留言</font></a></div></td>
</tr>
<tr>
<td><table width="100%" height="91" border="0" cellpadding="0" cellspacing="0" bordercolor="#111111" class="unnamed1" id="AutoNumber2" style="border-collapse: collapse">
<tr>
<td width="32%" height="9"></td>
<td width="68%" height="9"></td>
</tr>
<tr>
<td width="32%" height="19"><div align="right">用户ID:</div></td>
<td width="68%" height="19"><%=userid%></td>
</tr>
<tr>
<td width="32%" height="11"><div align="right"></div></td>
<td width="68%" height="11"></td>
</tr>
<tr>
<td width="32%" height="20"><div align="right">用户名:</div></td>
<td width="68%" height="20">
<%
set rs=server.createobject("ADODB.Recordset")
sql="select * from txluser where userid='"&userid&"' order by id desc"
rs.open sql,conn,1,1
%>
<%=rs("truename")%></td>
</tr>
<tr>
<td width="32%" height="13"><div align="right"></div></td>
<td width="68%" height="13"></td>
</tr>
<tr>
<td width="32%" height="18"><div align="right">留言数:</div></td>
<td width="68%" height="18"><font color="#FF0000"><%=allprivate(tablename,geter)%></font>
<span lang="zh-cn">条</span></td>
</tr>
<tr>
<td width="32%" height="13"><div align="right"></div></td>
<td width="68%" height="13"></td>
</tr>
<tr>
<td width="32%" height="17"><div align="right">页现数:</div></td>
<td width="68%" height="17"><font color="#FF0000">12</font> <span lang="zh-cn">条</span></td>
</tr>
<tr>
<td width="32%" height="13"><div align="right"></div></td>
<td width="68%" height="13"></td>
</tr>
<tr>
<td width="32%" height="18"><div align="right">现状态:</div></td>
<td width="68%" height="18">
<%if userid<>"" then%>
<font color="#FF0000">已登录</font>
<%end if%>
</td>
</tr>
</table></td>
</tr>
</table></td>
<td valign="top" background="images/index_r7_c5.gif"><img name="index_r7_c5" src="images/index_r7_c5.gif" width="5" height="553" border="0" alt=""></td>
<td colspan="9" valign="top" bgcolor="#FFFFFF" class="unnamed1">
<table width="100%" border="0" cellpadding="0" cellspacing="0" bordercolor="#111111" class="unnamed1" id="AutoNumber3" style="border-collapse: collapse">
<tr>
<td width="100%"> <span lang="zh-cn">当前位置：私人留言</span></td>
</tr>
</table>
<%
set rs=server.createobject("ADODB.Recordset")
sql="select * from private where geter='"&geter&"' order by id desc"
rs.open sql,conn,1,1
Rs.Pagesize=12
Pageno=CLng(Request("page"))
If Pageno<1 Then Pageno=1
If Pageno>Rs.PageCount Then Pageno=Rs.PageCount
If pageNo=""Then Pageno=1%>
<%if rs.eof then
else%>
<%
Sub Showpage(Rs,pageno)
Rs.AbsolutePage=Pageno
for I=1 To Rs.PageSize
if i mod 2=0 then
col="#E4E8EF"
else
col="#ffffff"
end if%>
<div align="center">
<center>
<table border="0" cellpadding="2" bordercolor="#F6F6F6" width="95%" id="AutoNumber4" bgcolor="#FFFFFF">
<tr>
<td width="100%" bgcolor="#EFEFEF" class="unnamed1"><FONT color=#003300>
<IMG
src="images/arrow.gif" width="4" height="8"> <B><%=rs("writer")%> 在<%=rs("posttime")%>
对你写道：</B>
<%myid=rs("id")%>
<a href="#" onclick="window.open('sender.asp?id=<%=myid%>','ToseePlay','top=0,scrollbars=1,resizable=1,height=160,width=400,left='+(screen.width-650)/2);return false;" title="发送私人留言"><img src="IMAGES/preply.gif" width="47" height="18" align="absmiddle" border=0></a> <a href="guest.asp?id=<%=rs("id")%>"><font color=#000000>删除</font></a></font></td>
</tr>
<tr>
<td width="100%" bgcolor="#EFEFEF" class="unnamed1"><%=rs("content")%></td>
</tr>
<tr>
<td width="100%" class="unnamed1"> </td>
</tr>
</table>
</center>
</div>
<%
Rs.Movenext
If Rs.Eof Then Exit For
Next
end sub
%>
<%showpage rs,pageno%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
<tr>
<td width="100%" height="25" class="unnamed1"> <div align=right> <font color="#000000">
<%
If Pageno<>1 Then
Response.Write" <A href=guest.asp>首页</A> "
Response.Write" <A href=guest.asp?page="&(Pageno-1)&">前页</A> "
Else
Response.Write" 首页 "
Response.Write" 前页 "
End If
If Pageno<>rs.PageCount Then
Response.Write" <A href=guest.asp?page="&(Pageno+1)&">后页</A> "
Response.Write" <A href=guest.asp?page="&(Rs.PageCount)&">末页</A> "
Else
Response.Write" 后页 "
Response.Write" 末页 "
End If
%>
<span class="unnamed1">位置</span><%=pageno%>/<%=rs.pagecount%></font></div></td>
</tr>
</table>
<%end if%>
</td>
<td background="images/index_r7_c15.gif"><img name="index_r7_c15" src="images/index_r7_c15.gif" width="6" height="553" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="553" border="0" alt=""></td>
</tr>
<tr>
<td colspan="15"><img name="index_r8_c1" src="images/index_r8_c1.gif" width="774" height="71" border="0" alt=""></td>
<td><img src="images/spacer.gif" width="1" height="71" border="0" alt=""></td>
</tr>
</table>
</body>
</html>
<%
set rs=Server.CreateObject("ADODB.RECORDSET")
sql="select * from [syssetup]"
rs.open sql,conn,1,1
webname=rs("webname")
classname=rs("classname")
webcounter=rs("webcounter")
mysql="update [syssetup] set webcounter=webcounter+1"
conn.execute(mysql)
set rs=nothing
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -