源码如下：
<select   name="s1"   onchange="changeselect1(this.value)">
   <%   
  set   rs1=server.createobject("adodb.recordset")   
  sql1="select   *   from   a "     
  rs1.open   sql1,conn,1,1  
  count1   =   0   
  do   while   not   rs1.eof  and not rs1.bof  %>
  <option   value="<%=rs1("ID")%>" <% if  trim(rs1("ID"))= trim(rs("class1"))  then%>selected="selected"<%end if%>><%=rs1("Name")%></option>  
  <%count1   =   count1   +   1   
  rs1.movenext   
  loop   
  rs1.close   
  %>
</select>
提示红色部分发生意外，请各位高手指点指点，弄了好久了也不知道哪里出错了

自己找到问题了，郁闷啊

代码段太少，简单几句无法看出具体原因，如果就那几行来说：
<option   value="<%=rs1("ID")%>" <% if  trim(rs1("ID"))= trim(rs("class1"))  then%>selected="selected"<%end if%>><%=rs1("Name")%></option>
rs1有具体值，可红色体的rs("class1")，这里的rs在该ASP页面内是否真实存在？如果存在，还得考虑其在此处是否依然有效！