?? index.asp
字號(hào):
<!--
############################ 智思留言本 版權(quán)聲明 ##############################
##### 智思留言本系統(tǒng)（版本：ZSBS v3.0 構(gòu)建于 2005/11/01） #####
##### 智思網(wǎng)絡(luò)（zhisi.net) （2004-2024）版權(quán)所有！ #####
##### 此留言本為自由源碼版，你可以自由傳播和使用而不用交納任何款項(xiàng)， #####
##### 你也可以進(jìn)行更改，但必須本保留版權(quán)信息！ #####
##### 如需刪除版權(quán)信息，則必須經(jīng)授權(quán)，并交納版權(quán)費(fèi)，否則將會(huì)訴諸于法律！ #####
##### 電子郵箱：zhisi@126.com QQ：122178250 POPO：simonda #####
#################################################################################
##### 此版權(quán)信息不會(huì)妨礙你正常使用本留言本，我們承諾完全免費(fèi)，但保留版權(quán)！ #####
################ 請(qǐng)?jiān)L問http://www.zhisi.net 查看新版本信息 ######################
-->
<!-- #include file="common.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="description" content="智思工作室提供企業(yè)網(wǎng)站建設(shè)、VI設(shè)計(jì)、信息系統(tǒng)開發(fā)等信息化服務(wù)！智思工作室秉承專業(yè)、認(rèn)真、創(chuàng)新的理念，做到最好！！智思工作室還提供學(xué)習(xí)資源服務(wù)—智思學(xué)院！還提供網(wǎng)上娛樂！！智思工作室誠(chéng)邀共同志向者加盟合作，共創(chuàng)佳業(yè)！！智思才開始，未來更精彩！">
<meta name="keywords" content="智思留言本！免費(fèi)留言本系統(tǒng)!3.0!ASP留言本!最新支持UBB功能!悄悄話功能!公告管理!重寫了留言本!完全免費(fèi)!歡迎使用!" >
<title><% =GBName %></title>
<link href="<%=GBCss%>/common.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_jumpMenuGo(selName,targ,restore){ //v3.0
var selObj = MM_findObj(selName); if (selObj) MM_jumpMenu(targ,selObj,restore);
}
//-->
</script>
</head>
<body>
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="100" align="center"><img src="<% =GBSkin %>/top.gif"></td>
</tr>
</table>
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="50"> </td>
<td align="center">
<span class="link_around"><%=Link_one%></span>
<span class="link_around"><%=Link_two%></span>
<span class="link_around"><%=Link_three%></span>
</td>
<td width="300" height="50"><a href="guest.asp"><img src="<% =GBSkin %>/lybut.gif" alt="我要留言" width="152" height="24" border="0"></a><a href="manginto.asp"><img src="<% =GBSkin %>/mangbut.gif" alt="留言管理" width="141" height="24" border="0"></a></td>
<td width="50"> </td>
</tr>
</table>
<% if Trim(GBNews)=1 then %>
<!-- #include file="news.asp"-->
<% end if %>
<%
dim rname,rsex,raddr,rmail,rpage,roicq,rhead,rtitl,rcont,rtime,rip,rrepflag,recont
set rs=Server.CreateObject("ADODB.Recordset")
sqlstr="select * from guest order by TopG,id DESC"
rs.open sqlstr,conn,1,3
pagesize=GBENum
%>
<%
currentpage=request.querystring("currentpage")
if currentpage="" then
currentpage=0
rs.movefirst
else
rs.move Clng(currentpage)*pagesize
end if
i=0
while i<pagesize and not rs.EOF
%>
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="10" bgcolor="#FFFFFF"> </td>
<td height="30" style="background-image:url(<% =GBSkin %>/guest_top.gif) ">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="150" align="center" class="guest_flag"><a name="<%=rs("id")%>"></a><%If rs("TopG")=True Then%>[置頂留言]<%Else%>[普通留言]<%End If%></td>
<td align="left" class="guest_name"> <% =rs("name") %>[<% =rs("sex") %>]
</td>
<td width="200"><a href="mailto:<% =rs("email") %>"><img src="images/email.gif" alt="<% =rs("email") %>" border="0"></a> <a href="<% =rs("homepage") %>" target="_blank"><img src="images/home.gif" alt="<% =rs("homepage") %>" border="0"></a> <a href="http://friend.qq.com/cgi-bin/friend/user_show_info?ln=<% =rs("Oicq") %>" target="_blank"><img src="images/oicq.gif" alt="<% =rs("Oicq") %>" width="16" height="16" border="0"></a> <img src="images/ip.gif" alt="<% =rs("ip") %>" width="16" height="15"> <img src="images/help.gif" alt="幫助" width="16" height="16"></td>
</tr>
</table>
</td>
<td width="10" bgcolor="#FFFFFF"> </td>
</tr>
<tr>
<td width="10" bgcolor="#FFFFFF"> </td>
<td style="background-image:url(<% =GBSkin %>/guest_bg.gif) ">
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="150"><table width="130" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="130" align="right" valign="bottom"><img src="images/<% =rs("headpic") %>.gif" class="mytext"></td>
<td width="10" align="center" style="background-image:url(<% =GBSkin %>/gb_pic_r.gif) "> </td>
</tr>
<tr>
<td height="10" colspan="2" align="center" style="background-image:url(<% =GBSkin %>/gb_pic_b.gif) "></td>
</tr>
</table></td>
<td valign="top"><table width="420" border="0" align="center" cellpadding="0" cellspacing="0" style="table-layout:fixed;">
<tr>
<td height="25" valign="bottom" class="guest_title"><% =rs("Title") %></td>
</tr>
<tr>
<td height="2" style="background-image:url(<% =GBSkin %>/line.gif) "></td>
</tr>
<tr>
<td height="6"></td>
</tr>
<tr>
<td class="lytext" style="word-break:break-all; word-wrap:break-word;">
<% If rs("sec")=true Then %>
<span style="color:#FF0000 ">與站長(zhǎng)的悄悄話</span>
<% Else %>
<% If ifNeedAuditing="YES" And rs("ifHadDealAuditing")=False Then %>
<span style="color:#FF0000 ">留言正在審核中！</span>
<% ElseIf ifNeedAuditing="YES" And rs("ifHadDealAuditing")=True And rs("ifHadPassAuditing")=False Then %>
<span style="color:#FF0000 ">對(duì)不起，您的留言沒有通過審核！</span>
<% Else %>
<% =ubbcode(rs("content"))%>
<% End If %>
<% End If %>
</td>
</tr>
<tr><td height="10"></td></tr>
<tr>
<td>
<table cellspacing="0" cellpadding="0" width="250" class="line_around" bgcolor="#FFFFFF">
<tr>
<td height="22"> 留言日期：<% =rs("Date") %> <% =rs("Time") %></td>
</tr>
</table>
</td>
</tr>
<tr><td height="10"></td></tr>
<%
'if rs("repflag")=true then
set rsb=Server.CreateObject("ADODB.Recordset")
'-----------------------此處進(jìn)行了更改 V2.0 版--------------------------------
strsql="select * from reply where GuestID=" & Trim(rs("ID"))
rsb.open strsql,conn,1,3
if not rsb.eof then
if not rs("ReNoView")=True then
recont=rsb("content")
'-----------------------此處進(jìn)行了更改 V1.1版-------------------------------
%>
<tr>
<td height="22" style="background-image:url(<% =GBSkin %>/linebg.gif) "> 管理員回復(fù)</td>
</tr>
<tr>
<td height="2" style="background-image:url(<% =GBSkin %>/line.gif) "></td>
</tr>
<tr>
<td class="rptext" style="word-break:break-all; word-wrap:break-word;"><% =ubbcode(recont) %></td>
</tr>
<%
'-----------------------此處進(jìn)行了更改 V2.0 版-------------------------------
end if
end if
rsb.close
set rsb=nothing
'end if
'-----------------------此處進(jìn)行了更改 V2.0 版-------------------------------
%>
</table></td>
</tr>
</table></td>
<td width="10" bgcolor="#FFFFFF"> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="10" height="10"></td>
<td height="10" style="background-image:url(<% =GBSkin %>/guest_b.gif) "></td>
<td width="10" height="10"></td>
</tr>
</table>
<table width="730"" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="20" bgcolor="#FFFFFF"></td>
</tr>
</table>
<%
rs.movenext
i=i+1
wend
%>
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="20" height="25" align="center" style="background-image:url(<% =GBSkin %>/navig_l.gif) "> </td>
<td align="center" class="guest_name" style="background-image:url(<% =GBSkin %>/navig_bg.gif) "><% rscount=rs.recordcount %>
共有
<% =rscount %>
條留言, 共
<%
totalpage=(rscount-1)/pagesize
totalpage=int(totalpage)+1
%>
<% =totalpage %>
頁(yè), 每頁(yè)
<% =pagesize %>
條, 這是第
<% =currentpage+1 %>
頁(yè)留言.
<% if Clng(currentpage)>0 then %>
<a href="index.asp?currentpage=<% =Clng(currentpage)-1 %>">上一頁(yè)</a>
<% else %>
上一頁(yè)
<% end if %>
/
<% if Clng(currentpage)+1<totalpage then %>
<a href="index.asp?currentpage=<% =Clng(currentpage)+1 %>">下一頁(yè)</a>
<% else %>
下一頁(yè)
<% end if %></td>
<td width="10" align="center" style="background-image:url(<% =GBSkin %>/navig_r.gif) "> </td>
</tr>
<tr>
<td height="2" align="center"></td>
<td align="center"></td>
<td align="center"></td>
</tr>
<tr>
<td height="25" align="center" style="background-image:url(<% =GBSkin %>/navig_l.gif) "> </td>
<td align="center" class="guest_name" style="background-image:url(<% =GBSkin %>/navig_bg.gif) ">[
<%
i=1
while i<=totalpage
%>
<a href="index.asp?currentpage=<% =i-1 %>"><% =i %></a>
<%
i=i+1
wend
%>
]</td>
<td width="20" align="center" style="background-image:url(<% =GBSkin %>/navig_r.gif) "> </td>
</tr>
</table>
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0" style="background-image:url(<% =GBSkin %>/line.gif) ">
<tr bgcolor="#FFFFFF">
<td height="10" colspan="3"> </td>
</tr>
<tr>
<td width="10" height="70"> </td>
<td><table width="680" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" align="center"><span class="guest_name"><% =GBCopy %></span></td>
</tr>
<tr>
<td height="25" align="center"><span class="guest_name">智思留言本 - 版本:ZSBS v3.0 / 系統(tǒng)開發(fā):智思網(wǎng)絡(luò)(<a href="http://www.zhisi.net" target="_blank">ZhiSi.Net</a>)</span></td>
</tr>
</table></td>
<td width="10"> </td>
</tr>
</table>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<map name="Map">
<area shape="rect" coords="510,7,564,26" href="http://www.zhisi.net/about.htm" target="_blank">
<area shape="rect" coords="576,9,626,25" href="http://www.zhisi.net/join.htm" target="_blank">
<area shape="rect" coords="639,8,691,26" href="http://www.zhisi.net/contact.htm" target="_blank">
<area shape="rect" coords="247,84,333,104" href="http://www.zhisi.net">
<area shape="rect" coords="370,85,450,105" href="http://www.zhisi.net/learn/">
<area shape="rect" coords="479,84,561,103" href="#">
<area shape="rect" coords="605,84,673,103" href="http://www.zhisi.net/webun/" target="_blank">
</map>
</body>
</html>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -