Indsæt i database ved valg af radiobutton

name=\"<%=rs(\"valg5\")%>\"

hvaaa øhh ... så kan du jo ikke vide navnet på feltet !?

Skal \"name\" ikke hedde det samme hele vejen igennem....

jow det mener jeg... men det er jo heller ikke det du gør ;-)

Du gør det rimelig underligt .. prøv flg.

<input type=\"radio\" name=\"valg\" value=\"<%=rs(\"valg1\")%>\">
<input type=\"radio\" name=\"valg\" value=\"<%=rs(\"valg2\")%>\">
<input type=\"radio\" name=\"valg\" value=\"<%=rs(\"valg3\")%>\">
<input type=\"radio\" name=\"valg\" value=\"<%=rs(\"valg4\")%>\">
<input type=\"radio\" name=\"valg\" value=\"<%=rs(\"valg5\")%>\">

Nej ! det har du ret i. Jeg mente det faktisk også omvendt. Jeg har prøvet din løsning, men kan ikke trække valget ud ved hjælp af kun en enkelt post i db.

Du må lige hjælpe lidt på vej så .. får du nogle fejl?

SQLstmt = \"SELECT * FROM adresse WHERE 141 = \" & Request(\"id\")

har du et felt i din database der hedder \"141\" ?

Jeg har vist ikke forklaret det ordentligt, jeg prøver forfra.

Jeg har en post i db kaldet \"valg\" dertil skal der skrives en af følgende 5 valgmuligheder (ren tekst) :

valg1
valg2
osv.

Eksempel:

Der bliver valgt \"valg2\" denne skal indsættes i posten \"valg\" i db ved hjælp af <%=rs(\"valg\")%>
, og trækkes ud på anden side med <%=valg%>.

Håber du forstår mig!!

Jeg forstår ... jeg laver lige et eksempel til dig ..

Mange tak...

Denne kan indskrive nyt \"valg\" og update et eksisterende ...

<%
    strValg = Request(\"valg\")
    strID = Request(\"id\")

    If strValg > \"\" Then
        Set Conn = Server.CreateObject(\"ADODB.Connection\")
        Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"valg.mdb\")

        Select Case (strID > \"\")
            Case True:  strSQL = \"UPDATE valg  SET valg=\'\" & strValg & \"\' WHERE id=\" & strID & \";\"
            Case False: strSQL = \"INSERT INTO valg (valg) VALUES (\'\" & strValg & \"\');\"
        End Select

        Conn.Execute(strSQL)
        Conn.Close: Set Conn = Nothing
    ElseIf strID > \"\" And IsNumeric(strID) Then
        Set Conn = Server.CreateObject(\"ADODB.Connection\")
        Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"valg.mdb\")

        strSQL = \"SELECT * FROM valg WHERE id=\" & strID & \";\"

        Set Rs = Conn.Execute(strSQL)
        strValg = Rs(\"valg\")
       
        Set Rs = Nothing
        Conn.Close: Set Conn = Nothing
    End If
%>
<form action=\"valg.asp\" method=\"post\">
    <input type=\"hidden\" name=\"id\" value=\"<%=strID%>\">
    <input type=\"radio\" name=\"valg\" value=\"valg1\"<% If strValg = \"valg1\" Then Response.Write \" checked\" %>>Valg #1<br>
    <input type=\"radio\" name=\"valg\" value=\"valg2\"<% If strValg = \"valg2\" Then Response.Write \" checked\" %>>Valg #2<br>
    <input type=\"radio\" name=\"valg\" value=\"valg3\"<% If strValg = \"valg3\" Then Response.Write \" checked\" %>>Valg #3<br>
    <input type=\"radio\" name=\"valg\" value=\"valg4\"<% If strValg = \"valg4\" Then Response.Write \" checked\" %>>Valg #4<br>
    <input type=\"radio\" name=\"valg\" value=\"valg5\"<% If strValg = \"valg5\" Then Response.Write \" checked\" %>>Valg #5
    <p>
    <input type=\"submit\" value=\" Send \">
</form>

Mange tak for dit hurtige svar/løsning.

Det var så lidt :-)