Listmeny

Hej :)

Har följande kod som "minns" vilket alternativ som var valt vid en submit.

          <select name="taskStatus" id="taskStatus" onChange="this.form.submit();">
            <option value="0" <% If iStatus = 0 then response.write "selected" %>>Planerat</option>
            <option value="1" <% If iStatus = 1 then response.write "selected" %>>Utskickat</option>
            <option value="2" <% If iStatus = 2 then response.write "selected" %>>Mottaget</option>
            <option value="3" <% If iStatus = 3 then response.write "selected" %>>P&aring;g&aring;ende</option>
            <option value="4" <% If iStatus = 4 then response.write "selected" %>>Klart</option>
            <option value="5" <% If iStatus = 5 then response.write "selected" %>>Exporterat</option>
          </select>

nu vill jag även att ladda om sidan med

onChange="this.form.submit();"

då funkar det ju inte eftersom den utgår från iStatus.

Hur gör man för att det ska funka?

Mvh
henrik

Hmm, känns som iStatus inte har i den listmenyn att göra tycker jag men detta kanske går:

<option value="0" <% If taskStatus = 0 Or iStatus = 0 then response.write "selected" %>>Planerat</option>

hej!
iStatus är det värdet som hämtas från databasen så att listmenyn ska "stå rätt" när man öppnar sidan.

Ska testa!

Mvh
henrik

nä det fungerar inte. Listmenyn ställer sig i det läget som matchar iStatus...

Mvh
henrik

devotion skrev:

iStatus är det värdet som hämtas från databasen så att listmenyn ska "stå rätt" när man öppnar sidan.

Kan du inte sätta ett defaultvärde på taskStatus istället för iStatus vid ingången till sidan, typ:

<%
     taskStatus = "1" 'kan hämtas från databas
     ...
     If Request.ServerVariables("REQUEST_METHOD") = "post" Then
          taskStatus = Request.Form("taskStatus")
     End If
%>

<option value="1" <% If taskStatus = "1" then response.write "selected" %>>Planerat</option>

hmm

Du hade rätt angående det..

Hmm, känns som iStatus inte har i den listmenyn att göra tycker jag

Eller jag ställde frågan lite fel...

Sitter iaf och testar..

Mvh
Henrik

Hej! :)

Jag gjorde så här

iStatus = cInt(objRS("Status"))
...
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
	iStatus = Request("taskStatus")
End If
...
          <select name="taskStatus" id="taskStatus" onChange="this.form.submit();">
            <option value="0" <% If iStatus = 0 then response.write "selected" %>>Planerat</option>
            <option value="1" <% If iStatus = 1 then response.write "selected" %>>Utskickat</option>
            <option value="2" <% If iStatus = 2 then response.write "selected" %>>Mottaget</option>
            <option value="3" <% If iStatus = 3 then response.write "selected" %>>P&aring;g&aring;ende</option>
            <option value="4" <% If iStatus = 4 then response.write "selected" %>>Klart</option>
            <option value="5" <% If iStatus = 5 then response.write "selected" %>>Exporterat</option>
          </select>

Och det funkar... Är det en bra lösning?

Mvh
Henrik

Jag tycker att det är en bra lösning. Precis så hade jag nog också gjort. :)

Mvh

Ser bra ut! (y)
Dock till nästa gång, fundera på att göra en array istället, det blir lite enklare att hantera då. :)
Litet exempel:

Dim arrTaskStatus, i, Selected
arrTaskStatus = Split("Planerat,Skickat,Mottaget", ",")

Response.Write("<select name="taskStatus" id="taskStatus" onChange="this.form.submit();">")

For i = 0 To uBound(arrTaskStatus)
     Selected = ""
     If i = iStatus Then Selected = "selected"
     Response.Write("<option value=""" & i & """ " & Selected & ">" & arrTaskStatus(i) & "</option>")
Next

Response.Write("</select>")

Ahhh, snyggt!

Ska peta in den koden och använda den...

Mvh
henrik