日期:2014-05-16 浏览次数:20872 次
'前面conn连接数据库代码已经弄好,省略
<table border="1" width="100%" cellspacing="0" cellpadding="0" class='tableBorder tableBorder-thcenter'>
<tr><th width="5%"></th>
<th width="10%">类id</th>
<th width="20%">类名称</th>
<th width="20%">类描述</th>
<th width="45%">操作</th>
</tr>
<%
'取得rs记录集----大类名称,id等信息
set rs=server.CreateObject("adodb.recordset")
rs.open "Select * From class",conn,1,3
do while not rs.eof
%>
<tr><td align="center"><img width="16" src="aloesky_IMAGES/folder.png" alt="" /></td>
<td><%=rs("classid")%></td>
<td><%=rs("classname")%></td>
<td><%=rs("dscr")%></td>
<td align="center"></td>
</tr>
<%
'根据classid来关联smallclass小类表,取得相应的小类数据
set rs1=server.CreateObject("adodb.recordset")
rs1.open "Select * From smallClass Where classid='" & rs("classid") & "'",conn,1,3
do while not rs1.eof
%>
<tr bgcolor="#E3E3E3><td> - </td>
<td></td>
<td><%=rs1("smallclassname")%></td>
<td><%=rs1("dscr")%></td>
<td align="center"></td>
</tr>
<%
rs1.movenext
loop
call rs1close
rs.movenext
loop
call rscolse
call connclose
%>
</table>
代码里有 On Error Resume Next的话,先注释掉,看看会不会报错
注释掉了,页面报错:
Microsoft JET Database Engine (0x80040E07)
标准表达式中数据类型不匹配。
/a/class_mgr.asp, 第 38 行
这一行是: rs1.open "Select * From smallClass Where classid='" & rs("classid") & "'",conn,1,3
我看了一下两个表的classid字段类型,都是“整型”,不知道为啥会提示数据类型不匹配呢?