Arreglo de Texts y un Insert de SQL

[Sebas22]

Supongase que tengo el siguiente codigo:

<%
For i=1 to 4
<input type="text" name="<%=i%>" size="20">
next
arreglo = request.form(i)

//Suprimidas conexiones con una base de datos

Ob_RS.Open "Tabla", Conn, adOpenStatic, adCmdTable
if not OB_RS.EOF then
OB_RS.MoveLast
cod = OB_RS("Codigo") + 1
else
cod = 1
end if

sql = “insert into Tabla (Codigo, Campo1) values (‘” & cod & “’, ‘” & arreglo & “’)”
Com.CommandText = sql
Com.Execute

Lo que yo quiero hacer es insertar los 4 registros que corresponderían, los cuales deberian quedar asi en la base de datos:

Codigo = 1 – Campo1 = “algo”
Codigo = 2 – Campo1 = “otra cosa”
... Y asi los 4 registros

Ahora bien, ¿esto podria implementarse con la clausula “IN” del SQL? De ser asi, ¿como seria?... y en caso que no fuera, ¿como puedo lograr los resultados que necesito? Un saludo...