ct螺距:ASP中数据库连接问题...

来源：百度文库编辑：神马品牌网时间：2024/04/28 16:20:56

Microsoft VBScript 编译器错误错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft VBScript 编译器错误错误 '800a0400'

缺少语句

/show.asp，行22

End;
^

源码:<%
set conn=server.CreateObject("adodb.connection")
constr="DBQ="+server.MapPath("db1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open constr
set rs=server.CreateObject("adodb.recordset")
sql="select * from UserTable"
rs.open sql,conn
%>
<%
response.Write("<table border=0><tr bgcolor=blue>")
for i=0 to rs.Fields.Count-1
response.Write("<td><fon color=white>"& rs.Fields(i).Name&"</td>")
next
response.Write("</tr>")
while not rs.Eof
response.Write("<tr bgcolor=yellow>")
for i=0 to rs.Fields.Count-1
response.Write("<td>" & rs.Fields(i).value & "</td>")
next
response.Write("</tr>")
rs.movenext
End;
response.Write("</table>")
%>

while not rs.Eof
response.Write("<tr bgcolor=yellow>")
for i=0 to rs.Fields.Count-1
response.Write("<td>" & rs.Fields(i).value & "</td>")
next
response.Write("</tr>")
rs.movenext
End;
response.Write("</table>")
就是这段句子出了问题，应该是把End;换成end while

很明显的语法错误么，ASP中怎么会有"End;"呢?应该是End If才对么:)

end;换乘wend

赞成以上说法!

ASP中数据库连接问题... asp中数据库连接问题在asp中关于数据库连接的问题 asp中ado数据库连接 ASP问题，数据库连接。 ASP站内搜索，数据库连接问题。。。。。 ASP站内搜索，数据库连接问题.............. asp和数据库连接问题 ASP 数据库连接问题 ASP数据库连接问题.