逻辑应该是这样的,没测试
----------------------------------
<%
dim x=1
for i=1 to rs.Recordcount
if rs(i).length>x then
rs(i).length=x
end if
next
%>
<select style="width:<%=x%>;">
----------------------------------
<%
dim x=1
for i=1 to rs.Recordcount
if rs(i).length>x then
rs(i).length=x
end if
next
%>
<select style="width:<%=x%>;">
当然不可能去改变它的