ipad一直充不进去电:有谁帮我看看这段程序 怎么错了啊

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/02 07:51:59
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<%dim lj
lj="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("tushu.mdb")
set bb=Server.CreateObject("ADODB.Connection")
bb.open lj%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head><%set rs=server.CreateObject("ADODB.recordset")
rs.open"select*from tushumingxi",bb,1,1%>

<body>
<%if rs.EOF and rs.BOF then response.Write("暂无信息")
else for i=1 to 3%>
<table>
<tr>
<td>编号:<% rs=("bh")%></td>
</tr>
<tr>
<td>名称:<%rs=("mc")%></td>
</tr>
</table>
<% rs.movenext
next
end if%>
<%rs.close
set bb=nothing%>

</body>
</html>

检查说 for i=1 to 3 错了 可我怎么也看不出错来 帮我改改吧 谢谢了啊
即使加了 step 1 也还是有错 它显示 else for i=1 to 3 step 1 有错误啊
将 for 另起一行以后 它显示 else 有错误 这又是怎么一回事啊 5555

是不是 if then else 语句有错啊

<%
if rs.EOF and rs.BOF then
response.Write("暂无信息") '这一行放到下面来,不要和上面的if放在同一行
else
for i=1 to 3 '这一行也放到下面来,不要和上面的else同一行
%>
<table>
<tr>
<td>编号:<% rs=("bh")%></td>
</tr>
<tr>
<td>名称:<%rs=("mc")%></td>
</tr>
</table>
<%
rs.movenext
next
end if
%>

把你的这段代码按我给的这个格式该换行的换行,该缩进的缩进。。

for i=1 to 3
next

这个不需要加step 1,它默认就是自动加1
而且你也有了rs.movenext

只是你的if else end if语句造成的错误.

语句不全啊,光有i=1 to 3,但是i 没有自加

在VB中,一个语句只能占用一行。
FOR语句要另起一行

else for i=1 to 3%> 这里不能写在一行,要写成这样

else
for i=1 to 3 %>