submit / request

<%
if request.form("dit afkrydsningsfelt") = true hen
response.write "afkrydset"
else
response.write "ikke afkrydset"
end if
%>

Måske...

If Request.Form("checkbox") = "" then
    Response.write "Du har ikke valgt noget som helst"
else
arrCheckBox = split(Request.Form("checkbox"),", ")

    start = LBound(arrCheckBox)
    slut = UBound(arrCheckBox)
For i = start to slut
    Response.Write "Du har valgt: " & arrCheckBox(i) & "<br>" & "" 
    Response.Write "<br><br><hr size=""1"">"

next %>

Lenn

Hov - det kræver at du giver dine tjeckboxe samme "name=checkbox".
Det er fordi tjckboxe sepereres vha. komma

If (Request.ServerVariables("REQUEST_METHOD") = "POST") Then
      For Each myItem In Request.Form
        If (InStr(myItem, "NamePåDineCheckbokse") > 0) Then
          'Her får du værdien (i): CLng(Request.Form(myItem))
        End If
      Next

Her er så koden til checkboksene:

i = RS("fldID")

<INPUT TYPE="checkbox" NAME="NamePåDineCheckbokse<%=i%>" VALUE="<%=i%>">

tilføj lige et "end if"i bunden...

Her er noget jeg har lavet på et tidpunkt.
Pricipet: Den første side hvor man vælger hvilke der skal ændre, er lavet en checkbox ud fra hver Videofilm (du skal selv indsættet information omkring filemen). Alle checkboxe har samme navn (KAK, spørg ikke hvorfor navnet er KAK), checkboxens value (ID) sættes til Videofilemen's ID fra databasen, jeg antager at hver videofilm vil havde en unik ID. På den anden side er lavet et for loop som sletter videofilm fra databasen hvor videofilm ID er lig med ID på de checkboxe som er valgt.
Til hver film laves sådan en checkbox <input type="checkbox" name=KAK value=<%=rs("ID")%>>

Dette skal være i filen hvor man vælge checkboxne:

'Kør din SQL inden som han hendte Vidofilm ID som skal insættet i Checkboxen.
If Not (rs.BOF Or rs.EOF) Then
%>
<form method="post" action=" slet_valgte_film.asp" name="hhabb">
<% Do While Not rs.EOF
  'INDSÆT NOGET INFO OMKRING VIDEOFILM evt i tabel form!!
%>
  <input type="checkbox" name=KAK value=<%=rs("ID")%>><br>
  <% rs.MoveNext
Loop %>
<p><input type="submit" value="Slet" name="Action"></p>
</form>
<%
Else
  ' Hvis der ikke er fundet poster på søgningen
  Response.Write "<p>Der er ikke fundet noget på denne søgning</p>"
End If
' Rydder op efter os
myConn.Close
'rs.Close
Set myConn = Nothing


-- slet_valgte_film.asp------

<%
'nItem Antal checkbokse som er med [x].
nItems = Request.Form("KAK").Count
if (nItems >= 1) then
  'Henter værdien fra sidste side
  For i = 1 To nItems
    her er :  ID="&Request.Form("KAK")(i)
  Next
else
  Response.Write "Mindst en vare skal vælges"
end if
%>

Tak for forslagne. Jeg har kigge på de svar der er kommet. Det er mening at på modtager siden skal vises de samme chekboxene fra den forrige side, men med de markeringer der blev lavet. Det har jeg ikke kunne få det til ud fra de forslag der er kommet?

Dette skal være i filen hvor man vælge checkboxne:

strSQL = "SELECT * FROM tabel;"
set rs=conn.execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
%>
<form method="post" action="viaigen.asp" name="hhabb">
<% Do While Not rs.EOF %>
  <input type="checkbox" name="KAK" value=<%=rs("ID")%>><br>
  <% rs.MoveNext
Loop %>
<p><input type="submit" value="Næste" name="Action"></p>
</form>
<%
End If




Næste fil visigen.asp:

listID = ", " & response.write("KAK") & ","

strSQL = "SELECT * FROM tabel;"
set rs=conn.execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
%>
<form method="post" action="nyviaigen.asp" name="hhabb">
<% Do While Not rs.EOF %>
  <input type="checkbox" name="KAK" value=<%=rs("ID")%>
  <% tstStr = ", " & rs("ID") & ","
    if inStr (1,listID,tstStr) > 0 then
      response.write (" CHECKED")
    end if %>
    ><br>
  <% rs.MoveNext
Loop %>
<p><input type="submit" value="Næste" name="Action"></p>
</form>
<%
End If

Tak for hjælpen.