请帮忙看下这段代码是否有错，感谢！积善之家必有余庆

非常感谢诸位！！！！！！！

include文件中引入的的数据库连接内容如下
dim db,dbstr,html_title
set db=server.CreateObject ("adodb.connection")
   
    dbstr ="Provider = Microsoft.Jet.OLEDB.4.0; Data Source ="& Server.MapPath("../test/Inc/#inc_db_janis#.mdb")
    db.Open dbstr
   
    Session.Timeout=30


 正文
set rs2=Server.CreateObject("ADODB.Recordset")
rs2.open sql,db,1,1
%>
<table border="1" cellpadding="2"  cellspacing="0"   >
<%经测试下出现问题
If Not rs2.Bof And Not rs2.Eof Then   '如需分页显示，加源程序内容或本网站分页
  Do While Not rs2.Eof
%>

 <tr  valign="middle">


 <td align="center"><%=rs2("name")%></td>

 <td align="center"><%=rs2("address")%></td>

 <td align="center"><%=rs2("Schools")%></td>

 <td align="center"><%=rs2("Classa")%></td>

 <td align="center"><%=rs2("num")%></td>

 </tr>
<% rs2.MoveNext              
  Loop
End If
%>

 

</table>