HJÄLPPPPP Hej Kely.HJÄLPPPPPP har problem med mina listboxar!
Jag har 3 st listboxar som ska hämta värden ur olika tabeller beroende på vad föregående val varit
Exempel
Jag väljer en värdsdel och den ska då hämta alla länder som finns för
den värdsdelen samtidigt som den även hämtar upp de städer som hör till värdsdelen.
När man sedan valt ett land så ska alla städer för det landet komma upp.
tabellerna ser så här ut.
Värdsdel vID | vNamn
Land lID | lNamn | vID
Stad sID | sNamn | lID
För att hämta data från databasen använder jag mig av lagrade procedurer
getvDel hämtar alla värdsdelar som finns
getLand hämtar alla länder för inparametern vID
getStad hämtar alla städer för inparametern lID
Jag antar att jag ska använda mig utav onChange, men hur skulle en sådan funktion kunna se ut?
Tacksam för svar!
<html>
<head>
</head>
<body>
<form name="FormAdd">
<%
Set vDel = con.execute("getvDel") 'stored proc
%>
<select name="vardsdel" class="text" id="vdel" >
<option selected>----------------------- Ange ett val -----------------------</option>
<% Do While Not vDel.EOF %>
<option value="<% = vDel("vdID") %>"><% = vDel("vdNamn") %></option>
<%
vDel.MoveNext
Loop
vDel.Close
Set vDel=Nothing
%>
</select>
<br>
<%
Set Land = con.execute("getLand '"&Request.Form("vdel")&"'") 'stored proc
%>
<select name="land" class="text" id="landd" >
<option selected>----------------------- Ange ett val -----------------------</option>
<% Do While Not Land.EOF %>
<option value="<% = Land("landID") %>"><% = Land("landNamn") %></option>
<%
Land.MoveNext
Loop
Land.Close
Set Land=Nothing
%>
</select>
<br>
<%
Set gStad = con.execute("getStad '"&Request.Form("landd")&"'") 'stored proc
%>
<select name="stad" class="text" id="stadd" >
<option selected>----------------------- Ange ett val -----------------------</option>
<% Do While Not Stad.EOF %>
<option value="<% = Stad("stadID") %>"><% = Stad("stadNamn") %></option>
<%
Stad.MoveNext
Loop
Stad.Close
Set Stad=Nothing
%>
</select>
</form>
</body>
</html>Sv: HJÄLPPPPPP har problem med mina listboxar!
Jag har själv något liknande, men i mitt fall så behövd jag bara ha två listboxar.
För att du skall förstå, så visar jag mitt exemel.
Först, den ligger i en frame:
_____________________
| | |
|_________|__________|
| |
| |
|___________________|
frame1.asp'överst till vänster
<script language="vbscript">
sub submitthis
form1.submit
end sub
</script>'jag har hoppat mycket kod bl a datacon osv
<form ACTION="frame2.asp" METHOD="POST" NAME="form1" target="right">
<select ONCHANGE="submitthis" SIZE="1" NAME="one" class=buttons>
<option></option>
<% Do While Not rs.EOF %>
<option value="<% = rs("titel") %>">
<% = rs("titel") %></option>
<% rs.movenext
loop %>
</select>
</form>
Principen blir ju likadan för nästa listbox, bara delaljerna skilljer åt.