Her er dit svar så :
Du laver det i en database hvor du laver en kolonne hvori du skiver hvilken kategori muligheden hører til, en kolonne mere hvori du skriver mulighederne til den første dropdown, dernæst en til hvori mulighederne til dropdown2 ligger..
I eksemplet hedder den første kolonne Kategori , den anden hedder muligheder1, og den sidste muligheder2.
dette script skal sættes ind i mellem <head> tags'ne
<SCRIPT LANGUAGE="JavaScript">
//her laver den en lille streng på siden så den kan hente mulighederne senere..
function sogning(liste) {
location.href = liste.options[liste.selectedIndex].value }
</SCRIPT >
Dette her er de 3 første muligheder i den allerførste dropdownboks(den du vælger kategori i)
<select onchange="sogning(this.form.elements[0])">
<option value="
http://beanluck.com/projekt/forside.htm">Malevarer<option value="
http://beanluck.com/projekt/forside.htm?kategori="Maletilbehør"">Maletilbehør<option value="
http://beanluck.com/projekt/forside.htm?kategori="PenslerVaerktoj"">Pensler og Værktøj
</select>
Den laver det der hedder en Querystring som kan hentes frem senere..
Så laver du dropdown nr.1
<select>
<%
'Sådan åbnes forbindelsen til serveren, Tabel.mdb skal ændres til databasens navn
Set Conn = Server.Createobject("ADODB.Connection")
DSN = "DRIVER{Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("Tabel.mdb")
Conn.Open DSN
'Så laver du en forespørgsel der kun henter de muligheder som man har valgt i din dropdown.
'Jeg vil foreslå dig at du indekserer din tabel så ud for alle muligheder står der hvilken kategori det hører til, ok.
'Tabel skal ændres til tabelens navn, og herefter henter den alle de muligheder der er i den valgte kategori.
strSQL = "Select * From Tabel Where(Kategori = " & Request("kategori") & ")
'Herunder hentes samtlige muligheder fra din database.
Do
Response.Write "<option>" rs("muligheder1") "</option>"
rs.MoveNext
Loop While Not rs.EOF
%>
</select>
Nr.2
<select>
<%
Do
Response.Write "<option>" rs("muligheder2") "</option>"
rs.MoveNext
Loop While Not rs.EOF
'lukker forbindelsen.
rs.Close
Conn.Close
Set Conn = Nothing
%>
</select>
Håber det virker...
