ASP
求救啊，错误类型：ADODB.Field (0x80020009)BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区<!--#include file="config.asp"-->
<!--#include file="main_menu.asp"-->
<%
if session("user")="" then
conn.close
set conn=nothing
response.redirect "login.asp?error_inf=请登陆后再进行购物清算!&come=shop"
end if
%>
<%
if request("order_number")="all" then
sql="select * from 订单表 where 用户名='"&session("user")&"' order by 订单ID"
else
sql="select * from 订单表 where 用户名='"&session("user")&"' and 订单ID='"&request("order_number")&"' order by 订单ID"
end if
set rs_order=server.createobject("adodb.recordset")
rs_order.open sql,conn,1,1
if rs_order.recordcount=0 then
response.Redirect("order_search.asp?error_inf=您查找的订单不存在,请重新输入订单号!")
end if
pagesize=3
if request("page")="" or request("page")<=0 then
page=1
else
page=request("page")
end if
recordall=rs_order.recordcount
if recordall<>0 then
rs_order.PageSize = Cint(pagesize)
pageall=INT(recordall / pagesize * -1)*-1
therecord=recordall-((page-1)*pagesize)
rs_order.absolutepage=CInt(page)
end if
%>
<html>
<head>
<title>417CD购物网</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style/index.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<style type="text/css">
<!--
.line {
line-height: 20px;
}
-->
</style>
</head>
<body background="images/index_bg.gif" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="205" rowspan="3"><img src="images/index_logo.gif" width="205" height="91"></td>
<td width="286" height="20"><img src="images/index_banner.gif" width="572" height="66"></td>
</tr>
<tr>
<td colspan="2" bgcolor="#0C5F00"><img src="images/Spacer.gif" width="1" height="4"></td>
</tr>
<tr>
<td height="20" colspan="2" align="right" bgcolor="#79B43D" class="menu"><%=main_menu%></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#E2E2E2"><img src="images/Spacer.gif" width="1" height="4"></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="172" valign="top" bgcolor="#79B43D"><!--#include file="left_menu.asp"--></td>
<td width="606" valign="top"> <table width="95%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/order_01.gif" width="236" height="44"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
<tr>
<td><img src="images/index_pro01111.gif" width="573" height="41"></td>
</tr>
<tr>
<td align="center" valign="top" background="images/index_pro03.gif">
<%
for i=1 to pagesize
if rs_order.eof then
exit for
end if
%>
<table width="90%" border="0" cellpadding="5" cellspacing="0" class="fenlei">
<tr>
<td width="47%" bgcolor="#FFFFFF"><strong>订单号：<%=rs_order("订单ID")%></strong></td>
<td width="34%" bgcolor="#FFFFFF">日期：<%=rs_order("订单日期")%></td>
<td width="19%" align="right" bgcolor="#FFFFFF">
<%
if rs_order("是否处理")=1 then
%>
<font color="#FF6600">已处理</font>
<%
else
%>
<font color="#0033FF">未处理</font>
<%end if%>
</td>
</tr>
<tr>
<td colspan="3" class="line"><table width="100%" border="0" cellpadding="3" cellspacing="0" class="rightA">
<tr>
<td width="5%" bgcolor="#FFFFFF"> </td>
<td width="61%" bgcolor="#FFFFFF">订购物品</td>
<td width="17%" bgcolor="#FFFFFF">数量</td>
<td width="17%" bgcolor="#FFFFFF">单价</td>
</tr>
<%
sql_order_product="select * from 订单产品 where 订单ID='"&rs_order("订单ID")&"'"
set rs_order_product=server.createobject("adodb.recordset")
rs_order_product.open sql_order_product,conn,1,1
for j=1 to rs_order_product.recordcount
%>
<tr>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>><img src="images/index_title.gif" width="19" height="12"></td>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>>
<%
sql_product="select * from 产品表 where 产品ID="&rs_order_product("产品ID")
set rs_product=server.createobject("adodb.recordset")
rs_product.open sql_product,conn,1,1
if rs_product.recordcount<>0 then
%> <a href="product.asp?productID=<%=rs_order_product("产品ID")%>" target="_blank"><%=rs_product("商品名称")%></a> <%
end if
%> </td>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>><%=rs_order_product("订购数量")%></td>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>><%=rs_product("零售价")%></td>
</tr>
<%
rs_order_product.movenext
next
%>
<tr>
<td colspan="4" class="fenlei"><img src="images/Spacer.gif" width="1" height="5"></td>
</tr>
</table></td>
</tr>
</table>
<%
rs_order.movenext
next
%>
<table width="90%" border="0" cellpadding="8" cellspacing="0" class="fenlei">
<tr>
<td width="35%">第<%=page%>页/共<%=pageall%>页</td>
<td width="32%"> </td>
<td width="33%" align="right">
<%if Cint(page-1)<=0 then
response.write "上一页"
else%>
<a href="your_order.asp?order_number=all&page=<%=page-1%>">上一页</a>
<%end if%>
/
<%if Cint(page+1)>Cint(pageall) then
response.write "下一页"
else%>
<a href="your_order.asp?order_number=all&page=<%=page+1%>">下一页</a>
<%end if%>
</td>
</tr>
</table></td>
</tr>
<tr>
<td><img src="images/index_pro02.gif" width="573" height="46"></td>
</tr>
</table></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#62A537"><img src="images/Spacer.gif" width="1" height="9"></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td background="images/index_hengxuxian.gif"><img src="images/Spacer.gif" width="1" height="1"></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="30"><img src="images/index_min_logo.gif" width="97" height="29"></td>
<td width="748"><div align="center">长沙417 CD销售有限公司 版权所有 ©2006</div></td>
</tr>
</table>
</body>
</html>
<!--#include file="main_menu.asp"-->
<%
if session("user")="" then
conn.close
set conn=nothing
response.redirect "login.asp?error_inf=请登陆后再进行购物清算!&come=shop"
end if
%>
<%
if request("order_number")="all" then
sql="select * from 订单表 where 用户名='"&session("user")&"' order by 订单ID"
else
sql="select * from 订单表 where 用户名='"&session("user")&"' and 订单ID='"&request("order_number")&"' order by 订单ID"
end if
set rs_order=server.createobject("adodb.recordset")
rs_order.open sql,conn,1,1
if rs_order.recordcount=0 then
response.Redirect("order_search.asp?error_inf=您查找的订单不存在,请重新输入订单号!")
end if
pagesize=3
if request("page")="" or request("page")<=0 then
page=1
else
page=request("page")
end if
recordall=rs_order.recordcount
if recordall<>0 then
rs_order.PageSize = Cint(pagesize)
pageall=INT(recordall / pagesize * -1)*-1
therecord=recordall-((page-1)*pagesize)
rs_order.absolutepage=CInt(page)
end if
%>
<html>
<head>
<title>417CD购物网</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style/index.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<style type="text/css">
<!--
.line {
line-height: 20px;
}
-->
</style>
</head>
<body background="images/index_bg.gif" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="205" rowspan="3"><img src="images/index_logo.gif" width="205" height="91"></td>
<td width="286" height="20"><img src="images/index_banner.gif" width="572" height="66"></td>
</tr>
<tr>
<td colspan="2" bgcolor="#0C5F00"><img src="images/Spacer.gif" width="1" height="4"></td>
</tr>
<tr>
<td height="20" colspan="2" align="right" bgcolor="#79B43D" class="menu"><%=main_menu%></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#E2E2E2"><img src="images/Spacer.gif" width="1" height="4"></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="172" valign="top" bgcolor="#79B43D"><!--#include file="left_menu.asp"--></td>
<td width="606" valign="top"> <table width="95%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/order_01.gif" width="236" height="44"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
<tr>
<td><img src="images/index_pro01111.gif" width="573" height="41"></td>
</tr>
<tr>
<td align="center" valign="top" background="images/index_pro03.gif">
<%
for i=1 to pagesize
if rs_order.eof then
exit for
end if
%>
<table width="90%" border="0" cellpadding="5" cellspacing="0" class="fenlei">
<tr>
<td width="47%" bgcolor="#FFFFFF"><strong>订单号：<%=rs_order("订单ID")%></strong></td>
<td width="34%" bgcolor="#FFFFFF">日期：<%=rs_order("订单日期")%></td>
<td width="19%" align="right" bgcolor="#FFFFFF">
<%
if rs_order("是否处理")=1 then
%>
<font color="#FF6600">已处理</font>
<%
else
%>
<font color="#0033FF">未处理</font>
<%end if%>
</td>
</tr>
<tr>
<td colspan="3" class="line"><table width="100%" border="0" cellpadding="3" cellspacing="0" class="rightA">
<tr>
<td width="5%" bgcolor="#FFFFFF"> </td>
<td width="61%" bgcolor="#FFFFFF">订购物品</td>
<td width="17%" bgcolor="#FFFFFF">数量</td>
<td width="17%" bgcolor="#FFFFFF">单价</td>
</tr>
<%
sql_order_product="select * from 订单产品 where 订单ID='"&rs_order("订单ID")&"'"
set rs_order_product=server.createobject("adodb.recordset")
rs_order_product.open sql_order_product,conn,1,1
for j=1 to rs_order_product.recordcount
%>
<tr>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>><img src="images/index_title.gif" width="19" height="12"></td>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>>
<%
sql_product="select * from 产品表 where 产品ID="&rs_order_product("产品ID")
set rs_product=server.createobject("adodb.recordset")
rs_product.open sql_product,conn,1,1
if rs_product.recordcount<>0 then
%> <a href="product.asp?productID=<%=rs_order_product("产品ID")%>" target="_blank"><%=rs_product("商品名称")%></a> <%
end if
%> </td>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>><%=rs_order_product("订购数量")%></td>
<td <%if (j mod 2)=0 then%>bgcolor="#FFFFFF"<%end if%>><%=rs_product("零售价")%></td>
</tr>
<%
rs_order_product.movenext
next
%>
<tr>
<td colspan="4" class="fenlei"><img src="images/Spacer.gif" width="1" height="5"></td>
</tr>
</table></td>
</tr>
</table>
<%
rs_order.movenext
next
%>
<table width="90%" border="0" cellpadding="8" cellspacing="0" class="fenlei">
<tr>
<td width="35%">第<%=page%>页/共<%=pageall%>页</td>
<td width="32%"> </td>
<td width="33%" align="right">
<%if Cint(page-1)<=0 then
response.write "上一页"
else%>
<a href="your_order.asp?order_number=all&page=<%=page-1%>">上一页</a>
<%end if%>
/
<%if Cint(page+1)>Cint(pageall) then
response.write "下一页"
else%>
<a href="your_order.asp?order_number=all&page=<%=page+1%>">下一页</a>
<%end if%>
</td>
</tr>
</table></td>
</tr>
<tr>
<td><img src="images/index_pro02.gif" width="573" height="46"></td>
</tr>
</table></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#62A537"><img src="images/Spacer.gif" width="1" height="9"></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td background="images/index_hengxuxian.gif"><img src="images/Spacer.gif" width="1" height="1"></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="30"><img src="images/index_min_logo.gif" width="97" height="29"></td>
<td width="748"><div align="center">长沙417 CD销售有限公司 版权所有 ©2006</div></td>
</tr>
</table>
</body>
</html>
...全文
相关推荐
PHP收货信息自动识别、自动补全，成功率95%
使用场景：商城类小程序、APP、H5，填写收货地址时 主要功能：根据某宝、某东、某信，及Excel等复制信息，或手动填写的部分信息，自动识别并补全相关收货地址。 注意事项：解压后将data中的json文件，更换为自身业务省、市、区、街道记录编号（便于已有业务数据关联） 省、市、区业务导出替换示例： // 省 select CAST(ProvinceID AS CHAR) as code, ProvinceName as name from Province order by ProvinceID asc; // 市 select CAST(CityID AS CHAR) as code, CityName as name, CAST(ProvinceID AS CHAR) as provinceCode from City order by ProvinceID asc, CityID asc;
PHP智能识别收货地址信息实例
今天小编就为大家分享一篇关于PHP智能识别收货地址信息实例，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧
PHP实现电商订单自动确认收货redis队列
一、场景 之前做的电商平台，用户在收到货之后，大部分都不会主动的点击确认收货，导致给商家结款的时候，商家各种投诉，于是就根据需求，要做一个订单在发货之后的x天自动确认收货。所谓的订单自动确认收货，就是在在特定的时间，执行一条update语句，改变订单的状态。 二、思路 最笨重的做法，通过linux后台定时任务，查询符合条件的订单，然后update。最理想情况下，如果每分钟都有需要update的订单，这种方式也还行。奈何平台太小，以及卖家发货时间大部分也是密集的，不会分散在24小时的每分钟。那么，定时任务的话，查询过多，不适合。这里可以先把将要自动确认收货的订单信息存储到其他介质上，比如redi
微信收货地址PHP接口源码
微信收货地址PHP接口源码
PHP解析收货人信息[项目代码]
本文介绍了如何使用PHP解析收货人信息，包括提取收货人姓名、地址、电话、邮政编码和身份证号等关键信息。通过正则表达式匹配和字符串处理技术，文章详细展示了如何去除干扰项并准确提取所需数据。代码示例展示了纯PHP实现，无需依赖数据库或第三方接口，兼容任何PHP版本。该方法适用于处理包含多种信息的字符串，如收货地址，并提供了详细的步骤说明和代码实现。
