我要疯了！

[aomin1981]

<%
classid=Request.QueryString("classid")
%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("01jlzd.mdb")
Set rs2 = Server.CreateObject("ADODB.Recordset")
sql2 ="Select * From jlzd where ks="&classid
rs2.open sql2,Conn,1,1
do while not rs2.eof
%>
<a href='disp.asp?id=<%=rs2("id")%>' target="_blank"><%=rs2("名称")%></a>
<%
RS2.MoveNext
Loop
rs2.close
%>


总是提示：
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21'

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

/class.asp，行 16

[cncca]

数据连接换成下面的试:
dim conn
dim connstr
dim db
db="data.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr

[baikaishui_0825]

set conn=Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("01jlzd.mdb")

[mymyal123]

Microsoft.Jet.OLEDB.4.0

[mynamelj]

如果你要用ODBC驱动的话,要设置数据源才行,否则换成:OLEDB
set conn=Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("01jlzd.mdb")

[NewJacket]

也许重起服务器就好了？

[coolwindkaka]

我以前也碰到过，拿到其他的机器上测试就没问题了，你试下到其他机器测试一下看

[jekexys2004]

你sql语句应该这样写：
sql2 ="Select * From jlzd where ks='"& classid &"'"

[lenmore]

rs2.open sql2,Conn,1,1
改成
rs2.open sql2,Conn,3,1

试试……

[up1002]

classid=Request.QueryString("classid")
如果QueryString中没有传classid参数的话，你的SQL语句将变成：

Select * From jlzd where ks=

这就会出现 ODBC驱动程序不支持所需的属性 的错误了。

如果你的classid是字符型的，可以按照楼上 jekexys2004(浪傲) 的方法，
如果是数字型的，可以把 classid=Request.QueryString("classid") 这句改为：

if isnumeric(Request.QueryString("classid")) then
classid=CInt(Request.QueryString("classid"))
else
classid=0
end if

如果你的 Request.QueryString("classid") 有可能非常大，大于32768的话，
应该把上面一段中的CInt()改为CLng()

[carbonic]

看看数据源那里的配置是否正确，还有你的权限是否达到要求，不过这个可能性比较小。

[TSD]

classid这个变量是否正确？和字段的类型是否正确