form()放在JAVASCRIPT的什么地方？？在线等

Question

不要你懂JAVA，Javascript 不是JAVA!
一般的JS代码建议你放在头部。当然不要放在FORM中。

Answer 1

<!--#include file="conn.asp"--><script language=JavaScript><%
dim sql,i,j
set rs_P=server.createobject("adodb.recordset")
sql="select * from PRINT_MACH"
rs_P.open sql,conn,1,1
%>
var selects=[];
selects['xxx']=new Array(new Option('…所有型号…','xxx'),
<%
set rs_i=server.createobject("adodb.recordset")
sql="select * from INK_MACH "
rs_i.open sql,conn,1,1
if rs_i.recordcount>0 then 
  for j=1 to rs_i.recordcount
     if j=rs_i.recordcount then 
%>
new Option('<%=trim(rs_i(1))%>','<%=trim(rs_i(0))%>'));
<%else%>
new Option('<%=trim(rs_i(1))%>','<%=trim(rs_i(0))%>'),
<%
end if
rs_i.movenext
next
else 
%>
new Option('','0'));
<%
end if
rs_i.close
for i=1 to rs_P.recordcount
%>
selects['<%=rs_P(0)%>']=new Array(new Option('…所有型号…','xxx'),
<%
set rs_i=server.createobject("adodb.recordset")
sql="select * from INK_MACH where print_mach_no='"&rs_P(0)&"'"
rs_i.open sql,conn,1,1
if rs_i.recordcount>0 then 
  for j=1 to rs_i.recordcount
     if j=rs_i.recordcount then 
%>
new Option('<%=trim(rs_i(1))%>','<%=trim(rs_i(0))%>'));
<%else%>
new Option('<%=trim(rs_i(1))%>','<%=trim(rs_i(0))%>'),
<%
end if
rs_i.movenext
next
else 
%>
new Option('','0'));
<%
end if
rs_i.close
set rs_i=nothing
rs_P.movenext
next
rs_P.close
set rs_P=nothing
       %>
function chsel(){
if(PRINT_MACH.value) {
INK_MACH.options.length=0;
for(var i=0;i<selects[PRINT_MACH.value].length;i++){
INK_MACH.add(selects[PRINT_MACH.value][i]);
}
}
}</script><select name="PRINT_MACH" onChange=chsel()> 
<option value="0" selected>…所有型号…</option>
 <%
dim tmpid  
tmpid=0
set rs_P=server.CreateObject("ADODB.recordset")
sql="select * from PRINT_MACH"
rs_P.open sql,conn,1,1
while not rs_P.eof 
tmpid=rs_P(0)
%>
<option value="<%=rs_P(0)%>"><%=trim(rs_P(1))%></option>
 <%
rs_P.movenext
wend
rs_P.close
set rs_P=nothing
 %> 
</select> 
<select name="INK_MACH">
<option value="0" selected>…所有型号…</option>
<%
set rs_i=server.createobject("adodb.recordset")
sql="select * from INK_MACH "
rs_i.open sql,conn,1,1
while not rs_i.eof
%>
<option value="<%=rs_i(0)%>"><%=trim(rs_i(1))%></option>
<%
rs_i.movenext
wend
rs_i.close
set rs_i=nothing
%>
</select>
<INPUT type="button" value="Button" id=button1 name=button1>
</form>

Answer 2

楼主,为什么只有</form>,没有<form>