无法显示记录
请看下面代码:
<%  
dim   conn  
set   conn=server.createobject( "adodb.connection ")  
conn.ConnectionString   =   "Provider=Microsoft.Jet.OLEDB.4.0; "   &   "Data   Source= "   &   Server.MapPath( "hc.mdb ")  
conn.open  

set   rs=server.CreateObject( "adodb.recordset ")  
sql= "select   *   from   product "  
rs.open   sql,conn,1,1  
%>

<table   border= "1 "   cellpadding= "2 "   cellspacing= "0 "   width= "605 "   bordercolor= "#C0C0C0 "   bordercolordark= "#FFFFFF "   id= "table1 "   height= "50 ">
<tr>
<td   width= "114 "   height= "22 "   align= "center "   bgcolor= "#D6E3FF ">
型号 </td>
<td   width= "124 "   height= "22 "   align= "center "   bgcolor= "#D6E3FF ">
库存 </td>
<td   width= "110 "   height= "22 "   align= "center "   bgcolor= "#D6E3FF ">
品牌 </td>
<td   width= "94 "   height= "22 "   align= "center "   bgcolor= "#D6E3FF ">
封装 </td>
<td   width= "86 "   height= "22 "   align= "center "   bgcolor= "#D6E3FF ">
批号 </td>
</tr>
<%do   while   not   rs.eof%>  
<tr>
<td   align= "center "   width= "114 "> <%=rs( "Typt ")%> asd </td>
<td   align= "center "   width= "124 "> <%=rs( "Quantity ")%> asd </td>
<td   align= "center "   width= "110 "> <%=rs( "Brand ")%> asd </td>
<td   align= "center "   width= "94 "> <%=rs( "Year ")%> asd </td>
<td   align= "center "   width= "86 "> <%=rs( "package_ID ")%> asd </td>
</tr>
<%rs.movenext
loop  
%>  
</table>

请问有什么问题吗?在浏览时无法显示记录..郁闷啊!请帮帮忙吧!

------解决方案--------------------
表里有内容吗