请大家帮忙查找一个错误
dim college_pro2_rs3
dim college_pro2_constr3
set college_pro2_rs3=Server.CreateObject("adodb.recordset")
college_pro2_constr3="select * from college where college_id="& rs1("college_id") &""
college_pro2_rs3.open college_pro2_constr3,conn,1,1
if not college_pro2_rs3.eof then
do while not college_pro2_rs3.eof
提示这句有错college_pro2_rs3.open college_pro2_constr3,conn,1,1
Microsoft OLE DB Provider for ODBC Drivers '80040e21'
ODBC 驱动程序不支持所需的属性。