select
法用行此操作。容可能已或效
set conn = Server.CreateObject( "ADODB.Connection ")
connstr= "Driver={SQL Server};server=(local);DATABASE=ceshi;UID=sa;PWD=123 "
conn.Open connstr
set rs=server.CreateObject( "ADODB.Recordset ")
sqlstr= "insert into send(intention,application_name,preengage_name,preengage_time,employ_time,note,preengage_dept,auditing,auditing,carinfomation) values( ' "& trim(request( "txtintention ")) & " ', ' "& trim(request( "txtapplication_name ")) & " ', ' "& trim(request( "txtpreengage_name ")) & " ', ' "& trim(request( "txtpreengage_time ")) & " ', ' "& trim(request( "txtemploy_time ")) & " ', ' "& trim(request( "txtnote ")) & " ', ' "& trim(request( "txtpreengage_dept ")) & " ', ' "& trim(request( "txtauditing ")) & " ', ' "& trim(request( "txtinfomation ")) & " ') "
其中txtinfomation是一select,代是的,是不是select 出了
<option value= " "> 信息 </option>
<%
set re1=server.CreateObject( "ADODB.Recordset ")
sqlstr= "select motorman,carnumber from car "
re1.open sqlstr,conn,3
if re1.recordcount > 0 then
re1.movefirst
do while not re1.eof
%>
<option> <%=re1( "motorman ")%> - <%=re1( "carnumber ")%> </option>
<%
re1.movenext
loop
end if
re1.close
set re1=nothing
%>


[解决办法]
re1.open sqlstr,conn,3


re1.open sqlstr,conn,1,1 加上游标类型和锁定类型。