“ODBC 驱动程序不支持所需的属性”异常，好心人进来看看

2013-06-19

“ODBC 驱动程序不支持所需的属性”错误，好心人进来看看！本帖最后由 hevenhu 于 2013-03-14 11:10:41 编辑我

“ODBC 驱动程序不支持所需的属性”错误，好心人进来看看！
本帖最后由 hevenhu 于 2013-03-14 11:10:41 编辑我是个初学者，我的站一个页面出现以下错误提示：

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

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

/cncfo/admin/customer.asp，行 70

代码如下：

<% Response.Buffer=True %>

<%
function HTMLcode(fString)
if not isnull(fString) then
fString=trim(fString)
fString=replace(fString,"<","<")
fString=replace(fString,">",">")
fString=replace(fString,"'","'")
fString=replace(fString,vbCrLf&vbCrlf,"</p><p>")
fString=replace(fString,vbCrLf,"<br>")
fString=Replace(fString,"&#","&#")
HTMLcode=replace(fString,"  ","　")
    HTMLcode = fString
end if
end function
const MaxperPage=20
dim totalput
dim currentpage
dim TotalPages
dim i,j
if request.form("currentPage")<>"" then
      currentPage=cint(request.form("currentPage"))
   else
if request.querystring("page")<>"" then
        currentPage=cint(request.querystring("page"))
else
      currentPage=1
end if
   end if
JOBid=request("JOBid")
sql="select * from lietou where id="&JOBid&""
set rs1=server.CreateObject("adodb.recordset")
rs1.open sql,conn,1,1                             【行70】
if not rs1.eof then
if rs1("PosName")<>"" then
PosName=rs1("PosName")
else
PosName=rs1("job")
end if
CandidatesNum=rs1("CandidatesNum")
ReqDegreeID=rs1("ReqDegreeID")
area=rs1("area")
jobLocation=left(rs1("jobLocation"),4)
fabu=rs1("fabu")
ReqSex=rs1("ReqSex")
    ReqAge1=rs1("ReqAge1")
    ReqAge2=rs1("ReqAge2")
    ReqLocation=rs1("ReqLocation")
    otherRequestArea=rs1("otherRequestArea")
    ReqWorkyear=rs1("ReqWorkyear")
ExamAddress=rs1("ExamAddress")
type2=rs1("type2")
response.write type2
reason=rs1("reason")
adminUser=rs1("adminUser")
adminUser1=rs1("adminUser1")
adminUser2=rs1("adminUser2")
check3=rs1("check3")
jobTm=rs1("jobTm")
check4=rs1("check4")
personName=rs1("personName")
completeTm=rs1("completeTm")
end if
rs1.close
set rs1=nothing
id=request("id")
sql="select * from company where id="&id&""
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
if rs("cname")<>"" then
cname=rs("cname")
else
cname=rs("vname")
end if
uname=rs("uname")
cxz=rs("cxz")
trade=rs("trade")
area=rs("area")
pname=rs("pname")
phone=rs("phone")
fax=rs("fax")
email=rs("email")
address=rs("address")
zip=rs("zip")
end if
rs.close
set rs=nothing
%>
请懂行的人指点一下。在此谢过！

[解决办法]
兄弟，以后贴代码别贴那么多嘛，是个人就不高兴看。
问得针对性点啊~你要干什么都不清楚咧~
（虽然看起来像是打开2个表，id=jobid，然后给很多个变量赋值……但你就不能写标准点么……）

rs1：sql="select * from lietou where id="&JOBid&""
rs：sql="select * from company where id="&request.form("JOBid")
怎么定义两个同名sql的值不一样的呢……看不懂啊看不懂……
[解决办法]
最直接的方法是打印出那个sql语句

response.write sql
response.end
rs1.open sql,conn,1,1

热点排行

ASP

“ODBC 驱动程序不支持所需的属性”异常，好心人进来看看