dropdownboks og databaser

Jeg har koden med 30 point er for lidt

du kan da godt få flere, men jeg ved ikke lige hvordan jeg giver dig det...

Sådan her for den med 1:

    <select size=\"1\" name=\"navig\" onChange=\"window.open(this.options[this.selectedIndex].value,\'hovedramme\')\">
    <option>Vælg sommerhus...</option>
    <option>-------------------------</option>
    <% Do While Not Record.EOF %>
    <% If Record(\"Status\") = 1 Then %>
    <option value=\"SIDE.ASP?id=<% Response.Write Record (\"Link?\") %>\"><% Response.Write Record (\"NAVN\") %>,
</option>
    <%
    else
    end if
    %>
    <%
    Record.MoveNext
    Loop
    %>
    <option>-------------------------</option>
    </select>

Håber du forsåt eksemplet :o)
Den hvor der står \"Vælg sommerhus\", kan du bare skrive hvad der skal stå hvis ikke andet er valgt, den tager så Oog skriver NAVN, hvis dettes status er = 1.
Hvor har du gemt linket?
Det skal erstatte:
SIDE.ASP?id=<% Response.Write Record (\"Link?\") %>

<%

\' her laves formen
Response.write\"<form action=\'default.asp\' name=\'selecter\'>\"
\' her laves select, bemærk : onchange
response.write\"<select style=\'width:150;\' onchange=\'return GotoURL()\' name=\'sendinfo\' size=1>\"

if request(\"side\") <> \"\" then
        SqlQ = \"Select * from tabel where streng id\" & request(\"id\")  & \" order by HostingPris ASC\"
else \' ellers skiftes til viste select
        SqlQ = \"Select * from tabel order by kriterie ASC\"
end if
        Set retur_SqlQ = Connection.execute(SqlQ)
        if not retur_SqlQ.eof then
        do while not retur_SqlQ.EOF
            if retur_SqlQ(\"HostingID\") <> request(\"hosting\") then
            Response.write\"<option value=\'\" & retur_SqlQ(\"ID\") & \"\'>\" & retur_SqlQ(\"navn\") & \"</option>\"           
            end if
        retur_SqlQ.movenext
        Loop
        end if
        response.write\"</select>\"
       
        \' herefter komme onchange scriptet
%>       
        <script language=\"javascript\">
<!--
function GotoURL() {
windowURL = \"Default.asp?side=\" + document.selecter.sendinfo.value;
window.location.href = windowURL;
}
// -->
</script>

<%

\' her laves formen
Response.write\"<form action=\'default.asp\' name=\'selecter\'>\"
\' her laves select, bemærk : onchange
response.write\"<select style=\'width:150;\' onchange=\'return GotoURL()\' name=\'sendinfo\' size=1>\"

if request(\"side\") <> \"\" then
        SqlQ = \"Select * from tabel where streng id\" & request(\"id\")  & \" order by HostingPris ASC\"
else \' ellers skiftes til viste select
        SqlQ = \"Select * from tabel order by kriterie ASC\"
end if
        Set retur_SqlQ = Connection.execute(SqlQ)
        if not retur_SqlQ.eof then
        do while not retur_SqlQ.EOF
            if retur_SqlQ(\"HostingID\") <> request(\"hosting\") then
            Response.write\"<option value=\'\" & retur_SqlQ(\"ID\") & \"\'>\" & retur_SqlQ(\"navn\") & \"</option>\"           
            end if
        retur_SqlQ.movenext
        Loop
        end if
        response.write\"</select>\"
       
        \' herefter komme onchange scriptet
%>       
        <script language=\"javascript\">
<!--
function GotoURL() {
windowURL = \"Default.asp?side=\" + document.selecter.sendinfo.value;
window.location.href = windowURL;
}
// -->
</script>

Det dur sgu ikke det lort...fandme noget bøvl - nemmere at hardcode noget nyt

Hej Tommyf,

jeg er startet med dit eksempel:

Helt præcist ser min kode således ud nu:

<select size=\"1\" name=\"navig\" onChange=\"window.open(this.options[this.selectedIndex].value,\'hovedramme\')\"> 
    <option>-------------------------</option>
    <% Do While Not rs.EOF %>
    <% If rs(\"status\") = 1 Then %>
    <option value=\"<%=rs(\"link\")%>\"?id=<% Response.Write rs(\"link\")%>\"><% Response.Write rs(\"fuldenavn\") %>
</option>
    <%
    else
    end if
    %>
    <%
    rs.MoveNext
    Loop
    %>
    <option>link2</option>
    </select>

Det virker, men:
den viser kun den ene record fra databasen med status = 1 (jeg har flere). \"fuldenavn\" er det navn jeg gerne vil have i dropdownboksen. Linket har jeg lagt i databasen i et felt der hedder \"link\".

Så hvordan viser jeg flere (alle dem med status = 1) i dropdownboksen???

Lige nu viser den 2 ting i dropdownboksen, det første navn fra databasen fra feltet \"fuldenavn\", efterfulgt af \"link2\"...

<option value=\"<%=rs(\"link\")%>\"><%=(\"fuldenavn\") %></option>

Prøv at sætte ovenstående linje ind i stedet. Hvad står der i feltet \"link\"? F.eks: http://www.minside.dk/hej.htm ?

Ja, nu virker det. Mange tak!!!!

Jeg fandt ud af at man også kunne skrive:

<% If rs(\"id\") = 35 or rs(\"id\") = 37 Then %>

idet er unikt felt fra databasen.

Ja, men så tager den jo kun de to felter (35,37), i stedet for alle dem med Status = 1

ja, men hvis man kun har 2 felter så er det jo fint nok. Men dit forslag er bedre så man ikke hele tiden skal ind og ændre i den linie med id`et, hvis der kommer flere på senere.

hmmm... jeg vil nu gøre det sådan her

<% strSQL1 = \"SELECT * FROM tabel WHERE (status =\"1\")
set rs1 = conn.execute(strSQL1)

strSQL2 = \"SELECT * FROM tabel WHERE (status =\"2\")
set rs2 = conn.execute(strSQL2) %>

<form method=\"POST\" action=\"view.asp\">
<select size=\"1\" name=\"status\">
<% Do Until rs1.EOF %>
<option value=\"<%=rs1(\"id\")%>\"><%=RS1(\"navn\")%></option>
<% RS1.MoveNext
Loop %> 
</select><input type=\"submit\" value=\"View\" name=\"View\">
</form>

<p>

<form method=\"POST\" action=\"view.asp\">
<select size=\"1\" name=\"status\">
<% Do Until rs2.EOF %>
<option value=\"<%=rs2(\"id\")%>\"><%=RS2(\"navn\")%></option>
<% RS2.MoveNext
Loop %> 
</select><input type=\"submit\" value=\"View\" name=\"View\">
</form>

på view.asp laver du så en sql query der ser sådan her ud

strSQL = \"SELECT * FROM tabel where (id = \"& request.form(\"status\") &\")\"
set rs = conn.execute(strSQL)

så kan du skrive data, f.eks. <%=rs(\"id\") & \" - \" & =rs(\"navn\")%>

see the point ??

du skal nok lige fjerne = ved rs(\"navn\") ...

ok - tak for de mange gode svar! Nu kan jeg lave det på flere forskellige måder!

lige et tillægsspørgsmål:

hvordan undgår man at siden åbner op i et nyt vindue?

Det sker jo med window.open...

onChange=\"window.open(this.options[this.selectedIndex].value,\'hovedramme\')\">