asp 简单读取、数据表并列出来

 call opendb()
         rs.open sql6,conn,1,1
      do while not rs.eof
      %>
      <tr>
        <td height="25" align="left" bgcolor="#FFFFFF"><a href="display.asp?id=<%=rs("id")%>&table_s=hot_lm" target="_blank" class="prodcut">&nbsp;&nbsp;<img src="index_files/dot_email.gif" width="5" height="5" border="0" />&nbsp;&nbsp;<%=rs("title")%></a></td>
        <td height="25" bgcolor="#FFFFFF"><%=rs("send_date")%></td>
        <td height="25" align="center" bgcolor="#FFFFFF">专题报道</td>
      </tr>
      <%rs.movenext
      loop
      else%>
      <tr>
        <td align="right">
          <%response.write("暂时没有相关内容，或你是非法进入！")%>
        </td>
      </tr>
    </table>
    <%
   
    end if