?? view_lyb.asp
字號:
<!--#include file=../system/include/config.asp-->
<!--#include file=../share/conn_system.asp-->
<!--#include file=../system/include/function.asp-->
<!--#include file=../system/include/access_zj.asp-->
<html>
<head>
<title><%=title%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>
<style> body{ scrollbar-face-color:fd9035; scrollbar-shadow-color:ffffff; scrollbar-highlight-color:ffffff; scrollbar-3dlight-color:ffffff; scrollbar-darkshadow-color:ffffff; scrollbar-track-color:ffefd7; scrollbar-arrow-color:ffffff;}
.rightkuan { border-color: black #FFFFFF black black; border-style: solid; border-top-width: 0px; border-right-width: 2px; border-bottom-width: 0px; border-left-width: 0px}
.leftkuan { border-color: black black black #FFFFFF; border-style: solid; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 0px; border-left-width: 2px}
.textinput2 { border: 1px #9c9a9c solid;BACKGROUND: #ffffff;FONT-SIZE: 9pt; FONT-FAMILY: arial}
</style>
<script language="JavaScript">
function openwin(page,size)
{
window.open(page,"newuser","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=no,"+ size);
}
function mOvr(src,clrOver) { if (!src.contains(event.fromElement)){ src.bgColor = clrOver; }}function mOut(src,clrIn){ if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn; }} function mClk(src) { if(event.srcElement.tagName=='TD'){src.children.tags('A')[0].click();} }
</script>
<script language="vbScript">
<!--
sub del()
m=msgbox("您是否要刪除此留言?",1+32,"刪除記錄")
if m=1 then
window.top.location.href="view_lyb.asp"
end if
end sub
-->
</script>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<!--#include file="../share/gg_top.htm"-->
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="left" valign="top">
<td width="198"><img src="images/zjuser_r2_c1.gif" width="198" height="139"></td>
<td width="184"><img src="images/zjuser_r2_c8.gif" width="201" height="139"></td>
<td width="396" background="images/zjuser_r2_c13.jpg"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="379" height="139">
<param name="movie" value="../images/member.swf">
<param name=WMODE value=Transparent>
<param name="quality" value="high">
<embed src="../images/member.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="379" height="139"></embed></object></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="left" valign="top">
<form name="form4" method="post" >
<td width="10" height="406" background="../images/member_r6_c1.jpg"><img src="../images/member_r3_c1.gif" width="10" height="28"></td>
<td width="584" align="left" height="406">
<table width="582" height="28" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="582" height="28" align="left" valign="bottom" background="../images/member_r3_c2.gif" class="font"><a href="index.asp" class="menu">首 頁
</a>>>> <a href="index.asp" class="menu">房產中介管理</a> >>>
查看留言信息</td>
</tr>
</table>
<br>
<table width="565" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="18" height="35"> </td>
<td width="490" height="35" valign="middle" align="left"><span class="font"><font color="#999999">以
下 是 客 戶 給 您 的 留 言</font></span></td>
<td width="57" height="35" valign="middle" align="center"> </td>
</tr>
</table>
<%
dim strSql,rs,i,PageNo
strSql="select * from [lyb] where zj_id='" & session("zj_id") & "' order by ly_id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
rs.PageSize=8
PageNo=request("PageNo")
if PageNo<1 or not isnumeric(PageNo) then
PageNo=1
end if
if cint(PageNo)>rs.PageCount then
PageNo=rs.PageCount
end if
dim yy
if rs.recordcount>0 then
rs.AbsolutePage =PageNo
for i=1 to rs.pageSize
if not rs.eof then
%>
<center>
<table width="546" border="0" cellspacing="1" cellpadding="0" bgcolor="#FFCC99">
<tr>
<td bgcolor="#FFEAB3" width="79" align="center" valign="middle" height="20" class="font"><font color="#FF6600">留
言 人</font></td>
<td bgcolor="#fff9e1" width="191" align="left" valign="middle" class="font"> <font color="#FF6600"><%=rs("ly_man")%></font></td>
<td bgcolor="#FFEAB3" width="78" align="center" valign="middle" class="font"><font color="#FF6600" class="font">留言時間</font></td>
<td bgcolor="#fff9e1" width="137" align="left" valign="middle" class="font"> <%=rs("ly_date")%></td>
<td bgcolor="#FF8000" width="55" align="center" valign="middle" class="font"><a href="del_lyb.asp?id=<%=rs("ly_id")%>" class="ffbyfont2" ><font color="#FFFFFF">刪除</font></a></td>
</tr>
<tr>
<td bgcolor="#FFEAB3" width="79" align="center" valign="middle" height="20" class="font"><font color="#FF6600">電 話</font></td>
<td bgcolor="#fff9e1" width="191" align="left" valign="middle" class="font"> <%=rs("ly_tel")%></td>
<td bgcolor="#FFEAB3" width="78" align="center" valign="middle" class="font"><font color="#FF6600" class="font">E-mail</font></td>
<td bgcolor="#fff9e1" align="left" valign="middle" class="font" colspan="2"> <%=rs("ly_email")%></td>
</tr>
<tr>
<td bgcolor="#FFEAB3" width="79" align="center" valign="middle" height="20" class="font"><font color="#FF6600">留言內容</font></td>
<td colspan="4" bgcolor="#fff9e1" align="left" valign="top" class="font"> <%=rs("ly_bz")%></td>
</tr>
</table>
<br>
<%
rs.movenext
end if
next
%>
<table width="546" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFCC99" class="xu_kuan">
<tr align="right" valign="middle" bgcolor="#FFE7CE">
<td height="28" colspan="5" class="font" align="center" >
<%
session("pagecount")=rs.pagecount
out("<font color=#929292>當前頁次:</font><font color=red>" & PageNo & "/" & rs.pagecount & "</font> ")
out("<font color=#929292>共</font><font color=red>" & rs.pagecount & "</font><font color=#929292>頁</font> ")
out("<font color=#929292>共</font><font color=red>" & rs.recordcount & "</font><font color=#929292>條記錄</font> ")
out("<a href=""view_lyb.asp?PageNo=1"" class=""menu1"">[首頁]</a> ")
out("<a href=""view_lyb.asp?PageNo=" & (PageNo-1) & """ class=""menu1"">[上一頁]</a> ")
out("<a href=""view_lyb.asp?PageNo=" & (PageNo+1) & """ class=""menu1"">[下一頁]</a> ")
out("<a href=""view_lyb.asp?PageNo=" & rs.pagecount & """ class=""menu1"">[尾頁]</a> ")
dim pag
%>
<select name="jump" class="textinput" onchange="javascript:window.open('view_lyb.asp?pageno='+this.options[this.selectedIndex].value,'_self')">
<% for pag=1 to rs.pagecount
if int(pageno)=pag then %>
<option value=<%=pageno%> selected><%=pageno%></option>
<%else%>
<option value="<%=pag%>"><%=pag%></option>
<%
end if
next %>
</select>
</td>
</tr>
</table>
</center>
<% else %>
<center>
<table width="546" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFCC99" class="xu_kuan">
<tr bgcolor="#fff9e1">
<td height="112" >
<div align="center" class="font">客 戶 還 未 給 您 下 留 言!</div>
</td>
</tr>
</table>
<%
end if
rs.close
set rs=nothing
%>
<br>
</center>
</td>
<td width="184" align="center" valign="top" background="../images/member_r4_c6.gif" height="406"><img src="../images/member_r3_c6.gif" width="186" height="13"><br>
<br><!--#include file="share_menu.htm"-->
<br>
</td>
</form>
</tr>
</table>
<!--#include file="../share/gg_foot.htm"-->
</body>
</html>
<!--#include file=../system/include/foot.asp-->
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -