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

请哪位大侠帮小弟解决下这个报错。。非常感谢。!

Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'

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

Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21'

ODBC 驱动程序不支持所需的属性。

/chinese/pwxx.asp,行70

以下是我的代码部分。请参看

sql = "select distinct zb_id,zb_name,zb_date,title,title2,zb_company,zb_baoz,zb_price,jpg_news,zb_jweight from office_info,pnews1,pnews11,ptime where zb_lable = title and zb_lable1 = title1 and deltype=0 "
sql = sql & " and zb_id = pid "
if request("zb_name") <> "" then
sql = sql & " and zb_lable = '"&request("zb_name")&"'"
end if
if request("zb_name1") <> "" then
sql = sql & " and zb_lable1 = '"&request("zb_name1")&"'"
end if
if request("key") <> "" then
sql = sql & " and (zb_company like '%"&request("key")&"%') "
end if
if date2 <> "" then
sql = sql & " and cint(year(str(ptime)))=cint(year(cdate('"&date2&"'))) and cint(month(str(ptime)))=cint(month(cdate('"&date2&"'))) and cint(day(str(ptime)))=cint(day(cdate('"&date2&"'))) "
end if
sql = sql & "order by zb_date desc"
rs.open sql,conn,1,1 ‘此行为70行’

搜索更多相关主题的帖子: ASP 
2006-09-12 20:04
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 

ODBC 驱动程序不支持所需的属性。
检查数据库的连接字符串是否正确。

2006-09-12 21:40
freaks
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2006-9-12
收藏
得分:0 
非常感谢楼上的朋友。。

您可否解释的再详细些呢?  能告诉我具体如何解决的有效办法么。。小弟初学。请多多指教
2006-09-13 15:15
xiyangyu
Rank: 1
等 级:新手上路
帖 子:142
专家分:0
注 册:2006-8-31
收藏
得分:0 
你用response.write sql
    response.end
在70行的上面写上这就话,把sql语句输出来,你在查询分析器里面检测一下,就知道是哪里错了

天行健,君子以自强不息;地势坤,君子以厚德载物。
2006-09-13 15:22
freaks
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2006-9-12
收藏
得分:0 
这是一个多表调用多个数据的执行语句。我也觉得肯定是有错误。。但没找出它究竟错在哪。。


还请大家帮忙看看。。哥们都快急哭了。。
2006-09-13 16:21
freaks
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2006-9-12
收藏
得分:0 
如果打开方式rs.open sql,conn,1,3 则报错为:



Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'

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

Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC Microsoft Access Driver] 该特定字段 'jpg_news' 可以参考 SQL 语句中 FROM 子句列表中的多个表。

/chinese/pwxx.asp,行71
2006-09-13 16:23
dyuter
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2006-6-30
收藏
得分:0 
8004错误主要表现在读写权限、属性有无,表有无等方面,看看这几个方面。
2006-09-13 23:43
dyuter
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2006-6-30
收藏
得分:0 
8004错误主要表现在读写权限、属性有无,表有无等方面,看看这几个方面。
2006-09-13 23:43
zhbzmzhbzm
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2006-9-14
收藏
得分:0 

这个错误怎么能解决呢..我的网页也出现了这个问题 ......真是头痛
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21'
ODBC 驱动程序不支持所需的属性。

/newslist.asp,行52

代码如下:
<table width="98%"border="0" cellspacing="5" cellpadding="0">

<%
if not (isempty(request("page")) or request("page")="" )then
currentPage=cint(request("page"))
else
currentPage=1
end if

sql = "select * from news where sort="&request("sort")&" order by id desc"

rs.open sql,conn,1,1 ----------这行的错误....为什么呀
if rs.eof and rs.bof then
response.write "<tr><td bgcolor=#ffffff style='font-size:12px'><CENTER>暂无资料</CENTER></td></tr>"
rs.close
else
rs.pagesize=10
totalput=rs.recordcount
totalpages=rs.pagecount
maxperpage=rs.pagesize
if currentpage<1 then
currentpage=1
end if
if currentpage>totalpages then
currentpage=totalpages
end if
if currentPage=1 then
showContent
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
dim bookmark
bookmark=rs.bookmark
showContent
end if
end if
rs.close

sub showContent
dim i
dim k
k=(totalPut-MaxPerPage*(currentPage-1))+1
i=0
do while not (rs.eof or err)
k=k-1
%>

<tr>
<td style="padding:3px">
<div align="left">&#149;&nbsp; <a href="news_show.asp?id=<%=rs("id")%>&sort=<%=rs("sort")%>" class=blue ><%=rs("subject")%></a> (<%=datevalue(rs("opertime"))%>) </div></td>
</tr>
<tr>
<TD height="1" background="images/xuxian.gif"></TD>
</tr>

<%
i=i+1
if i>=MaxPerPage then exit do
rs.movenext
loop
end sub

response.write "<tr height=20><td style='font-size:12px'>"
if totalpages >1 then
response.write "<p align=right>"
showpages
response.write "</p>"
response.write "</td></tr>"
else
response.write "<p align=right>栏目共1页</p></td></tr>"
end if


end if

sub showpages()
dim ppgg
ppgg="newslist.asp?"
%>
<%If currentPage = 1 Then%>
<font color="#999999"> 首页 </font>|
<font color="#999999"> 前页 </font>|
<A HREF="<%=ppgg%>Page=<%=currentPage+1%>" class=text>后页</A> |
<A HREF="<%=ppgg%>Page=<%=totalPages%>" class=text>尾页</A>
<%else%>
<%If currentPage = totalpages Then%>
<A HREF="<%=ppgg%>" class=text> 首页 </A>|
<A HREF="<%=ppgg%>Page=<%=currentPage-1%>" class=text>前页</A> |
<font color="#999999"> 后页 </font>|
<font color="#999999"> 尾页 </font>
<%else%>
<A HREF="<%=ppgg%>" class=text>首页</A> |
<A HREF="<%=ppgg%>Page=<%=currentPage-1%>" class=text>前页</A> |
<A HREF="<%=ppgg%>Page=<%=currentPage+1%>" class=text>后页</A> |
<A HREF="<%=ppgg%>Page=<%=totalPages%>" class=text>尾页</A>
<%
End If
End If
%>
 <%=currentPage%>/<%=totalpages%>
<%
end sub
%>

</table>

[此贴子已经被作者于2006-9-14 12:32:01编辑过]

2006-09-14 09:24
大虾飞龙
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2006-9-12
收藏
得分:0 
9楼地sort什么类型,如果是字符型加单引号试试
2006-09-14 10:58
快速回复:ASP程序问题。。急!![求助]错误 '80040e21'
数据加载中...
 
   



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

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