checkbox

Hej E.

Jeg har følgende kode:

<%


selection1=\"<select NAME=\'LAND\' size=\'1\'>\"
selection1=selection1&\"<option value=\'Select\' selected>Select</option>\"

Set rs = Server.CreateObject(\"ADODB.Recordset\")
sql = \"SELECT * FROM LAND ORDER BY LAND ASC\"
rs.Open sql, conn, 3, 3
\'on error resume next
rs.movefirst
Do While Not Rs.eof
    LAND=rs(\"LAND\")
        selection1=selection1&\"<option VALUE=\"&LAND&\">\"&LAND&\"</option>\"
        rs.MoveNext
loop
rs.Close
set rs=nothing   
selection1=selection1&\"</select>\"   

titr=\"Insert or change project\"

if not isEmpty(Request.QueryString(\"ID\")) then
    Set rs = Server.CreateObject(\"ADODB.Recordset\")
    sql = \"SELECT * FROM EMNER where ID=\"&Request.QueryString(\"ID\")
    rs.Open sql, conn, 3, 3
    OVERSKRIFT=rs(\"OVERSKRIFT\")
    BRODTEKST=rs(\"BRODTEKST\")
    emne= rs(\"SUB\")
    CATEGORI=\"\'\"&RS(\"CATEGORI\")&\"\'\"
    ADD= \"\'\"&rs(\"ADD\")&\"\'\"
    LAND= \"\'\"&rs(\"LAND\")&\"\'\"
    FOTO_FIL_NAVN=rs.Fields(\"FOTO_FIL_NAVN\")
    CATEGORI=rs.Fields(\"CATEGORI\")
    BYG_HERRE=rs.Fields(\"BYG_HERRE\")
    PERIODESTART=rs.Fields(\"PERIODESTART\")
    PERIODESTART2=rs.Fields(\"PERIODESTART2\")
    BESKRIVELSE=rs.Fields(\"BESKRIVELSE\")
    PIHL_YDELSER=rs.Fields(\"PIHL_YDELSER\")
    BRODTEKST=rs.Fields(\"BRODTEKST\")
    TheOption=\"change\"
    Idvalue=Request.QueryString(\"ID\")
       
else
    emne= Request.QueryString(\"emne\")
    CATEGORI=\"\"
    ADD= \"\'Select\'\"
    LAND= \"\'Select\'\"
    Idvalue=0
    TheOption=\"add\"
end if

%>

PERIODESTART2 er en checkbox.
Hvordan kalder jeg værdien fra en Ja/Nej i databasen?