hur flyttar man infomaion från ett formulär till connect delen?

<!-- #include file="adovbs.inc" -->

<!-- #include file="connect2.inc" -->


<FORM METHOD="POST" ACTION="visa2.asp" >
<SELECT NAME="month" onChange="javascript:document.FAST_SELECT.submit();">>

<%
For i = 1 to 12
Response.Write("<OPTION ")
if (i = month(Date)) then
Response.Write("SELECTED ")
end if
Response.Write("VALUE=""" & i & """>" & MonthName(i) & vbNewLine)
next
%>
</SELECT>
</FORM>



<form action="g" method="post">
<input name="g" type="text" value=" <% Request.Form("month") %>">
<!-- allt väl så här långt, men den flyttar inte med sig info in i nästa sats-->
</form>


<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM kalender2003 WHERE manad = '"& Request.Form("month") &"' order by dag"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic
%>












<table width="782" border="1" cellspacing="1" cellpadding="1">
<tr bgcolor="#CCCCFF">
<td width="27"><font size="2" face="Arial, Helvetica, sans-serif"> dag</font></td>
<td width="176"><font size="2" face="Arial, Helvetica, sans-serif">Stora konf.
rum plan 3</font></td>
<td width="168"><font size="2" face="Arial, Helvetica, sans-serif">Lilla konf.
rum</font></td>
<td width="173"><font size="2" face="Arial, Helvetica, sans-serif">B&auml;rbar
PC</font></td>
<td width="210"><font size="2" face="Arial, Helvetica, sans-serif">Projektor</font></td>
</tr>
<% Do Until RecSet.EOF %>
<tr>
<td> <font size="2" face="Arial, Helvetica, sans-serif">
<% =RecSet("dag") %>/<% =RecSet("manad") %>
</font></td>
<td valign="top"> <font size="2" face="Arial, Helvetica, sans-serif"><b> " ></b>&nbsp;
<% =RecSet("rum1") %>
<br>
</font></td>
<td valign="top"> <font size="2" face="Arial, Helvetica, sans-serif"><b>" >
</b>
<% =RecSet("rum2") %>
</font></td>
<td valign="top"> <font size="2" face="Arial, Helvetica, sans-serif"><b>" ></b>
<% =RecSet("pc") %>
</font></td>
<td valign="top"> <font size="2" face="Arial, Helvetica, sans-serif"><b>" ></b>
<% =RecSet("projektor") %>
</font></td>
</tr>
<%
RecSet.MoveNext
Loop
RecSet.Close
%>

Varför har du 2 <form>´s?
Vilken form är "FAST_SELECT" ?

Så här hursomhelst kanske:
<code>
<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
</code>
Och neråt ser likadant ut.



<code>
<!-- #include file="adovbs.inc" -->

<!-- #include file="connect2.inc" -->


<FORM METHOD="POST" ACTION="">
<SELECT NAME="month" onChange="submit()">

<%
For i = 1 to 12
Response.Write("<OPTION ")
if (i = month(Date)) then
Response.Write("SELECTED ")
end if
Response.Write("VALUE=""" & i & """>" & MonthName(i) & vbNewLine)
next
%>
</SELECT>
</FORM>

</code>

Tack! allt fungerar förutom att den vägrar visa den aktuella MÅNADEN!