
<!--#include file="top.asp"-->

<head>
</head>

<body background="moban/3/images/bg.gif" topmargin="0">
<div align="center">
  <center>
  <table border="0" width="875" cellspacing="0" cellpadding="0" background="moban/3/images/body_bg1.gif" height="373">
  <tr><td width="100%" height="15"></td></tr>
    <tr>
      <td width="875" height="401" valign="top">
        <div align="center">
          <center>
          <table border="0" width="873" height="244" cellspacing="0" cellpadding="0">
            <tr>
              <td width="181" valign="top">
                <table border="0" width="179" height="195" cellspacing="0" cellpadding="0">
                  <tr>
                    <td width="100%" valign="top"><map name="FPMap3">
                      <area href="gbook.asp?id=<%=rs_shjia("shjiaid")%>" shape="rect" coords="31, 56, 90, 71">
                      <area href="book.asp?id=<%=rs_shjia("shjiaid")%>" shape="rect" coords="28, 81, 87, 97"></map><img border="0" src="moban/3/images/gbook.gif" usemap="#FPMap3"></td>
                  </tr>
                </table>
              </td>
              <td width="510" height="174" valign="top" align="center">
                <div align="center">
                  <center>
                  <table border="0" width="510" cellspacing="0" cellpadding="0" height="172">
                    <tr>
                      <td width="510" background="moban/3/images/top_top.gif" height="61">
                        <table border="0" width="100%" height="100%" cellspacing="0" cellpadding="0">
                          <tr>
                            <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
                          </tr>
                          <tr>
                            <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;          
                              <font color="#666666"><b>查看留言</b></font></td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                    <tr>
                      <td width="100%" background="moban/3/images/linemid.gif" height="400" valign="top" align="center">
                        <div align="center">
                          <center>
                          <table border="0" width="96%">
                            <tr>
                              <td width="100%" valign="top">
                              
                              
                              
                            <%
fkid=request.QueryString("id")
  If len(trim(request("page")))=0 then
Page=1
Else
Page=CInt(trim(request("page")))
End if
set rs=server.CreateObject("adodb.recordset")
sql="select * from shop_shjiafk where shjiaid="&fkid
rs.open sql,conn,1,1
	if err.number<>0 then
	response.write "数据库中无数据"
	end if  
rs.pagesize=2
if not rs.eof then
rs.Absolutepage=page
for k=1 to rs.pagesize
%>
              <table border="0" width="480" cellspacing="0" cellpadding="0">
                <tr>
                  <td width="480"><img border="0" src="moban/1/images/gline1.gif" width="480" height="8"></td>
                </tr>
                <tr>
                  <td width="480" background="moban/1/images/gline2.gif" align="center">
                    <table border="0" width="96%" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="50%"><img border="0" src="moban/1/images/mingzi.gif" width="25" height="25"><%=rs("fkusername")%>        
                          &nbsp;<a href="mailto:<%=rs("fkemail")%>"><img border="0" src="moban/1/images/email.gif"></a>&nbsp;&nbsp;<img border="0" src="moban/1/images/homepage.gif">&nbsp;<%=rs("fksubject")%>  </td>                                
                        <td width="50%"><img border="0" src="moban/1/images/shijian.gif"><%=rs("fkdate")%></td> 
                      </tr>
                      <tr>
                        <td width="100%" bgcolor="#E1E1E1" height="1" colspan="2"></td>
                      </tr>
                      <tr>
                        <td width="100%" colspan="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=rs("fkcontent")%> </td>
                      </tr>
                      <% if rs("fkhuifu")<>"" then%>
                       <tr>
                        <td width="100%" bgcolor="#E1E1E1" height="1" colspan="2"></td>
                      </tr>
                      <tr>
                        <td width="100%" colspan="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color="red"><b>商家回复：</b></font><font color="red"><%=rs("fkhuifu")%></font></td>
                      </tr>
                      <tr>
                        <td width="100%" bgcolor="#E1E1E1" height="1" colspan="2"></td>
                      </tr>
                       <tr>
                        <td width="100%" colspan="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color="red">[回复时间]<%=rs("hfdate")%></font> </td>
                      </tr>
                      <%end if%>
                    </table>
                  </td>
                </tr>
                <tr>
                  <td width="602"><img border="0" src="moban/1/images/gline3.gif" width="480" height="6"></td>
                </tr>
              </table>
    <% rs.movenext 
        if rs.eof then Exit For 
        next 
        End if 
          %>
                              
                              
                              
                              </td>
                            </tr>
                            <tr>
                              <td width="100%" valign="top" align="center">
                              
                             <%
  if page <>1 then
     Response.Write "<a href=book.asp?id="&id&"&page=1>首页</a> "
  end if
  tmppage = page - 1 
  if tmppage <= 0 then 
     tmppage = 1 
  else
     Response.Write"<a href=book.asp?id="&id&"&page="&tmppage&">上一页</a>"
  end if
  tmppage = page + 1 
  if tmppage >rs.PageCount then 
     tmppage = page
  else
     Response.Write " <a href=book.asp?id="&id&"&page="&tmppage&">下一页</a> "
  end if 
  if Cstr(page) <> Cstr(rs.PageCount) and Cstr(rs.PageCount) <> 0 then
    Response.Write "<a href=book.asp?id="&id&"&page="&rs.PageCount&">尾页</a>"
  end if
  if Cstr(rs.PageCount) <> 0 then
  Response.Write "每页显示<font color=red>2</font>条留言  第<font color='blue'>" & page & "/"&rs.PageCount&"</font>页"
  end if
  Response.Write "  共有<font color='blue'>"&rs.RecordCount&"</font>条留言"
 rs.close
