<%
    on error resume next
   	set conn=server.createobject("adodb.connection")
	DBPath = Server.MapPath("data/dataweb#.mdb")
	conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
	
	
%>
<style type="text/css">
<!--

.STYLE2 {
	color: #0B578D;
	font-weight: bold;
	font-size:14px;
	  font-family:"宋体";
}
.dt ul {
    margin:0px;
	padding:0;
	font-size:12px;
	  font-family:"宋体";
	}
.dt li {
    
	list-style:none;

	padding:0;
	margin:2px 0;
	line-height:20px;
	
	}
.dt a {
   
	list-style:none;
	background:url(dot2.jpg) no-repeat left;
	padding:0 0 0 20px;
	line-height:20px;
	color:#333;
	width:331px;
	display:block;
	}
.dt a:hover {
   
	list-style:none;
	background:#F4F9FF url(dot1.jpg) no-repeat left;
	padding:0 0 0 20px;
	line-height:20px;
	color:#333;
	width:331px;
	display:block;
	
	}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin-top:20px">
                <tr>
                  <td width="48%"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="4%" bgcolor="DAF0FE">&nbsp;</td>
                      <td width="96%" bgcolor="DAF0FE"><span class="STYLE2">帮助中心</span></td>
                    </tr>
                    <tr>
                      <td colspan="2" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0" class="dt">
                        <tr>
                          <td><ul>
						  <%
 set rs=server.createobject("adodb.recordset")
 sql="SELECT top 5 * from xinxi where class='帮助中心'  order by id desc"
 rs.open sql,conn,3,3
 do while not rs.eof
			%>
              <li><A href="list.asp?id=<%=rs("id")%>&class=<%=rs("class")%>"  target="main"><%=rs("title")%></A></li>
              <%
 rs.movenext
 loop
 rs.close
%>
          
          </ul></td>
                        </tr>
                      </table></td>
                    </tr>
                  </table></td>
                  <td width="4%">&nbsp;</td>
                  <td width="48%" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="4%" bgcolor="DAF0FE">&nbsp;</td>
                      <td width="96%" bgcolor="DAF0FE"><span class="STYLE2">相关新闻</span></td>
                    </tr>
                    <tr>
                      <td colspan="2" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0" class="dt">
                          <tr>
                            <td><ul>
                                 <%
 set rs=server.createobject("adodb.recordset")
 sql="SELECT top 5 * from xinxi where class='相关新闻'  order by id desc"
 rs.open sql,conn,3,3
 do while not rs.eof
			%>
              <li><A href="list.asp?id=<%=rs("id")%>&class=<%=rs("class")%>"  target="main"><%=rs("title")%></A></li>
              <%
 rs.movenext
 loop
 rs.close
%>
                            </ul></td>
                          </tr>
                      </table></td>
                    </tr>
                  </table></td>
                </tr>
              </table>
<%
www=Request.ServerVariables("SERVER_NAME") 
set rs=server.createobject("adodb.recordset")
shijian=date()
sql="select * from tongji where www='"&www&"' and shijian1='"&shijian&"'" 
rs.open sql,conn,1,3
if not(rs.bof and rs.eof) then

else

rs.addnew
rs("www")=Request.ServerVariables("SERVER_NAME") 
rs("shijian")=now()
rs("shijian1")=shijian
rs.update
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>