Valg af selectbox ind i variabel....

<form name="form1" method="post" action="find.asp">
  <select name="Dyr" onChange="noget her">
(her åbner jeg db)
    <option value="<%=objRec("id")%>"><%=objRec("navn")%>
(her lukkes db)
</option>
  </select>
</form>

Find.asp:
strSQL = "SELECT * FROM mad WHERE u_ID = " & Request.Form("Dyr")

//>Rune

Hvad skal der stå her: onChange="noget her"

Sådan at når jeg klikker på noget i select, så går den over og finder
Find.asp:
strSQL = "SELECT * FROM mad WHERE u_ID = " & Request.Form("Dyr")
??

Øhh der skal ik' stå noget... Det er kun til hvis du har noget klient scripting du skal ha' fyret af, og det har du næppe i denne samhæng!

//>Rune

Det forstår jeg altså ikke helt, jeg syntes jeg har gjort som du siger, men der bliver ikke hentet noget ned i den 2. select:

Her er min kode:


<form name="ann" action="opretannonce.asp.asp" method="post">
                          <tr>
                            <td height="20"></td>
                          </tr>
                          <tr>
                            <td>V&aelig;lg i menuen nedenfor, under hvilken kategori,
                              du vil oprette din annonce.</td>
                          </tr><tr>
                            <td height="10"></td>
                          </tr>
                            <tr>
                              <td>
                                <select name="menukategori" class="annonceform">
                                <option value="">--- Vælg en kategori ---</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
'Åbner connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
 
sql = "SELECT * FROM Kategori"

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open sql, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("kategoriId")%>"><%=objRec("kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend
%>
                                </select></td>
                            </tr>
                            <tr>
                              <td height="10"></td>
                            </tr>
                            <tr>
                              <td><select name="menuu_kategori" class="annonceform">
                                <option value="">--- Vælg en kategori ---</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
sql = "SELECT * FROM u_katagori WHERE u_kategoriID = " & Request.Form("menukategori")

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open strSQL, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("Id")%>"><%=objRec("u_kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend

objRec.close
Conn.Close
Set Conn = Nothing
%>
                                </select></td>
                            </tr>

Prøv sådan her:

<form name="ann" action="opretannonce.asp" method="post">
                          <tr>
                            <td height="20"></td>
                          </tr>
                          <tr>
                            <td>V&aelig;lg i menuen nedenfor, under hvilken kategori,
                              du vil oprette din annonce.</td>
                          </tr><tr>
                            <td height="10"></td>
                          </tr>
                            <tr>
                              <td>
                                <select name="menukategori" class="annonceform">
                                <option value="">--- Vælg en kategori ---</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
'Åbner connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
 
sql = "SELECT * FROM Kategori"

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open sql, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("kategoriId")%>"><%=objRec("kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend
%>
                                </select></td>
                            </tr>
                            <tr>
                              <td height="10"></td>
                            </tr>
                            <tr>
                              <td><select name="menuu_kategori" class="annonceform">
                                <option value="">--- Vælg en kategori ---</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
sql = "SELECT * FROM u_katagori WHERE u_kategoriID = " & Request.Form("menukategori")

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open strSQL, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("Id")%>"><%=objRec("u_kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend

objRec.close
Conn.Close
Set Conn = Nothing
%>
                                </select></td>
                            </tr>

Får du evt. en fejl?

//>Rune

Nej jeg får ingen fejl??

du er jo nødt til at ha' det opdelt... I enten 2 filer, eller ha' en If..Then statement til at recive!

//>Rune

Det forstår jeg ikke:

Hvis jeg har 1. select her

skal jeg så have en If noget i variablen then noget

else???

Jeg er helt lost!

Det er sådan her jeg mener:


<form name="ann" action="opretannonce.asp?show=secound" method="post">
                          <tr>
                            <td height="20"></td>
                          </tr>
                          <tr>
                            <td>V&aelig;lg i menuen nedenfor, under hvilken kategori,
                              du vil oprette din annonce.</td>
                          </tr><tr>
                            <td height="10"></td>
                          </tr>
                            <tr>
                              <td>
                                <select name="menukategori" class="annonceform">
                                <option value="">--- Vælg en kategori ---</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
'Åbner connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
 
sql = "SELECT * FROM Kategori"

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open sql, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("kategoriId")%>"><%=objRec("kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend

If Request.QueryString("show") = "secound" Then
%>
                                </select></td>
                            </tr>
                            <tr>
                              <td height="10"></td>
                            </tr>
                            <tr>
                              <td><select name="menuu_kategori" class="annonceform">
                                <option value="">--- Vælg en kategori ---</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
