有问题，应该是 select * from ce where id=61

這樣子對吧：

<%set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("ce.mdb")
%>
<%
exec="select * from ce where id=61 "
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>

<%
dim aa,str
aa=rs("a")
if cint(aa)>90 then
str="<font color=#ff0000>大于90</font>"
else
str="<font color=#00ff00>小于90</font>"
response.write str
end if
%>

对 ,然后可以调用 显示 aa 了