I obtain this error when try to see my website can you help me for solve this issue Please.

Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC driver does not support the requested properties.
/hanite2/ItemMenu.inc, línea 52

GET /hanite2/index.asp

This index.asp try to connect to one *.mdb database but when ItemMenu.inc try to query to this database show this error.

Wrong forum.

yeah its almost certainly an 'ASP' problem
Im guessing you are using an inappropriate method or property when connecting to a JET db. So I'd have a look at what you were attempting to do on line 52 of /hanite2/ItemMenu.inc and try to understand what may have gone wrong.

without knowing whats on line 52 of /hanite2/ItemMenu.inc its impossible to say.

Am I wearing a hat?



Poots would be proud

I don't see a hat Geo....but in my humble opinion (and if my super-secret webcam is still showing TrueColor) the magenta shorts and the rainbow knee-high toe socks are seeeexxxxxxxYYYYYY!

HI, This is the content for itemmenu.inc

.
.
......
<Script Language="JavaScript">
function sub_menu(_this, grp){

try{
var xx = grp.style;
if (xx.display == "none"){
xx.display = "";
_this.src = "Images/hid.gif";
}
else{
xx.display = "none";
_this.src = "Images/shw.gif";
}
}
catch(E){}
}

function onSubTitleClick(tid, stid, pno)
{
//alert("ShowGoods.asp?tid="+tid + "&stid="+stid+"&pno="+pno);
window.location.href="ShowGoods.asp?tid="+tid + "&stid="+stid+"&pno="+pno;
}
</Script>
</head>

<table border="0" width="100%">
<%
'szPageNo = Request("pno")
'if szPageNo = "" then
szPageNo = 1
'end if

szOldTitle = ""
sql = "SELECT a.Title, b.* From TitleTab as a, SubTitleTab as b Where b.TitleID=a.ID Order By a.ID"
rs.Open sql, conn, 1, 1
Response.Write "<tr><td>" & vbcrlf & "<ul>" & vbcrlf

do while not rs.eof
szTitle = rs("Title")
szSubTitle = rs("SubTitle")
szTitleID = rs("TitleID")
szSubTitleID = rs("ID")

if szTitle <> szOldTitle then
if szOldTitle <> "" then
Response.Write "</ul>" & vbcrlf 'Ӳ˵UL
end if

'ѭLI
Response.Write "<li>" &_
"<div style=""width:10px;float:left;margin-left:3px;margin-top:5px;margin-right:1px;""><img id=""img_" & szTitleID & """ src=""Images/hid.gif"" style=""cursorointer;"" onclick=""sub_menu(this, " & "sub_" & szTitleID & ")"" width=""6"" height=""6"" border=""0"" /></div>" &_
"<font color=""#017C67"" size=""2"" style=""cursorointer;"" onclick=""sub_menu(img_" & szTitleID & ", " & "sub_" & szTitleID & ")"">" & szTitle & "</font></li>" & vbcrlf

'ѭLL
Response.Write "<ul id=""sub_" & szTitleID & """>" & vbcrlf &_
"<li style=""padding-left:20px;cursorointer;""><font color=""#017C67"" size=""2""><a href=""#"" onclick=""onSubTitleClick(" & szTitleID & "," & szSubTitleID & "," & szPageNo & ");"">" & szSubTitle & "</a></font></li>" & vbcrlf
szOldTitle = szTitle
else
'Ӳ˵LL
Response.Write "<li style=""padding-left:20px;cursorointer;"">" &_
"<font color=""#017C67"" size=""2""><a href=""#"" onclick=""onSubTitleClick(" & szTitleID & "," & szSubTitleID & "," & szPageNo & ");"">" & szSubTitle & "</a></font></li>" & vbcrlf
end if
rs.MoveNext
loop
Response.Write "</ul>" & vbcrlf 'Ӳ˵UL
Response.Write "</ul>" & vbcrlf 'UI
Response.Write "</td></tr>" & vbcrlf
rs.close
.
.
.......

And which line is line 52? You're not really expecting us to count are you?

This is the line 52

50 szOldTitle = ""
51 sql = "SELECT a.Title, b.* From TitleTab as a, SubTitleTab as b Where
b.TitleID=a.ID Order By a.ID"
52 rs.Open sql, conn, 1, 1
53 Response.Write "<tr><td>" & vbcrlf & "<ul>" & vbcrlf