form igen

En check-box fra en form giver dig værdien af value delen og ikke om den er checked eller ej. Hvis der er kryds i får du værdien af value:
Værdien du skal gemme i databasen skal være 1 for true og 0 for false... Og man skal ikke bruger ' omkring.

Så du skal tjekke på om du får en værdi eller ej:

if request.form("box") <> "" then
  felt_box = true
else
  felt_box = false
end if

Så SQLen:
strSQL = "Update tabel set hallo=" & felt_box & " where Id=35"

Glemt lige den check box skal se ud i stil med:

<input type="checkbox" name="box" value="noget">

Tak for dit svar

jeg er ikke lige 100 % med på den, gider du ikke sætte den ind i koden for mig...

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("test.mdb")
Conn.Open DSN

if request.form("box") <> "" then
  felt_box = true
else
  felt_box = false
end if

strSQL = "Update tabel set hallo=" & felt_box & " where Id=35"

Conn.Execute(strSQL)
Conn.Close

response.write "opdateret"
%>

ok det virker hvis jeg skriver :
felt_box = 1
else
felt_box = 0

ellers kommer den med fejl (ved ikke hvorfor)

----------Men det er også super-------------
Form :
<form name="form1" method="post" action="s.asp">
  <input type="checkbox" name="box" value="et-eller-anden">
  <input type="submit" name="Submit" value="Send">
</form>

Men man må da kunne skrive "et-eller-andet" i value - sådan den går ind i databasen og se efter om det er 0 eller 1 - og hvis den så er 1 i databasen bliver den afkrydset i formen.

lige en ting:

if request.form("box") <> "" then --> gider du og forklare hvorfor <> "" ?? (er ny i asp)

Ok. Form skal hvade en default som i databasen, så skal du hendte værdien (true/false) fra databasen på form siden. Man skal i  HTML skrive CHECKED i checkboxen hvis der default skal være kryds i den:


<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("test.mdb")
Conn.Open DSN
strSQL = "SELECT hallo FROM tabel where Id=35"
Set rs=Conn.execute(strSQL)
%>

<form name="form1" method="post" action="s.asp">
  <input type="checkbox" name="box" value="et-eller-anden"
<% if rs("hello") = true then
    response.write " CHECKED "
end if %> >
  <input type="submit" name="Submit" value="Send">
</form>

rs.Close
Conn.Close

Forklaring af:  if request.form("box") <> "" then

"" er en tomstreng.
<> betyder forskællig fra (eller ikke lig med)

Så det man tjekker på er om value fra Checkbox'en "box" er forskællig fra en tom streng. Hvis man har sat kryds i den så vil Request.Form("box") være = "et-eller-anden".

Det syntes jeg ikke helt virker måske har jeg sat det forkert ind.

min form.asp :
---------------------------------------------
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("test.mdb")
Conn.Open DSN
strSQL = "SELECT hallo FROM tabel where Id=35"
Set rs=Conn.execute(strSQL)
%>

<form name="form1" method="post" action="s.asp">
  <input type="checkbox" name="box" value="et-eller-anden"
<% if rs("hello") = true then
    response.write " CHECKED "
end if %> >
  <input type="submit" name="Submit" value="Send">
</form>

<%
rs.Close
Conn.Close
%>

------------------------min s.asp----------------------

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("test.mdb")
Conn.Open DSN

if request.form("box") <> "" then
  felt_box = 1
else
  felt_box = 0
end if

strSQL = "Update tabel set hallo=" & felt_box & " where Id=35"

Conn.Execute(strSQL)
Conn.Close

response.write "opdateret"
%>

------------------------------------
kan du se nogle fejl ?

Kan du se om databasen bliver opdateret?

Jeg kan se en fejl.. Jeg har skrev hello og ikke hallo i denn linie:

<% if rs("hello") = true then

Rettes til:
<% if rs("hallo") = true then

heh jeg så det også lige nu -- det virker tak for hjælpen :-)

Det var så lidt :) tak for points.