<!--#include file="conn.asp"--> ('set rs=Server.CreateObject("ADODB.Recordset")已经定义过)
<%
id=request("id")
sq1="select * from type where lb_id="&id
rs.Open sq1,conn,1
lb_lb=rs("lb_lb")
rs.close
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=lb_lb%></title>
<link href="css/css1.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" valign="middle"><table width="770" border="0" cellspacing="0"
cellpadding="0">
<tr>
<td align="center" valign="top"><table width="770" height="60" border="0"
cellpadding="0" cellspacing="0" bgcolor="#105ce7">
<tr bgcolor="#0948a7">
<td><font size="4"><img src="IMAGES/logo.gif" width="770"
height="60"></font></td>
</tr>
</table></td>
</tr>
<tr>
<td width="770" height="25"><table width="770" height="25" border="0" cellpadding="0"
cellspacing="0">
<tr>
<%'生成菜单
sql="select * from type order by lb_id"
rs.Open sql,conn,1
do until rs.eof
%>
<td align="center" valign="middle" bgcolor="#f9ffec" ><a
href="index1.asp?id=<%=rs("lb_id")%>" class="black9"><%=rs("lb_lb")%></a> <font
color="#000000">|</font> </td>
<%
rs.Movenext
loop
%>
</tr>
</table></td>
</tr>
<tr>
<td align="center" valign="top"><table width="770" border="0" cellpadding="0"
cellspacing="1" bgcolor="#006633" >
<tr align="center" valign="middle" bgcolor="#009933">
<td width="200" height="20" class="white105">协会推荐信息</td>
<td width="550" height="20" class="white105"> 【<%=lb_lb%>】 欢迎您的光临!!!
</td>
</tr>
<tr>
<td width="200" align="left" valign="top" bgcolor="#f9ffec"><table width="198"
border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="198" height="5" align="center" valign="middle"
class="blue105"> </td>
</tr>
<tr>
<td width="198" height="25" align="left" valign="middle">
<%'热点新闻
rs.close
sq2="select * from news where nw_tuijian='1' order by nw_id DESC"
rs.Open sq2,conn,1
For i=1 to 5
If not rs.EOF Then
%>
·<a href="read.asp?id=<%=rs("nw_id")%>" target="_blank"
class="blue9"><%=rs("nw_biaoti")%></a><br>
<%
rs.Movenext
End If
Next
rs.close
%> </td>
</tr>
</table></td>
<td width="550" align="center" valign="top" bgcolor="#FFFFFF"><table width="550"
border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="550" align="right" valign="top"> </td>
</tr>
<tr>
<td width="550" align="center" valign="middle"><table width="550"
border="0" cellpadding="0" cellspacing="1" bgcolor="#f5f5f5">
<tr bgcolor="#CCE6CD">
<td width="400" height="20" align="center" valign="middle"
class="black9">标题</td>
<td width="148" height="20" align="center" valign="middle"
class="black9">加入时间</td>
</tr>
<%
sq1="select * from news where lb_id="&id&" order by nw_id DESC"
rs.Open sq1,conn,1
page=cint(request("page"))
rs.Pagesize=20
if page="" or page=0 then page=1
If page>rs.Pagecount Then Page=rs.Pagecount
'当内容为空也可正常显示,不加此则报错
if not rs.eof then
rs.Absolutepage=page
end if
For i=1 to rs.pagesize
If not rs.EOF Then
%>
<tr bgcolor="#f9ffec">
<td width="400" height="20" align="left" valign="middle"
bgcolor="#f9ffec"><font color=#0000FF size="2">◆</font><a href="read.asp?id=<%=rs("nw_id")%>"
target="_blank" class="black9"><%=rs("nw_biaoti")%></a></td>
<td width="148" height="20" align="center" valign="middle"
class="black9"><%=rs("nw_shijian")%></td>
</tr>
<%
rs.Movenext
End If
Next
%>
</table></td>
</tr>
<tr>
<td align="center" valign="middle"><table width="98%" border="0"
cellspacing="0" cellpadding="0">
<tr>
<form action="#" method="post" name="form1" >
<td height="30" align="center" valign="middle" class="blue9"> 共
<%=rs.recordcount%>篇文章 <%=rs.pagesize%>篇/每页 共<%=rs.pagecount%>页
当前第<%=page%>页
<input name="page" type="text" class="form1" id="page"
value="<%=page%>" size="3" maxlength="5">
<input name="Submit" type="submit" class="form1" value="Goto">
</td>
</form>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="20" align="center" valign="bottom" bgcolor="#009933" ><a href="index.asp"
class="white105">[返回首页]</a></td>
</tr>
<tr>
<td width="770" height="20" align="center" valign="middle">
<hr align="center">
<span class="black9"><font size="2" class="unnamed1" color="#000000"> 江门市女企业家
协会</font></span></td>
</tr>
<tr>
<td height="20" align="center" valign="middle"> </td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>