<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<table width="200" border="1">
<%
set rs=server.CreateObject("ADODB.RecordSet")
rs.Source="select* from Firefighting "
rs.Open rs.Source,conn,1,1
if not rs.EOF then
do while not rs.eof
%>
<tr>
<td><a href="slhz_pj_list.asp?id=<%=rs("ID")%>"><%=rs("title")%></a></td>
</tr>
<%
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table>
</body>
</html>