Avatar billede flemming39 Nybegynder
05. november 2005 - 09:53 Der er 9 kommentarer og
1 løsning

Rulleliste poper op i toppen af siden!

Jeg har en comboboks som jeg vil indsætte på siden lige før feltet brancheerfaring. Men rullelisten/combo bliver hver gang vist øverst på siden.
Jeg har søgt men har ikke kunnet finde ud af hvad der skal til for at rullelisten oprettes det rigtige sted på siden.

mvh Flemming

Her er den sidste del af min kode:
    <tr>
        <td><font face="Arial">Pris:</font></td>
        <td><font face="Arial"><input type='text' name='pris' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Omsætning:</font></td>
        <td><font face="Arial"><input type='text' name='omsaetning' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Egenkapital:</font></td>
        <td><font face="Arial"><input type='text' name='egenkapital' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <form>
<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
    Response.Write "<select name=dropdown size=1>"
    Do While Not rs.EOF
      Response.Write "<option value=""" & rs("brancheID") & """>"& rs("branche") & "</option>"
      rs.MoveNext
    Loop
    Response.Write "</select>"
    Conn.Close
    Set Conn = Nothing
%>
</form>
    <tr>
        <td valign='top'><font face="Arial">Brancheerfaring:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='brancheerfaring'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Karriereforløb:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='karriereforloeb'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Geografisk område:</font></td>
        <td><font face="Arial"><input type='text' name='geografisk_omraade' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Henvendelse/Spørgsmål:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='8' name='tekst'></textarea></font></td>
    </tr>
    <tr>
        <td><font face="Arial">&nbsp;</font></td>
        <td><font face="Arial"><input type='submit' name='submit' value='Send'></font></td>
    </tr>
</table>

</form>

</body>
</html>
Avatar billede steen_hansen Forsker
05. november 2005 - 10:12 #1
Hvis jeg var dig, ville jeg træde ud af VB-scripting og lave HTML-tags, hvor de hører hjemme:

<form>
<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
%>
    <select name="dropdown" size="1">

<%    Do While Not rs.EOF %>
        <option value="<%=rs("brancheID")%>" "<%=rs("branche")%>"></option>

<%
    rs.MoveNext
    Loop
%>
    </select>

<%
    Conn.Close
    Set Conn = Nothing
%>
</form>
Avatar billede steen_hansen Forsker
05. november 2005 - 10:14 #2
Lidt sjusket, men du kan nok se meningen.

<form>

<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
%>

    <select name="dropdown" size="1">

<% Do While Not rs.EOF %>

        <option value="<%=rs("brancheID")%>" "<%=rs("branche")%>"></option>

<%
    rs.MoveNext
    Loop
%>

    </select>

<%
    Conn.Close
    Set Conn = Nothing
%>

</form>
Avatar billede steen_hansen Forsker
05. november 2005 - 10:22 #3
Hele tabellen MED dine HTML3-ting:)

<form>
<table>
    <tr>
        <td><font face="Arial">Pris:</font></td>
        <td><font face="Arial"><input type='text' name='pris' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Omsætning:</font></td>
        <td><font face="Arial"><input type='text' name='omsaetning' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Egenkapital:</font></td>
        <td><font face="Arial"><input type='text' name='egenkapital' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td colspan="2">
    <%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
    %>

        <select name="dropdown" size="1">

    <% Do While Not rs.EOF %>

            <option value="<%=rs("brancheID")%>" "<%=rs("branche")%>"></option>

    <%
    rs.MoveNext
    Loop
    %>
        </select>

    <%
    Conn.Close
    Set Conn = Nothing
    %>

        </td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Brancheerfaring:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='brancheerfaring'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Karriereforløb:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='karriereforloeb'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Geografisk område:</font></td>
        <td><font face="Arial"><input type='text' name='geografisk_omraade' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Henvendelse/Spørgsmål:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='8' name='tekst'></textarea></font></td>
    </tr>
    <tr>
        <td><font face="Arial">&nbsp;</font></td>
        <td><font face="Arial"><input type='submit' name='submit' value='Send'></font></td>
    </tr>
</table>
</form>
Avatar billede flemming39 Nybegynder
05. november 2005 - 16:04 #4
Hej Steen


Mange tak for din hjælp men jeg kan desværre ikke få det til at virke!
Jeg kan godt se det smarte i at "skille tingene ad" men nu er jeg tilbage hvor jeg har en lille dropdown box i øverste hjørne uden data.
Kan du se hvad der er galt?

mvh Flemming

Hele koden:

<html>

<head>
<title>Bliv registeret</title>
</head>
<body topmargin='10' leftmargin='10' rightmargin='10' bottommargin='10' bgcolor="#666666" text="#FFFFFF">

<p>
&nbsp;
<form action='registrer.asp' method='post'>

<table cellspacing='0' cellpadding='2' border='0' width="485">
    <tr>
        <td><b><font face="Arial">Firmanavn:</font></b></td>
        <td><font face="Arial"><input type='text' name='firma' size='35'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Fornavn:</font></td>
        <td><font face="Arial"><input type='text' name='fornavn' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Efternavn:</font></td>
        <td><font face="Arial"><input type='text' name='efternavn' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Adresse:</font></td>
        <td><font face="Arial"><input type='text' name='adresse' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Postnr. og by:</font></td>
        <td><font face="Arial"><input type='text' name='postnr' size='5'> <input type='text' name='by' size='20'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Telefon:</font></td>
        <td><font face="Arial"><input type='text' name='telefon' size='30'><font color="#FF0000">*</font> </font></td>
    </tr>
    <tr>
        <td><font face="Arial">Fax:</font></td>
        <td><font face="Arial"><input type='text' name='fax' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">E-mail:</font></td>
        <td><font face="Arial"><input type='text' name='email' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Website:</font></td>
        <td><font face="Arial"><input type='text' name='website' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat adresse:</font></td>
        <td><font face="Arial"><input type='text' name='privat_adresse' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat postnr. og by::</font></td>
        <td><font face="Arial"><input type='text' name='privat_postnr' size='5'> <input type='text' name='privat_by' size='20'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat telefon:</font></td>
        <td><font face="Arial"><input type='text' name='privat_telefon' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat fax:</font></td>
        <td><font face="Arial"><input type='text' name='privat_fax' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Mobiltelefon:</font></td>
        <td><font face="Arial"><input type='text' name='mobiltelefon' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Overskrift til Internet:</font></td>
        <td><font face="Arial"><input type='text' name='interoverskrift' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Tekst til Internet:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='5' name='internet_tekst'></textarea></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Pris:</font></td>
        <td><font face="Arial"><input type='text' name='pris' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Omsætning:</font></td>
        <td><font face="Arial"><input type='text' name='omsaetning' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Egenkapital:</font></td>
        <td><font face="Arial"><input type='text' name='egenkapital' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
    %>

        <select name="dropdown" size="1">

    <% Do While Not rs.EOF %>

            <option value="<%=rs("brancheID")%>" "<%=rs("branche")%>"></option>

    <%
    rs.MoveNext
    Loop
    %>
        </select>

    <%
    Conn.Close
    Set Conn = Nothing
    %>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Brancheerfaring:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='brancheerfaring'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Karriereforløb:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='karriereforloeb'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Geografisk område:</font></td>
        <td><font face="Arial"><input type='text' name='geografisk_omraade' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Henvendelse/Spørgsmål:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='8' name='tekst'></textarea></font></td>
    </tr>
    <tr>
        <td><font face="Arial">&nbsp;</font></td>
        <td><font face="Arial"><input type='submit' name='submit' value='Send'></font></td>
    </tr>
</table>

</form>

</body>
</html>
Avatar billede steen_hansen Forsker
05. november 2005 - 16:12 #5
Hm? Der manglede da også <td>:

<p>
&nbsp;
<form action='registrer.asp' method='post'>

<table cellspacing='0' cellpadding='2' border='0' width="485">
    <tr>
        <td><b><font face="Arial">Firmanavn:</font></b></td>
        <td><font face="Arial"><input type='text' name='firma' size='35'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Fornavn:</font></td>
        <td><font face="Arial"><input type='text' name='fornavn' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Efternavn:</font></td>
        <td><font face="Arial"><input type='text' name='efternavn' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Adresse:</font></td>
        <td><font face="Arial"><input type='text' name='adresse' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Postnr. og by:</font></td>
        <td><font face="Arial"><input type='text' name='postnr' size='5'> <input type='text' name='by' size='20'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Telefon:</font></td>
        <td><font face="Arial"><input type='text' name='telefon' size='30'><font color="#FF0000">*</font> </font></td>
    </tr>
    <tr>
        <td><font face="Arial">Fax:</font></td>
        <td><font face="Arial"><input type='text' name='fax' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">E-mail:</font></td>
        <td><font face="Arial"><input type='text' name='email' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Website:</font></td>
        <td><font face="Arial"><input type='text' name='website' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat adresse:</font></td>
        <td><font face="Arial"><input type='text' name='privat_adresse' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat postnr. og by::</font></td>
        <td><font face="Arial"><input type='text' name='privat_postnr' size='5'> <input type='text' name='privat_by' size='20'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat telefon:</font></td>
        <td><font face="Arial"><input type='text' name='privat_telefon' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat fax:</font></td>
        <td><font face="Arial"><input type='text' name='privat_fax' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Mobiltelefon:</font></td>
        <td><font face="Arial"><input type='text' name='mobiltelefon' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Overskrift til Internet:</font></td>
        <td><font face="Arial"><input type='text' name='interoverskrift' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Tekst til Internet:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='5' name='internet_tekst'></textarea></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Pris:</font></td>
        <td><font face="Arial"><input type='text' name='pris' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Omsætning:</font></td>
        <td><font face="Arial"><input type='text' name='omsaetning' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Egenkapital:</font></td>
        <td><font face="Arial"><input type='text' name='egenkapital' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td>

<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
    %>

        <select name="dropdown" size="1">

    <% Do While Not rs.EOF %>

            <option value="<%=rs("brancheID")%>" "<%=rs("branche")%>"></option>

    <%
    rs.MoveNext
    Loop
    %>
        </select>

    <%
    Conn.Close
    Set Conn = Nothing
    %>

        </td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Brancheerfaring:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='brancheerfaring'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Karriereforløb:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='karriereforloeb'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Geografisk område:</font></td>
        <td><font face="Arial"><input type='text' name='geografisk_omraade' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Henvendelse/Spørgsmål:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='8' name='tekst'></textarea></font></td>
    </tr>
    <tr>
        <td><font face="Arial">&nbsp;</font></td>
        <td><font face="Arial"><input type='submit' name='submit' value='Send'></font></td>
    </tr>
</table>

</form>

</body>
</html>
Avatar billede steen_hansen Forsker
05. november 2005 - 16:17 #6
Ups, en fejl:

<p>
&nbsp;
<form action='registrer.asp' method='post'>

<table cellspacing='0' cellpadding='2' border='0' width="485">
    <tr>
        <td><b><font face="Arial">Firmanavn:</font></b></td>
        <td><font face="Arial"><input type='text' name='firma' size='35'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Fornavn:</font></td>
        <td><font face="Arial"><input type='text' name='fornavn' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Efternavn:</font></td>
        <td><font face="Arial"><input type='text' name='efternavn' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Adresse:</font></td>
        <td><font face="Arial"><input type='text' name='adresse' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Postnr. og by:</font></td>
        <td><font face="Arial"><input type='text' name='postnr' size='5'> <input type='text' name='by' size='20'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Telefon:</font></td>
        <td><font face="Arial"><input type='text' name='telefon' size='30'><font color="#FF0000">*</font> </font></td>
    </tr>
    <tr>
        <td><font face="Arial">Fax:</font></td>
        <td><font face="Arial"><input type='text' name='fax' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">E-mail:</font></td>
        <td><font face="Arial"><input type='text' name='email' size='30'><font color="#FF0000">*</font></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Website:</font></td>
        <td><font face="Arial"><input type='text' name='website' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat adresse:</font></td>
        <td><font face="Arial"><input type='text' name='privat_adresse' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat postnr. og by::</font></td>
        <td><font face="Arial"><input type='text' name='privat_postnr' size='5'> <input type='text' name='privat_by' size='20'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat telefon:</font></td>
        <td><font face="Arial"><input type='text' name='privat_telefon' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Privat fax:</font></td>
        <td><font face="Arial"><input type='text' name='privat_fax' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Mobiltelefon:</font></td>
        <td><font face="Arial"><input type='text' name='mobiltelefon' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Overskrift til Internet:</font></td>
        <td><font face="Arial"><input type='text' name='interoverskrift' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Tekst til Internet:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='5' name='internet_tekst'></textarea></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td><font face="Arial">Pris:</font></td>
        <td><font face="Arial"><input type='text' name='pris' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Omsætning:</font></td>
        <td><font face="Arial"><input type='text' name='omsaetning' size='30'></font></td>
    </tr>
    <tr>
        <td><font face="Arial">Egenkapital:</font></td>
        <td><font face="Arial"><input type='text' name='egenkapital' size='30'></font></td>
    </tr>
    <tr>
        <td colspan='2'><font face="Arial">&nbsp;</font></td>
    </tr>
    <tr>
        <td>

<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
    %>

        <select name="dropdown" size="1">

    <% Do While Not rs.EOF %>

            <option value="<%=rs("brancheID")%> <%=rs("branche")%>"></option>

    <%
    rs.MoveNext
    Loop
    %>
        </select>

    <%
    Conn.Close
    Set Conn = Nothing
    %>

        </td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Brancheerfaring:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='brancheerfaring'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Karriereforløb:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='3' name='karriereforloeb'></textarea></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Geografisk område:</font></td>
        <td><font face="Arial"><input type='text' name='geografisk_omraade' size='30'></font></td>
    </tr>
    <tr>
        <td valign='top'><font face="Arial">Henvendelse/Spørgsmål:</font></td>
        <td><font face="Arial"><textarea cols='25' rows='8' name='tekst'></textarea></font></td>
    </tr>
    <tr>
        <td><font face="Arial">&nbsp;</font></td>
        <td><font face="Arial"><input type='submit' name='submit' value='Send'></font></td>
    </tr>
</table>

</form>

</body>
</html>
Avatar billede flemming39 Nybegynder
05. november 2005 - 16:23 #7
Tak for det.

Nu er dropdown boksen på plads
Men combo boksen indeholder ikke nogen resultater og er kun ca. 1 cm bred?

Når jeg bruger den "gamle" kode virker dropdown boksen men spørgsmålet er hvordan jeg får den flyttet "ind på linie" med de andre så jeg kan placere en label foran boksen?

vh Flemming Se den "gamle kode" nedenfor

<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
    Response.Write "<select name=dropdown size=1>"
    Do While Not rs.EOF
    Response.Write "<option value=""" & """>"& rs("branche") & "</option>"
    rs.MoveNext
    Loop
    Response.Write "</select>"
    Conn.Close
    Set Conn = Nothing
%>
Avatar billede steen_hansen Forsker
05. november 2005 - 16:27 #8
<%
    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("fpdb/fhcrm.mdb")
    Conn.Open DSN
    strSQL = "SELECT * from brancher order by branche"
    Set rs = conn.Execute(strSQL)
    %>

        <select name="dropdown" size="1">

    <% Do While Not rs.EOF %>

            <option value="<%=rs("brancheID")%>"><%=rs("branche")%></option>

    <%
    rs.MoveNext
    Loop
    %>
        </select>

    <%
    Conn.Close
    Set Conn = Nothing
    %>

Altså denne linie: <option value="<%=rs("brancheID")%>"><%=rs("branche")%></option>
Avatar billede flemming39 Nybegynder
05. november 2005 - 16:34 #9
Hej Steen

Så virker det perfekt!
Jeg er som du nok kan regne ud meget "grøn" endnu og meget glad for din hjælp
Vil du poste et svar så du kan få nogle meget velfortjente point?

Tak for hjælpen

mvh Flemming
Avatar billede steen_hansen Forsker
05. november 2005 - 16:35 #10
Det var så lidt Flemming. Glæder mig, at det virker :) Tak for point :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester