Scusate ho questo problema a metà fra javascript ed asp. Ho tentato di costruire una pagina per fare una select dinamica. Mi fa il refresh della pagina ma non mi viene popolata la seconda select. Faccio un errore in script secondo voi?


codice:
<html>
<head>
<script language="javascript" type = "text/javascript">
function vai(){
var test;
test="true";
	if (test=="true")
				{
				document.tabella1.action="pAGINA.asp";
				document.tabella1.submit();
				}
	}

</script>
</head>
<body>
'RECUPERO I DATI DALLA PRIMA TBL DEL DATABASE
<form name="form">
<%strconn="Driver={Microsoft Access Driver (*.mdb)}; dbq="&Server.MapPath("intranet.mdb") 
set Conn=Server.CreateObject("ADODB.Connection") 
Conn.open strconn%> 
<select size="1" name="artic" style="font-size: 8 pt; font-family: Verdana" onChange="submit(this);">
                <option value="TUTTI">------TUTTI------</option>
                <%
sql = "SELECT GRUPPO FROM prontuario GROUP BY gruppo "
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql,conn

Do While Not rs.EOF
Dim strVAR
strVAR = rs ("gruppo")%>
<option value="<%=strVAR%>%>"><%= RS.Fields.Item("gruppo").Value%></option>	
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
%>
              </select> 
</form>
<form name="form">
'FACCIO POPOLARE LA SECONDA SELECT 
<select size="1" name="artic2" style="font-size: 8 pt; font-family: Verdana" onChange="submit(this);"   >
                <option value="TUTTE">------TUTTE------</option>
         

<% 
COD = request.querystring("artic")
Set RS1 = Server.CreateObject("ADODB.Recordset")
sql1 = "select distinct denominazione from  prontuario WHERE gruppo= '"&COD&"' "
rs1.open sql1, conn

Do While Not rs1.EOF%>
<option	value="<%=RS1("denominazione")%>"><%=RS1("denominazione")%></option>
<%
		RS1.Movenext
		LooP
rs1.close 
set rs1 = nothing 
%>
</select>
</form> 
<%
conn.close 
set conn = nothing 
%>
</body>
</html>