INSERT SQL alle fra listen

Har du et bud på hvordan det skal se ud eller forventer du at få det hele færdigpakket og klar til kørsel?

Jeg ved godt hvordan man laver en liste og får alle navnene op i et loop, men det andet ved jeg ikke.

....hmmm.... jeg synes egentlig ikke rigtig at du svarede på mit spørgsmål.

Det ville være meget lettere at hjælpe hvis du havde noget kode, som man kan skrive videre på.

For at se navn + checkbox ved siden af:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
DSN = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("MinDatabase.mdb")
Conn.Open DSN
 
SQL = "select * from users"
 
rs.Open SQL, Conn
response.write "<form action=Min.asp method=post>"
do while not rs.eof
    response.write "<input type='checkbox' name='modify' value="&rs("id") & ">" & rs("navn") & "<br>"
rs.moveNext
loop
response.write "<input type='submit' name='submit'>"
%>

her kan du se hvad blev valgt

<%
modifyStr = request.form("modify")
modifyArry = split(modifyStr,",")
for i=0 to ubound(modifyArry)
    response.write "De valgte elemnter er:" & modifyArry(i) & "<br>"
next
%>

for den anden halvdel af dit spørgsmål så skal man vide om du vil inserte i samme side eller i anden side. Her sat jeg ikke form. Men nu har du en array, du skal bare bruge : for each... in request.form også sin sql sætning for at inserte værdier.
kom bare igang også kan vi se hvad der sker.

Så er jeg kommet så langt. Så skal INSERT -sætningen bare køres i løkken

Dim modifyStr, modifyArry
    SQL = "SELECT * FROM Users;"
Set rs = Con.execute(SQL)
If NOT rs.EOF Then
Response.Write ("<form action=""chat.asp?mode=multi"" method=""post"">")
  Do while NOT rs.EOF
  response.write ("<input type=""checkbox"" name=""modify"" value=""" & rs("id") & """>" & rs("Username") & "<br>")
rs.moveNext
loop
response.write "<input type=""submit"" name=""submit"">"

modifyStr = request.form("modify")
modifyArry = split(modifyStr,",")
for i=0 to ubound(modifyArry)
    response.write "De valgte elemnter er:" & modifyArry(i) & "<br>"
next

   
End if
Set rs = nothing

så din array insert sql bliver:
modifyStr = request.form("modify")
modifyArry = split(modifyStr,",")
for i=0 to ubound(modifyarr)
strsql="insert into users (ID,navn) values('" & ID(i) &"' ,'" & navn(i) & "')"
cn.execute (strsql)
next

så ved jeg ikke om ID er tal eller text. så må lave din tabel sådan at du ikke få dubletter.