<form id="form1" name="form1" method="post" action="">
<label>
<input type="text" name="haha" value="<%=getvalue%>" />
</label>
<label>
<select name="test" οnchange="abc()">
<option value="a" <%If (Not isNull(getvalue)) Then If ("a" = CStr(getvalue)) Then Response.Write("selected=""selected""") : Response.Write("")%>>a</option>
<option value="b" <%If (Not isNull(getvalue)) Then If ("b" = CStr(getvalue)) Then Response.Write("selected=""selected""") : Response.Write("")%>>b</option>
<option value="c" <%If (Not isNull(getvalue)) Then If ("c" = CStr(getvalue)) Then Response.Write("selected=""selected""") : Response.Write("")%>>c</option>
</select>
</label>
</form>
<script language="vbscript">
sub abc()
form1.submit
end sub
</script>
<form id="form2" name="form2" method="post" action="">
<label>
<input type="text" name="haha2" />
</label>
<label>
<select name="test2" οnchange="ccc()">
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
</select>
</label>
</form>
<script language="vbscript">
sub ccc()
form2.haha2.value=form2.test2.value
end sub
</script>
<label>
<input type="text" name="haha" value="<%=getvalue%>" />
</label>
<label>
<select name="test" οnchange="abc()">
<option value="a" <%If (Not isNull(getvalue)) Then If ("a" = CStr(getvalue)) Then Response.Write("selected=""selected""") : Response.Write("")%>>a</option>
<option value="b" <%If (Not isNull(getvalue)) Then If ("b" = CStr(getvalue)) Then Response.Write("selected=""selected""") : Response.Write("")%>>b</option>
<option value="c" <%If (Not isNull(getvalue)) Then If ("c" = CStr(getvalue)) Then Response.Write("selected=""selected""") : Response.Write("")%>>c</option>
</select>
</label>
</form>
<script language="vbscript">
sub abc()
form1.submit
end sub
</script>
<form id="form2" name="form2" method="post" action="">
<label>
<input type="text" name="haha2" />
</label>
<label>
<select name="test2" οnchange="ccc()">
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
</select>
</label>
</form>
<script language="vbscript">
sub ccc()
form2.haha2.value=form2.test2.value
end sub
</script>