sql = "SELECT * FROM u_katagori WHERE u_kategoriID = " & Request.Form("menukategori")

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open strSQL, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("Id")%>"><%=objRec("u_kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend

objRec.close
Conn.Close
Set Conn = Nothing
%>
                                </select></td>
                            </tr>
<%
    End If
%>

//>Rune

Nemlig, det er lige sådan noget jeg leder efter, og det ser godt ud, men når jeg klikker på den første selectbox, der skulle kalde opretannonce.asp?show=secound, så sker der ikke noget, kan du se hvorfor ikke??

Det er fordi du skal lave en OnClick="this.submit();" i din form!
-nå, jeg vil i seng nu, det har sq været en hård dag..

natnat

//>Rune

ok, men mange tak for hjælpen ind til nu, jeg vil arbejde lidt videre, - sov godt ;o)

Jeg har arbejdet lidt videre med det, og lige nu ser min kode ud som den står nedenfor:

1) Jeg har lavet en onClick, men lie nu henter den opretannonce.asp?show=secound bare jeg klikker på select - dermed kan jeg jo ikke nå at vælge noget indhold inden den submitter!

2) Hvis jeg alligevel holder musetasten nede og vælger en kategori, så finder den stadig ikke de opster i den anden tabel, som svarer til det Id der skal passe! Jeg har lavet det sådan nu:

Dim annonceId
annonceId = Request.Form("menukategori")                                 
sql = "SELECT * FROM u_katagori WHERE u_kategoriID = " & annonceId

Hvor annonceId jo er et tal:

Her er hele koden:

<form name="annonce" action="opretannonce.asp?show=secound" method="post">
                          <tr>
                            <td height="20"></td>
                          </tr>
                          <tr>
                            <td>V&aelig;lg i menuen nedenfor, under hvilken kategori,
                              du vil oprette din annonce.</td>
                          </tr><tr>
                            <td height="10"></td>
                          </tr>
                            <tr>
                              <td>
                                <select name="menukategori" class="annonceform" OnClick="annonce.submit();" >
                                <option value="">--- Vælg en kategori ---</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
'Åbner connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
 
sql = "SELECT * FROM Kategori"

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open sql, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("kategoriId")%>"><%=objRec("kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend

If Request.QueryString("show") = "secound" Then
%>
                                </select></td>
                            </tr>
                            <tr>
                              <td height="10"></td>
                            </tr>
                            <tr>
                              <td><select name="menuu_kategori" class="annonceform">
                                <option value="">-- Vælg en underkategori --</option>
                                <option value="">&nbsp;-----------------------------</option>
                                  <%
Dim annonceId
annonceId = Request.Form("menukategori")                                 
sql = "SELECT * FROM u_katagori WHERE u_kategoriID = " & annonceId

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open strSQL, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("Id")%>"><%=objRec("u_kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend

objRec.close
Conn.Close
Set Conn = Nothing
%>
                                </select></td>
                            </tr>
<%
    End If
%>

Jeg er også lidt lost... Virker det ?

Nej det virker ikke endnu, men jeg har stor tillid til medions, så det skal det forhåbentlig nok komme til ;o)

justdoit> Jeg skal på arbejde fra nu af og til omkring de 23 stykker, så vender jeg lige tilbage...

//>Rune

Det er bare helt i orden, så vender jeg tilbage engang ved 23.30 tiden, og ser om du har fundet ud af noget ;o)

Ok, back...

Hvad gør den nu siden den ik' virker?

//>Rune

Hej, øhh jeg har ikke fået nogen mail om at du havde svaret, så derfor så jeg ikke dit indslag - sorry!

Ok, det der sker er at når jeg klikker på den første select box, sådan at "rullemenuen" skal komme frem, så gør den onClick event, at jeg ikke når at vælge inden den henter opretannonce.asp?show=secound

Det næste der sker det er at hvis jeg alligevel får valgt en overskrift i første select box, så finder den ikke de id'er der passer til i den nye selectbox??

Men der er ingen fejl på siden!

Jeg har lige fundet ud af at denne:

Dim annonceId
annonceId = Request.Form("menukategori") 

Ikke udskriver et tal, men bare ordet annonceId

ok, jeg har selv fået bøvlet lidt rundt og brugt en onChange i stedet for onClick, og jeg er ved at være på sporet - tror jeg ;o)

Men tak alligevel!

Thx 4 Poinz

//>Rune

>>justdoit
Jeg kunne godt tænke mig at se koden gidder du ikke at poste eller sende den ?

Pft
mvh PAPman2000@yahoo.dk

Den står her: 29/10-2002 00:44:25, det er den jeg bruger!