| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1648 人关注过本帖
标题:求助!错误 '800a03f6' 和 错误 '800a0cc1'
只看楼主 加入收藏
yyah
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2006-10-12
收藏
 问题点数:0 回复次数:6 
求助!错误 '800a03f6' 和 错误 '800a0cc1'

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

缺少 'End'

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

ADODB.Recordset 错误 '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/gpec/news/edit_prorpt.asp,行99

请问出错在那里 下面是原程序编辑中的一部分。
出错:在打开网页编辑后台操作,按编辑显示上面的界面。
我是个菜鸟。
请帮助我的说的详细一些!
if mtype="update" then
sql="update ie_prorpt set f1='"&f1&"',f2='"&f2&"',f3='"&f3&"',f4='"&f4&"',f5='"&f5&"',f6='"&f6&"',f7='"&f7&"',f8='"&f8&"',f9='"&f9&"',f10='"&f10&"',f11='"&f11&"',f12='"&f12&"',f13='"&f13&"',f14='"&f14&"',f15='"&f15&"',f16='"&f16&"',f17='"&f17&"',f18='"&f18&"',f19='"&f19&"',f20='"&f20&"',f21='"&f21&"',f22='"&f22&"',f23='"&f23&"',f24='"&f24&"',f25='"&f25&"',f26='"&f26&"' where year(f_date)='"&yyyy&"' and month(f_date)='"&mm&"' and day(f_date)='"&dd&"',cb1='"&cb1&"',cb2='"&cb2&"',cb3='"&cb3&"',cb4='"&cb4&"' where id='"&id&"'"
cntIE.execute sql
response.write "<center>工程快报编辑成功!<br><br><a href=javascript:window.close()>关闭</a></center>"
'response.end
end if
if mtype="insert" then
sql="insert ie_prorpt(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f25,f26,cb1,cb2,cb3,cb4)values('"&f1&"','"&f2&"','"&f3&"','"&f4&"','"&f5&"','"&f6&"','"&f7&"','"&f8&"','"&f9&"','"&f10&"','"&f11&"','"&f12&"','"&f13&"','"&f14&"','"&f15&"','"&f16&"','"&f17&"','"&f18&"','"&f19&"','"&f20&"','"&f21&"','"&f22&"','"&f23&"','"&f24&"','"&f25&"','"&f26&"','"&cb1&"','"&cb2&"','"&cb3&"','"&cb4&"')"
cntIE.execute sql
response.write "<center>工程快报编辑成功!<br><br><a href=javascript:window.close()>关闭</a></center>"
'response.end
end if
else
sql="select top 1 * from ie_prorpt order by id desc"
set rs=cntIE.execute(sql)

搜索更多相关主题的帖子: 编辑 sql collection Microsoft requested 
2006-10-12 09:39
xiapi
Rank: 1
等 级:新手上路
威 望:2
帖 子:305
专家分:0
注 册:2006-10-11
收藏
得分:0 
以下是引用yyah在2006-10-12 9:39:46的发言:

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

缺少 'End'

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

ADODB.Recordset 错误 '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/gpec/news/edit_prorpt.asp,行99

请问出错在那里 下面是原程序编辑中的一部分。
出错:在打开网页编辑后台操作,按编辑显示上面的界面。
我是个菜鸟。
请帮助我的说的详细一些!
if mtype="update" then
sql="update ie_prorpt set f1='"&f1&"',f2='"&f2&"',f3='"&f3&"',f4='"&f4&"',f5='"&f5&"',f6='"&f6&"',f7='"&f7&"',f8='"&f8&"',f9='"&f9&"',f10='"&f10&"',f11='"&f11&"',f12='"&f12&"',f13='"&f13&"',f14='"&f14&"',f15='"&f15&"',f16='"&f16&"',f17='"&f17&"',f18='"&f18&"',f19='"&f19&"',f20='"&f20&"',f21='"&f21&"',f22='"&f22&"',f23='"&f23&"',f24='"&f24&"',f25='"&f25&"',f26='"&f26&"' where year(f_date)='"&yyyy&"' and month(f_date)='"&mm&"' and day(f_date)='"&dd&"',cb1='"&cb1&"',cb2='"&cb2&"',cb3='"&cb3&"',cb4='"&cb4&"' where id='"&id&"'"
cntIE.execute sql
response.write "<center>工程快报编辑成功!<br><br><a href=javascript:window.close()>关闭</a></center>"
'response.end
end if
if mtype="insert" then
sql="insert ie_prorpt(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f25,f26,cb1,cb2,cb3,cb4)values('"&f1&"','"&f2&"','"&f3&"','"&f4&"','"&f5&"','"&f6&"','"&f7&"','"&f8&"','"&f9&"','"&f10&"','"&f11&"','"&f12&"','"&f13&"','"&f14&"','"&f15&"','"&f16&"','"&f17&"','"&f18&"','"&f19&"','"&f20&"','"&f21&"','"&f22&"','"&f23&"','"&f24&"','"&f25&"','"&f26&"','"&cb1&"','"&cb2&"','"&cb3&"','"&cb4&"')"
cntIE.execute sql
response.write "<center>工程快报编辑成功!<br><br><a href=javascript:window.close()>关闭</a></center>"
'response.end
end if
else
sql="select top 1 * from ie_prorpt order by id desc"
set rs=cntIE.execute(sql)

