& lt; Td width="58" height="34" align="right" & gt; 
  
 please select...  
<% while not rs1. Eof % & gt; 
 <%=rs1 (" dw ") % & gt;  
<% rs1. The movenext 
Wend % & gt; 
 
  
 
Charge people & lt;/div>  
 please select  
 

 & lt; script> 

Var temp=document. Form1. SQR 
The function redirect (x) {
Var I 
I=0 
For (var m=temp. Options. Length - 1. M> 0; M -) 
Temp. Options [m]=null 
<% rs2. The movefirst 
While not rs2. Eof 
%> 
CNT="& lt; %=rs2 (" BMXZ ") % & gt;" 
If (CNT==x) {
Temp. Options [I]=new Option (" & lt; % %=rs2 (xm) & gt;" , "& lt; % %=rs2 (xm) & gt;" ) 
I=I + 1} 
<% 
Rs2. Movenext 
Wend % & gt; 
} 

//- & gt; 
</script> 

CodePudding user response:

CodePudding user response: