帮我看看ASP程序哪里写错了

conn.asp ‘连接数据库并打开表
<%
dim sjk
dim sjkconn
sjkconnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db1.mdb")
set sjk=server.createobject("ADODB.CONNECTION")
sjk.open sjkconnstr
%>
<%
set rs=Server.CreateObject("ADODB.recordset")
rs.open "select * from dubin",sjk,1,1
%>

show.asp '显示表里的内容
<!--#include file="conn.asp"-->
<%
if rs.EOF and rs.BOF the
response.write("完毕")
else
Do Until rs.EOF
response.write(rs.("bh"))
response.write(rs.("zm"))
response.write(rs.("je"))
rs.MoveNext
loop
end.if
%>
<%rs.close
set sjk=Nothing
%>

iis7以前会提示哪一行错了，现在没有提示。。只是说程序错误，我也不知道哪错了
不是程序问题,可能是vista系统中iis7配置出现问题了..会的帮帮忙,谢谢~~~~~~~~~

<%
dim sjk
dim sjkconn
sjkconnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db1.mdb")
set sjk=server.createobject("ADODB.CONNECTION")
sjk.open sjkconnstr
%>

show.asp '显示表里的内容
<!--#include file="conn.asp"-->
<%
set rs=Server.CreateObject("ADODB.recordset")
rs.open "select * from dubin",sjk,1,1
if rs.EOF and rs.BOF then
response.write("完毕")
else
Do while not rs.EOF
response.write(rs.("bh"))
response.write(rs.("zm"))
response.write(rs.("je"))
rs.MoveNext
loop
end.if
rs.close
set rs=Nothing
sjk.close
set sjk=nothing
%>

if rs.EOF and rs.BOF the
response.write("完毕")

－－－－－－－－－－－－－－－－－－－－
if rs.EOF and rs.BOF then
response.write("完毕")

<

帮我看看ASP程序哪里写错了 自己学写的ASP程序,大家帮我看看哪里错了!谢谢啦 我写ASP程序，出错了，高手帮我看看 帮我看看这段ASP代码哪里写错了 高手帮我看看ASP程序哪错了 asp的问题，帮我看看哪里错了 麻烦各位帮我看看ASP程序哪里错误 谁帮我看看这个C程序哪里错了 大家帮我看看这个C程序，哪里错了？ 帮我看看程序错在哪里了！