'这里的end if放最后试一下
else
sql="select top 1 * from ie_prorpt order by id desc"
set rs=cntIE.execute(sql)
end if


没有什么能够阻挡,我对自由的向往,天马行空的生涯一颗心了无牵挂。
2006-10-12 09:44
yyah
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2006-10-12
收藏
得分:0 
我把整个原程序贴出来。
<!--#include virtual="/commonFileAsp.asp"-->

<%
Function Getpbdate(TheDate)
y=year(date)
m=month(date)
d=day(date)
w=weekday(date)
if w=1 then wk="星期日"
if w=2 then wk="星期一"
if w=3 then wk="星期二"
if w=4 then wk="星期三"
if w=5 then wk="星期四"
if w=6 then wk="星期五"
if w=7 then wk="星期六"
Getpbdate=y&"年"&m&"月"&d&"日"&" "&wk
'Getpbdate = Getpbdate&" "&DatePart("h",TheDate)
'Getpbdate = Getpbdate&":"&DatePart("n",TheDate)
End Function
if trim(request("ok")="yes") then
id=trim(request("id"))
f1=trim(request("f1"))
f2=trim(request("f2"))
f3=trim(request("f3"))
f4=trim(request("f4"))
f5=trim(request("f5"))
f6=trim(request("f6"))
f7=trim(request("f7"))
f8=trim(request("f8"))
f9=trim(request("f9"))
f10=trim(request("f10"))
f11=trim(request("f11"))
f12=trim(request("f12"))
f13=trim(request("f13"))
f14=trim(request("f14"))
f15=trim(request("f15"))
f16=trim(request("f16"))
f17=trim(request("f17"))
f18=trim(request("f18"))
f19=trim(request("f19"))
f20=trim(request("f20"))
f21=trim(request("f21"))
f22=trim(request("f22"))
f23=trim(request("f23"))
f24=trim(request("f24"))
f25=trim(request("f25"))
f26=trim(request("f26"))
yyyy=trim(request("yyyy"))
mm=trim(request("mm"))
dd=trim(request("dd"))
mtype=trim(request("mtype"))
cb1=trim(request("cb1"))
cb2=trim(request("cb2"))
cb3=trim(request("cb3"))
cb4=trim(request("cb4"))
if mtype="update" then
sql="update ie_prorpt set f1='"&f1&"',f2='"&f2&"',f3='"&f3&"',f4='"&f4&"',f5='"&f5&"',f6='"&f6&"',f7='"&f7&"',f8='"&f8&"',f9='"&f9&"',f10='"&f10&"',f11='"&f11&"',f12='"&f12&"',f13='"&f13&"',f14='"&f14&"',f15='"&f15&"',f16='"&f16&"',f17='"&f17&"',f18='"&f18&"',f19='"&f19&"',f20='"&f20&"',f21='"&f21&"',f22='"&f22&"',f23='"&f23&"',f24='"&f24&"',f25='"&f25&"',f26='"&f26&"' where year(f_date)='"&yyyy&"' and month(f_date)='"&mm&"' and day(f_date)='"&dd&"',cb1='"&cb1&"',cb2='"&cb2&"',cb3='"&cb3&"',cb4='"&cb4&"' where id='"&id&"'"
cntIE.execute sql
response.write "<center>工程快报编辑成功!<br><br><a href=javascript:window.close()>关闭</a></center>"
'response.end
end if
if mtype="insert" then
sql="insert ie_prorpt(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f25,f26,cb1,cb2,cb3,cb4)values('"&f1&"','"&f2&"','"&f3&"','"&f4&"','"&f5&"','"&f6&"','"&f7&"','"&f8&"','"&f9&"','"&f10&"','"&f11&"','"&f12&"','"&f13&"','"&f14&"','"&f15&"','"&f16&"','"&f17&"','"&f18&"','"&f19&"','"&f20&"','"&f21&"','"&f22&"','"&f23&"','"&f24&"','"&f25&"','"&f26&"','"&cb1&"','"&cb2&"','"&cb3&"','"&cb4&"')"
cntIE.execute sql
response.write "<center>工程快报编辑成功!<br><br><a href=javascript:window.close()>关闭</a></center>"
'response.end
end if
else
sql="select top 1 * from ie_prorpt order by id desc"
set rs=cntIE.execute(sql)
if not rs.eof then
id=trim(rs("id"))
f1=trim(rs("f1"))
f2=trim(rs("f2"))
f3=trim(rs("f3"))
f4=trim(rs("f4"))
f5=trim(rs("f5"))
f6=trim(rs("f6"))
f7=trim(rs("f7"))
f8=trim(rs("f8"))
f9=trim(rs("f9"))
f10=trim(rs("f10"))
f11=trim(rs("f11"))
f12=trim(rs("f12"))
f13=trim(rs("f13"))
f14=trim(rs("f14"))
f15=trim(rs("f15"))
f16=trim(rs("f16"))
f17=trim(rs("f17"))
f18=trim(rs("f18"))
f19=trim(rs("f19"))
f20=trim(rs("f20"))
f21=trim(rs("f21"))
f22=trim(rs("f22"))
f23=trim(rs("f23"))
f24=trim(rs("f24"))
f25=trim(rs("f25"))
f26=trim(rs("f26"))
yyyy=year(rs("f_date"))
mm=month(rs("f_date"))
dd=day(rs("f_date"))
cb1=trim(rs("cb1"))
cb2=trim(rs("cb2"))
cb3=trim(rs("cb3"))
cb4=trim(rs("cb4"))
if (yyyy=year(now))and(mm=month(now))and(dd=day(now)) then
mtype="update"
else
mtype="insert"
end if
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>工程快报</title>
<STYLE type=text/css>
BODY {
COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 12px; LINE-HEIGHT: 18px; TEXT-DECORATION: none
}
TD {
COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 12px; LINE-HEIGHT: 18px; TEXT-DECORATION: none
}
.textface {
border-left-style: solid; border-left-color: #FFFFFF; border-right-style: solid; border-right-color: #FFFFFF; border-top-style: solid; border-top-color: #FFFFFF; border-bottom-style: solid; border-bottom-width: 1;border-bottom-color: #0000FF;color:#ff0000
}
INPUT.buttonface
{
border-left:1 ridge #ffffff;border-top:1 ridge #ffffff;border-bottom:1;border-right:1;border-style:ridge;background-color:rgb(235,207,2)
}
</STYLE>
</head>
<BODY bgColor=#ffffff><center>当前日期:<%=Getpbdate(now)%><hr height="1" color=blue>
编辑工程快报
<form method="post" action="edit_prorpt.asp">
<input type="hidden" name="mtype" value="<%=mtype%>"><input type="hidden" name="id" value="<%=id%>">
<table cellpadding=0 cellspacing=0 border=0 width=550 style="FONT-SIZE: 15px">
<tr><td valign=top align=right>【日期】</td><td valign=top><input name="yyyy" size="6" class="textface" value=" <%=yyyy%>">年<input name="mm" size="6" class="textface" value=" <%=mm%>">月<input name="dd" size="6" class="textface" value=" <%=dd%>">日【天气】<input name="f1" size="21" class="textface" value=" <%=f1%>"></td></tr>
<tr><td colspan=2 height=6></td></tr>
<tr><td valign=top align=right>【安全】</td><td valign=top>当前安全天数<font color=red><input name="f2" size="6" class="textface" value=" <%=f2%>"></font>天,工程安全天数<font color=red><input name="f3" size="6" class="textface" value=" <%=f3%>"></font>天</td></tr>
<tr><td colspan=2 height=6></td></tr>
<tr><td valign=top align=right>【质量】</td><td valign=top>分项工程验收优良率<font color=red><input name="f4" size="6" class="textface" value=" <%=f4%>">%</font><br>焊口检验一次合格率<font color=red><input name="f5" size="6" class="textface" value=" <%=f5%>">%</font><br>不符合项关闭率<font color=red><input name="f6" size="6" class="textface" value=" <%=f6%>">%</font></td></tr>
<tr><td colspan=2 height=6></td></tr>
<tr><td valign=top align=right>【进度】</td><td valign=top>
<P>总体进度<font color=red><input name="f7" size="6" class="textface" value=" <%=f7%>">%</font>,提前(+)<font color=red>/</font>拖后(-)<font color=red><input name="f8" size="6" class="textface" value=" <%=f8%>">%</font>,累计完成WLU<font color=red><input name="f10" size="6" class="textface" value=" <%=f10%>"></font><br>
本周完成进度<font color=red><input name="f11" size="6" class="textface" value=" <%=f11%>">%</font>,完成WLU<font color=red><input name="f12" size="6" class="textface" value=" <%=f12%>"></font><br>
下周计划进度<font color=red><input name="f13" size="6" class="textface" value=" <%=f13%>">%</font>,计划完成WLU<font color=red><input name="f14" size="6" class="textface" value=" <%=f14%>"></font><br>
锅炉累计进度<font color=red><input name="f15" size="6" class="textface" value=" <%=f15%>">%</font>,汽管累计进度<font color=red><input name="f16" size="6" class="textface" value=" <%=f16%>">%</font><br>
电仪累计进度<font color=red><input name="f25" size="6" class="textface" value=" <%=f25%>">%</font>,油保累计进度<font color=red><input name="f26" size="6" class="textface" value=" <%=f26%>">%</font></P>
<tr><td colspan=2 height=6></td></tr>
<tr><td valign=top align=right>【人力】</td><td valign=top>
<P>分公司人力<font color=red><input name="f17" size="6" class="textface" value=" <%=f17%>"></font>人,其中管技人员<font color=red><input name="f18" size="6" class="textface" value=" <%=f18%>"></font>人,施工人员<font color=red><input name="f19" size="6" class="textface" value=" <%=f19%>"></font>人<br>
分包劳动力(包括分子公司)<font color=red><input name="f20" size="6" class="textface" value=" <%=f20%>"></font>人,其中分子公司<font color=red><input name="f21" size="6" class="textface" value=" <%=f21%>"></font>人,劳务支持<font color=red><input name="f22" size="6" class="textface" value=" <%=f22%>"></font>人<br>
总体劳动力<font color=red><input name="f23" size="6" class="textface" value=" <%=f23%>"></font>人,其中缺勤<font color=red><input name="f24" size="6" class="textface" value=" <%=f24%>"></font>人</P></td></tr>
<tr><td valign=top align=right>【成本】</td><td valign=top>ACWP<font color=red><input name="cb1" size="6" class="textface" value=" <%=cb1%>"></font>万,BCWP<font color=red><input name="cb2" size="6" class="textface" value=" <%=cb2%>"></font>万<br>
BCWS<font color=red><input name="cb3" size="6" class="textface" value=" <%=cb3%>"></font>万,CV<font color=red><input name="cb4" size="6" class="textface" value=" <%=cb4%>"></font>万
</td></tr>
<tr><td colspan=2 height=16></td></tr>
<tr><td colspan=2 align=middle ><input type="submit" value="提 交" class="buttonface">&nbsp;&nbsp;<input type="reset" value="重 填" class="buttonface"><input type="hidden" name="ok" value="yes"></td></tr>
</table></form></center>
</BODY>
2006-10-12 09:47
yyah
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2006-10-12
收藏
得分:0 
else
sql="select top 1 * from ie_prorpt order by id desc"
set rs=cntIE.execute(sql)
if not rs.eof then
id=trim(rs("id"))
f1=trim(rs("f1"))
f2=trim(rs("f2"))
f3=trim(rs("f3"))
f4=trim(rs("f4"))
f5=trim(rs("f5"))
f6=trim(rs("f6"))
f7=trim(rs("f7"))
f8=trim(rs("f8"))
f9=trim(rs("f9"))
f10=trim(rs("f10"))
f11=trim(rs("f11"))
f12=trim(rs("f12"))
f13=trim(rs("f13"))
f14=trim(rs("f14"))
f15=trim(rs("f15"))
f16=trim(rs("f16"))
f17=trim(rs("f17"))
f18=trim(rs("f18"))
f19=trim(rs("f19"))
f20=trim(rs("f20"))
f21=trim(rs("f21"))
f22=trim(rs("f22"))
f23=trim(rs("f23"))
f24=trim(rs("f24"))
f25=trim(rs("f25"))
f26=trim(rs("f26"))
yyyy=year(rs("f_date"))
mm=month(rs("f_date"))
dd=day(rs("f_date"))
cb1=trim(rs("cb1"))
cb2=trim(rs("cb2"))
cb3=trim(rs("cb3"))
cb4=trim(rs("cb4"))
if (yyyy=year(now))and(mm=month(now))and(dd=day(now)) then
mtype="update"
else
mtype="insert"
end if
end if
end if
这是程序后面的编辑
2006-10-12 09:49
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
逻辑错误,并且,你的99行是在哪?

http://www./
2006-10-12 09:50
yyah
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2006-10-12
收藏
得分:0 

2

[此贴子已经被作者于2006-10-12 14:31:53编辑过]

2006-10-12 10:03
yyah
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2006-10-12
收藏
得分:0 

11

[此贴子已经被作者于2006-10-12 14:30:17编辑过]

2006-10-12 10:05
快速回复:求助!错误 '800a03f6' 和 错误 '800a0cc1'
数据加载中...
 
   



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

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