% dim rs,sql,sel dim classid,Nclassid arid=request("id") set rs=server.createobject("adodb.recordset") sql="select * from bmcn where id="&request("id") rs.open sql,conn,1,1 %>