%>
                              </td>
                            </tr>
                          </table>
                          </center>
                        </div>
                      </td>
                    </tr>
                    <tr>
                      <td width="100%" height="12" background="moban/3/images/linedi.gif"><img border="0" src="moban/3/images/linedi.gif"></td>
                    </tr>
                  </table>
                  </center>
                </div>
              </td>
              <td width="185" valign="top" align="center">
                <div align="center">
                  <center>
                  <table border="0" width="163" background="moban/3/images/right.gif" height="334" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="100%" valign="top">
                        <table border="0" width="100%" cellspacing="0" cellpadding="0" height="230">
                          <tr>
                            <td width="100%" height="56">&nbsp; 
                            </td>
                          </tr>
                          <tr>
                            <td width="100%" height="9" align="center"><%=rs_shjia("tel")%> 
                            </td>
                          </tr>
                          <tr>
                            <td width="100%" height="27">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                            </td>
                          </tr>
                          <tr>
                            <td width="100%" height="19" valign="top" align="center"><a href=mailto:<%=rs_shjia("UserEmail")%>><%=right(rs_shjia("UserEmail"),18)%> </a> 
                            </td>
                          </tr>
                          <tr>
                            <td width="100%" height="31">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
                          </tr>
                          <tr>
                            <td width="100%" height="38" valign="top">
                              <table border="0" width="100%" height="43">
                                <tr>
                                  <td width="28%" height="39"></td>
                                  <td width="67%" valign="top" height="39"> <%=rs_shjia("dz")%></td>
                                  <td width="6%" height="39"></td>
                                </tr>
                              </table>
 
                            </td>
                          </tr>
                          <tr>
                            <td width="100%" height="49" valign="top">
                              <table border="0" width="100%" height="37">
                                <tr>
                                  <td width="100%" height="25">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                                  </td>
                                </tr>
                                <tr>
                                  <td width="100%" height="21">
                                    <table border="0" width="100%">
                                      <tr>
                                        <td width="36%"></td>
                                        <td width="64%" valign="bottom"><b><a href="gbook.asp?id=<%=rs_shjia("shjiaid")%>"><font color="#636363">在线留言</font></a></b></td>
                                      </tr>
                                    </table>
                                  </td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                          <tr>
                            <td width="100%" height="18"></td>
                          </tr>
                          <tr>
                            <td width="100%" height="18"></td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                  </center>
                </div>
              </td>
            </tr>
          </table>
          </center>
        </div>
      </td>
    </tr>
  </table>
  </center>
</div>
<!--#include file="copyright.asp"-->

</body>

