<!--#include file="inc_top.asp"-->
<table width="762" bgcolor="#ffffff" align="center" cellpadding="0" cellspacing="0" class="pian">
<tr><td colspan="2"><img src=image/bannerhelp.gif></td></tr>
<tr><td colspan="2" height=2 bgcolor="#ffcc00"></td></tr>
  <tr>
    <td width="170" height="400" valign="top" class="table-you"> 
      <table width="170" 
      border=0 align=center cellpadding=0 cellspacing=0>
        <tr> 
          <td align="center" valign="middle"><img src="image/faq.gif" width="170" height="25"></td>
        </tr>
         
          <%
      set rs = conn.execute("select * from kefu_lb")
      do while not rs.eof
	  Response.Write("<tr><td valign=middle height=25>&nbsp;<img src=image/ring03.gif>&nbsp;<a href=?lb="&rs("lb")&">"&rs("lb")&"</a></td></tr>")
      rs.movenext
      loop
      rs.close
      %>
      </table>
      <table width="100%">
        <tr>
          <td height="2"></td>
        </tr>
      </table>
      <table width="100%" border="0" cellpadding="2" cellspacing="0">
        <tbody>
          <tr> 
            <td align="center" class="table-shang"><img src="image/sou.gif" width="166" height="30"></td>
          </tr>
          <tr> 
            <form name="form1" method="get" action="?s=yes">
              <td height="25" align="center" valign="middle" bgcolor="#FFFFFF" class="table-xia"> 
                <input name="key" type="text" class="wenbenkuang" id="key" size="12" maxlength="10"><input name="imageField" type="image" src="image/search.gif" align="middle" width="52" height="19" border="0" onFocus="this.blur()"> 
              </td>
            </form>
          </tr>
        </tbody>
      </table>
    </td>
    <td valign="top" width=590 align=left><% If request("id")<>"" Then %><!--#include file="conn/ubbhtml.asp"-->
      <table width="98%" border="1" align="center" cellpadding="2" bordercolor="#FFFFFF">
        <%set rs = conn.execute("select * from kefu where id="&request("id")&"") %>
        <tr> 
          <td height="30" align="center" valign="middle" bordercolor="#f1f1f1"><font color="#FF9900" size="3"><strong><%=rs("bt")%></strong></font></td>
        </tr>
        <tr> 
          <td height="150" valign="top" bordercolor="#f1f1f1"><%txt = rs("nr")
txt = Replace(txt, chr(32), "&nbsp;")
txt = Replace(txt, vbCrLf, "<br>")
txt=ubbcode(txt)
Response.Write txt
%>
 </td>
        </tr>
      </table>
      <% Else %>
      <table width="98%" align="center" cellpadding="2">
        <% Set rs=Server.CreateObject("ADODB.Recordset")
if Request("s")="" and Request("key")="" then
if Request("lb")<>"" then
sql="select * from kefu where lb='"&Request("lb")&"' order by id desc"
else
sql="select * from kefu order by id desc"
end if
else
sql="select * from kefu where bt like '%"&Request("key")&"%' or nr like '%"&Request("key")&"%' order by id desc"
end if
rs.open sql,conn,3,1
if rs.eof then
response.write "暂无内容"
end if 
rs.pagesize = 15
if request("page")=""  or isempty(request("page")) then
page = 1
else
page=int(request("page"))
end if
if page>rs.pagecount then
page=rs.pagecount
end if
if not rs.BOF then
Rs.Move Rs.PageSize*(page-1)
end if
i=1
do while not rs.eof and i<=rs.pagesize
%><tr>
          <td height="22" valign="middle"><img src="image/tp09.gif" width="12" height="12">&nbsp;<a href="?id=<%=rs("id")%>"><%=rs("bt")%></a>&nbsp;</td>
        </tr><%
i=i+1
 rs.MoveNext                                              
 loop 
%><tr> <form name=form method=post action=?lb=<%=Request("lb")%>>
<td height="30" align="center" valign="middle"> 
<%
if rs.recordcount<>0 then
if page-1 mod 5=0 then
		p=(page-1) \ 5
	else
		p=(page-1) \ 5
	end if

	response.write "页次："& page &"/"& rs.pagecount &"页"&_
					" 分页："
        if rs.pagecount>1 and page<>1 then response.write "<a href=?lb="&Request("lb")&"&page=1 title='首页'>[|<]</a> "
	if p*5>0 then response.write "<a href='?lb="&Request("lb")&"&page="&p*5&"' title=上十页>[&lt;&lt;]</a>   "
    uming_i=1
	for ii=p*5+1 to P*5+5
		   if ii=page then
	          response.write "<font color=#ff0000>["+Cstr(ii)+"]</font> "
		   else
		      response.write "<a href='?lb="&Request("lb")&"&page="&ii&"'>["+Cstr(ii)+"]</a>   "
		   end if
		if ii=rs.pagecount then exit for
		 uming_i=uming_i+1
	next
	if ii<=rs.pagecount and uming_i=11 then response.write "<a href='?lb="&Request("lb")&"&page="&ii&"' title=下十页>[&gt;&gt;]</a>   "
        if rs.pagecount>1 and page<>rs.pagecount then response.write "<a href=?lb="&Request("lb")&"&page="& rs.pagecount &" title='尾页'>[>|]</a>"
response.write(" 　跳页：<input type=text name=page size=2 maxlength=3 class=wenbenkuang> <input type=submit name=Submit value=Go class=go-wenbenkuang>")
end if
rs.close
set rs=nothing
%></td></form>
        </tr>
      </table>
      <% End If %>
    </td>
  </tr>
</table> 
<table width="0" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
<!--#include file="inc_end.asp" -->