Hur gör jag för att kunna flytta med mig det valda året ned i selectsatsen? Vet inte om det spelar nån' roll, men du har ett mellanslag i 'Request.Form ("year")'... Det ser för mig ut som om du aldrig skickar med något year-värde eftersom du har en onChange="submit()" på din första selectsats och din year-select inte ligger inom dess form-tag. får inte med mig all info till selectsatsen
variabeln får Year saknas!
<!----Val av månad-------------------------------------------------------------------------->
<FORM NAME="FAST_SELECT" ACTION="" METHOD="GET">
<SELECT NAME="month" onChange="submit()">
<%
Dim Currentmonth
Dim monthOptions
Currentmonth = Trim(Request.QueryString("month"))
Select Case Currentmonth
Case "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12"
Case Else
CurrentMonth = Month(Date())
End Select
MonthOptions = "<OPTION value=""1"">Januari</OPTION>" & vbCrLf & _
"<OPTION value=""2"">Februari</OPTION>" & vbCrLf & _
"<OPTION value=""3"">Mars</OPTION>" & vbCrLf & _
"<OPTION value=""4"">April</OPTION>" & vbCrLf & _
"<OPTION value=""5"">Maj</OPTION>" & vbCrLf & _
"<OPTION value=""6"">Juni</OPTION>" & vbCrLf & _
"<OPTION value=""7"">Juli</OPTION>" & vbCrLf & _
"<OPTION value=""8"">Augusti</OPTION>" & vbCrLf & _
"<OPTION value=""9"">September</OPTION>" & vbCrLf & _
"<OPTION value=""10"">Oktober</OPTION>" & vbCrLf & _
"<OPTION value=""11"">November</OPTION>" & vbCrLf & _
"<OPTION value=""12"">December</OPTION>"
Response.Write Replace(MonthOptions, "value=""" & CurrentMonth & """", "value=""" & CurrentMonth & """ selected")
%>
</SELECT>
</FORM>
</td>
<td width="211" valign="top">
<!-- val av år--------------------------------------------------------------------------->
<select name="year" size="1">
<option value="2003" selected>2003</option>
<option value="2004">2004</option>
</select>
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM kalender2003 WHERE manad = " & CurrentMonth & " AND [year] = " & (Request.Form ("year")) & " order by dag"
----------------------------------------
Felkod....
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'manad = 11 AND [year] ='.
/db/boka/visa_34.asp, line 84 Sv: får inte med mig all info till selectsatsen
...borde vara 'Request.Form("year")'.
Sen är frågan om man kan använda tecknen [ och ] i kolumn-namn...
...eller har jag missat nåt'??
//TommySv: får inte med mig all info till selectsatsen