bom vamos lá... esqueça a pressa isso não te leva a lugar nenhum ... !!1 se o campo é chave então é autonumeração também (quase sempre !!! kkk ) se a idéia é salvar tudo ao invés de jogar em um form tu pode mete no banco direto... <%
FOR EACH file IN pasta.Files
Conn.Execute("INSERT INTO arquivos (data, numero) VALUES ( '" & data & "', '" & file.name & "' )")
NEXT
%>
ou no form como no seu código todos os imputs tem o mesmo nome codigo então o resultado do envio vai ser:
input,input,input,input,input,input
para fazer o insert é so dar um split ali..
arquivo=split(request.form("codigo"),",")
for i=lbound(codigo) to ubound(codigo)
Conn.Execute("INSERT INTO arquivos (data, numero) VALUES ( '" & data & "', '" & codigo(i) & "' )")
next por ai vai..