insert med checkbox

Morsning..
Jag har en gammal kod som tar bort poster utifrån checkboxar i ett formulär:
<%
If Request.Form("IDnummer").Count > 0 Then
Dim ConnDB
Dim SSQL
Dim vTemp
Dim sIn
Dim sList

Connectionstring = MM_connection_STRING
set ConnDB = Server.CreateObject("ADODB.connection")

ConnDB.Open Connectionstring

  For each vTemp in Request.Form("IDnummer") 
     If Len(sIn) Then
         sIn = sIn & ", '" & vTemp & "'"
     Else
         sIn = "'" & vTemp & "'"
     End if
     sList = sList & vTemp & "\<BR\>" & vbCrLf
 Next

 SSQL = "DELETE FROM dbo.Utlaning WHERE IDnummer IN (" & sIn & ")"

 ConnDB.Execute SSQL
 Response.Write "Dina lånade inventarier har lämnats tillbaka!\<br\>"
 'Response.Write "Följande inventarier har tagits bort:\<BR\>" & vbcrlf
 'Response.Write sList
 Response.Write "\<a href='loan_inv.asp?Personnummer=Session('Personnummer')' class='link'\>« Tillbaka\</a\>" 

Else
%>
Jag undrar om någon kan visa mig hur man kan få denna kod att inserta i en tabell istället? jag måste få till ett recordset...orkar inte tänka själv!! kan inte någon göra det åt mig??

//niclas

------------------
ingenting är omöjligt det tar bara lite längre tid..

skriv en insert-query istället bara...

sen undrar jag hur du hade tänkt att detta skulle fungera:

Response.Write "<a href='loan_inv.asp?Personnummer=Session('Personnummer')' class='link'>« Tillbaka</a>"

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

Snabbt svarat @nders =)
Ja en insert-query, men jag ska JOINA 2 tabeller:
checkboxens värde är id från tabell1 och dom ska in i tabell 2 som är JOINAD med tabell3??
Alltså.
Tabell1:
återförsäljarID

Tabell2:
återförsäljarID
OmrådeID

Tabell3:
OmrådeID

Tänkte att man kunde fixa det på någe sätt....vet du??

//niclas

------------------
ingenting är omöjligt det tar bara lite längre tid..