Dropdown

<%
strFirmaID = request("FirmaID")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("../../../database/Firma.mdb")
SQL = "Select * from Firma order by Navn"
Set RS = Conn.Execute(SQL)

If strFirmaID = "" Then


Response.Write "<select name=""FirmaID"" onchange=""if(this.options[this.selectedIndex].value!='-'){self.location.href='testdropdown.asp?FirmaID='+this.options[this.selectedIndex].value}"">"
Response.Write "<option value="""" selected>Vælg...</option>" & vbCrLf
Do While Not rs.EOF
Response.Write "<option value=""" & RS("FirmaiD") & """>" & RS("Navn") & "</option>" & vbCrLf
RS.MoveNext()
Loop
Response.Write "</select>"

Else

Response.Write "<select name=""FirmaID"" onchange=""if(this.options[this.selectedIndex].value!='-'){self.location.href='testdropdown.asp?FirmaID='+this.options[this.selectedIndex].value}"">"

While Not rs.EOF
If RS("FirmaID") = strFirmaID Then
Response.Write "<option value=""" & RS("FirmaID") & """ selected>" & RS("Navn") & "</option>" & vbCrLf
Else
Response.Write "<option value=""" & RS("FirmaID") & """>" & RS("Navn") & "</option>" & vbCrLf
End if
RS.MoveNext()
Wend

Response.Write "</select>"
%>

Prøv med dette! -Men kommer der nogen fejlmeddelse eller hvad sker der, prøv at beskriv det!?

//>Rune

Alså det jeg vil er at når jeg vælger et firma i dropdown menu så vil siden blive opdater og så skal det firma som jeg har valgt være "selected" i dropdown menuen

Som Rune siger ville det hjælpe meget hvis du skrev hvad der sker eller evt. fejlmeddelelser... Det gør det en del nemmere at finde fejlen.

nybroe> Efter hvad jeg kan fornæmme hvad du vil, så er du helt galt på den med den kode du har der!

-tror vidst du skal opbygge den på ny igen!

//>Rune

Problemet er at det firma jeg vælger bliver ikke "selected" når siden opdater

I know.. Men så er din kode oxo fuldstændig ud i tåen ;o)

-byg den om igen... Det ville vidst være det hurtigste...

//>Rune

Hvis jeg skal opbygge den på ny igen har du så et forslag til hvordan jeg skal gøre det??????

Hvorfor er den fuldstændig ud i tåen for hvis jeg gør der med et navn i sted for med firmaID kan jeg godt for det til at virke????

strFirmaID er en streng, og RS("firmaID") er et tal - og derfor bliver de aldrig lig med hinanden, som du tester for i linien..

If RS("FirmaID") = strFirmaID Then

Prøv med:

If CStr(RS("FirmaID")) = strFirmaID Then

Eller:

If RS("FirmaID") = CInt(strFirmaID) Then

Så de får samme type..

Jeg siger TAK

:-) tjoo, det har jeg da...

På den side hvor du har din første SELECT, har du en formular der har en Action til den side der skal modtages... I den laver du en parameter på den filen.. Fx.  firma.asp?select=firm og så laver du en method på POST.

I dokumentet firm.asp laver du en forsprøgsel...
If Request.QueryString("select") = "firm" Then
  strFirm = Request.Form("firmname") 'firmname er din selectbox!
  While Not objRs.EOF
      If objRs("firmname") = strFirm Then
        Response.Write("<option SELECTED>" & objRs("firmname") & "</option>" & vbCrLf)
      Else
        Response.Write("<option>" & objRs("firmname") & "</option" & vbCrLf)
      End If
  objRs.MoveNext()
  Wend
End If

Det er vidst den bedste metode...

//>Rune

edutasia> LOL den havde jeg sq ik' set :o)

//>Rune