| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1393 人关注过本帖
标题:BOF 或 EOF 中有一个是“真”不太懂这句话,总调试不对.
只看楼主 加入收藏
solution
Rank: 1
等 级:新手上路
帖 子:206
专家分:0
注 册:2006-6-26
收藏
得分:0 

谢谢了,学了不少.
又一问题来麻烦大家了.不知道错在哪?说是那段错误,可检查了,没看出来哪错.
<!--#include file="../conn/conn.asp"-->
<%
set rs=createobject("adodb.recordset")
sql="select 类别ID,单位数量,单价,库存量,订购量 from chanpin"
rs.open sql,conn,1,1
pagecounter=15
%>
<html>
<head>
<title>删除表记录</title>
</head>
<body>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="2" bgcolor="#ffcc66">
<form name="form1" method="post" action="delete.asp">
<tr>
<td align="center" bgcolor="#ffffff"><span class="style3">产品名称</span></td>
<td align="center" bgcolor="#ffffff"><span class="style3">单位数量</span></td>
<td align="center" bgcolor="#ffffff"><span class="style3">单价</span></td>
<td align="center" bgcolor="#ffffff"><span class="style3">库存量</span></td>
<td align="center" bgcolor="#ffffff"><span class="style3">订购量</span></td>
<td align="center" bgcolor="#ffffff"><span class="style3">修改信息</span></td>
<td align="center" bgcolor="#ffffff"><input type="submit" name="Submit" value="删除"></td>
</tr>
<%
pageno=request.QueryString("pageno")
rs.pagesize=pagecounter
page=rs.pagecount
if pageno="" or pageno<1 then
pageno=1
end if
if rs.eof or rs.bof then
response.write"<font color=""ff0000"">此数据表没有记录!</font>"
else
rs.absolutepage=Cint(pageno)
position=rs.PageSize*pageno
pagebegin=position-rs.PageSize+1
if position<rs.RecordCount then
pagend=postion
else
pagend=rs.recordcount
end if
do while not.eof and c<=rs.pagesize
e=e+1
%>
<tr>
<td align="center" bgcolor="#FFFFFF" class="font2"><%=rs("产品名称")%></td>
<td align="center" bgcolor="#FFFFFF" class="font2"><%=rs("单位数量")%></td>
<td align="center" bgcolor="#FFFFFF" class="font2"><%=rs("单价")%></td>
<td align="center" bgcolor="#FFFFFF" class="font2"><%=rs("库存量")%></td>
<td align="center" bgcolor="#FFFFFF" class="font2"><%=rs("订购量")%></td>
<td align="center" bgcolor="#FFFFFF" class="font2">
<a href="modinfo.asp?MID=<%=rs("ID")%>">修改</a></td>
<td align="center" bgcolor="#FFFFFF" class="font2"><%ID=rs("ID") response.Write"<input type=""checkbox"" name=""checkbox"" value="""&ID&""""%></td>
</tr>
<%
rs.movenext
loop
pagecounter=pagecounter-1
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<tr>
<td colspan="7" align="center" bgcolor="#FFFFFF" class="font2">
页次:[<%=Cint(pageno)%>/<%=page%>]
记录:[<%=Cint(pagebegin)%>至<%=pagend%>条]
<%if Cint(pageno)>1 then%>
<a href="?pageno=<%=(pageno-1)%>">[上一页]</a>
<%end if%>
<%if page>1 and Cint(pageno)<Cint(page) then%>
<a href="?pageno=<%=(pageno+1)%>">[下一页]</a>
<%end if%>
</td>
</tr>
</form>
</table>
</body>
</html>



错误如下:
错误类型:
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
/second/modanddel.asp, line 53, column 12
ID=rs("ID") response.Write"<input type=""checkbox"" name=""checkbox"" value="""&ID&""""
-----------^


浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

网页:
GET /second/modanddel.asp


2007-08-27 19:14
阳光白雪
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:39
帖 子:2220
专家分:0
注 册:2005-11-18
收藏
得分:0 
<td align="center" bgcolor="#FFFFFF" class="font2">
<%
ID = rs("ID") ''这里是两个语句,是不能写在一行的
response.Write"<input type=""checkbox"" name=""checkbox"" value="""& ID &""""
%>

专注于WEB前端交互平台开发:[url=http://blog./]blog.[/url](富客户端技术(RIA)交流平台)
2007-08-28 09:10
solution
Rank: 1
等 级:新手上路
帖 子:206
专家分:0
注 册:2006-6-26
收藏
得分:0 

按你的指导,又出现了这样的错误:
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
/second/modanddel.asp, 第 5 行


浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

网页:
GET /second/modanddel.asp


2007-08-28 10:16
jamesxiaoyao
Rank: 1
等 级:新手上路
威 望:2
帖 子:173
专家分:0
注 册:2007-5-21
收藏
得分:0 
response.Write"&lt;input type='checkbox' name='checkbox' value='&amp;ID&amp;'&gt;"
2007-08-28 14:31
中国男孩
Rank: 1
等 级:新手上路
帖 子:291
专家分:7
注 册:2006-3-19
收藏
得分:0 

if not(rs.bof and rs.eof) then
response.write '写出
else
response.wirte "对不起,暂时还没有记录!"
end if

意思就是:如果 数据库里的记录,不以是最前,又不是最后的时候,那么就输出数据库里的记录,否则就输出:"对不起,暂时还没有记录"


我很想把计算机学好!!
2007-10-22 19:45
solution
Rank: 1
等 级:新手上路
帖 子:206
专家分:0
注 册:2006-6-26
收藏
得分:0 
谢谢.现在已懂了.

2007-10-30 17:05
cainiao158
Rank: 1
等 级:新手上路
威 望:1
帖 子:157
专家分:0
注 册:2007-9-14
收藏
得分:0 

我上次出现这种情况,是因为数据库里面没有记录,你最好再看一下数据库到底有没有记录!!!!


要想飞的更高,就把地平线忘掉!
2007-10-30 19:22
永夜的极光
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:2721
专家分:1
注 册:2007-10-9
收藏
得分:0 
最好不要用中文作为字段名,有时候会出现一些莫名其妙的错误

从BFS(Breadth First Study)到DFS(Depth First Study)
2007-10-30 19:48
hmhz
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:30
帖 子:1890
专家分:503
注 册:2006-12-17
收藏
得分:0 
<%ID=rs("ID") response.Write"<input type=""checkbox"" name=""checkbox"" value="""&ID&""""%>

改成

<input type="checkbox" name="checkbox" value="<%=rs("ID")%>" />

[此贴子已经被作者于2007-10-31 1:29:00编辑过]


[编程论坛] ASP超级群:49158383  敲门暗号:ASP编程
龍艺博客 http://www.
2007-10-31 01:27
快速回复:BOF 或 EOF 中有一个是“真”不太懂这句话,总调试不对.
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.019115 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved