错误类型： Microsoft OLE DB Provider for ODBC Drivers (0x80040E14) [Microsoft][ODBC SQL Server Driver][SQL Server]第 1 行: '17' 附近有语法错误。 /newchaxun.asp, 第 227 行
sql_lichen="if exists(select * from sysobjects where name ='zonglichen') drop table zonglichen create table zonglichen(TeamNo varchar(10),veh_no varchar(10), zhongmile int ,kongmile int, allmile int ) insert into zonglichen select vehicle.v_teamno as 车队,vehicle.v_no as 车牌号,(select max(dyndata.wl_loadmile)-min(dyndata.wl_loadmile) from dyndata where dyndata.time >="&session("start_time")&" and dyndata.time <="&session("end_time")&" and vehicle.v_deviceid=dyndata.deviceid and dyndata.wl_loadmile >0 group by vehicle.v_no,vehicle.v_teamno,vehicle.V_Deviceid) as 重车里程 ,(select max(dyndata.wl_emptymile)-min(dyndata.wl_emptymile) from dyndata where dyndata.time >="&session("start_time")&" and dyndata.time <="&session("end_time")&" and vehicle.v_deviceid=dyndata.deviceid and dyndata.wl_emptymile >0 group by vehicle.v_no,vehicle.v_teamno,vehicle.V_Deviceid) as 空车里程 from vehicle,dyndata where dyndata.time >="&session("start_time")&" and dyndata.time <="&session("end_time")&" and vehicle.v_deviceid=dyndata.deviceid and vehicle.v_teamno like '%"&session("v_teamno")&"%' and vehicle.v_no like '%"&session("v_no")&"%' group by vehicle.v_no,vehicle.v_teamno,vehicle.V_Deviceid update zonglichen set allmile =zhongmile+kongmile select Teamno as 车队名, veh_no as 车牌号, zhongmile as 重车里程,kongmile as 空车里程,allmile as 总里程 from zonglichen "
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>无标题文档 </title> </head>
<body> <% sql_lichen="if exists(select * from sysobjects where name ='zonglichen') drop table zonglichen create table zonglichen(TeamNo varchar(10),veh_no varchar(10), zhongmile int ,kongmile int, allmile int ) insert into zonglichen select vehicle.v_teamno as 车队,vehicle.v_no as 车牌号,(select max(dyndata.wl_loadmile)-min(dyndata.wl_loadmile) from dyndata where dyndata.time >='"&session("start_time")&"' and dyndata.time <='"&session("end_time")&"' and vehicle.v_deviceid=dyndata.deviceid and dyndata.wl_loadmile >0 group by vehicle.v_no,vehicle.v_teamno,vehicle.V_Deviceid) as 重车里程 ,(select max(dyndata.wl_emptymile)-min(dyndata.wl_emptymile) from dyndata where dyndata.time >='"&session("start_time")&"' and dyndata.time <='"&session("end_time")&"' and vehicle.v_deviceid=dyndata.deviceid and dyndata.wl_emptymile >0 group by vehicle.v_no,vehicle.v_teamno,vehicle.V_Deviceid) as 空车里程 from vehicle,dyndata where dyndata.time >='"&session("start_time")&"' and dyndata.time <='"&session("end_time")&"' and vehicle.v_deviceid=dyndata.deviceid and vehicle.v_teamno like '%"&session("v_teamno")&"%' and vehicle.v_no like '%"&session("v_no")&"%' group by vehicle.v_no,vehicle.v_teamno,vehicle.V_Deviceid update zonglichen set allmile =zhongmile+kongmile select Teamno as 车队名, veh_no as 车牌号, zhongmile as 重车里程,kongmile as 空车里程,allmile as 总里程 from zonglichen " %> <% response.write " <hr align=center>以下为返回的查询结果：" set rs=server.CreateObject("ADODB.RECORDSET") rs.open sql_lichen,conn ,3,3 response.write " <table border=1>" & vbcrlf response.write " <tr style=""font-size:9pt;color:black"">" for i=1 to rs.fields.count response.write " <td style=""font-size:9pt;color:black"">"& rs.fields(i-1).name &" </td>" next response.write " </tr>" do while not rs.eof response.write " <tr onmouseover=""this.style.background='#ccffcc';this.style.cursor='hand';"" onmouseout=""this.style.background=body.style.background;"">" & vbcrlf for j=1 to rs.fields.count response.write " <td style=""font-size:9pt;color:black"">"& rs.fields(j-1) &" </td>" next response.write " </tr>" & vbcrlf rs.movenext loop response.write " </table>" %> </body> </html> 运行这个个ＡＳＰ代码时，发生拉如下错误信息 错误类型： ADODB.Recordset (0x800A0E78) 对象关闭时，不允许操作。 /TMPms6eyam5h.asp, 第 30 行
