Creo que esto es lo que necesitas, no lo he probado, no se si tiene errores de sintaxis, pero te va a guiar en como obtener tu codigo...
Esto iria en la pagina que recibe los datos del Form:
Código PHP:
Dim conn
Dimm db
Set conn = Server.CreateObject("ADODB.Connection")
Set db = Server.CreateObject("ADODB.Recordset")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("base.mdb")
Dimm Array1
Dimm Array2
Dimm Array3
Array1 = Split ("a_1,a_2,a_3,a_4,a_5,a_6,a_7,a_8,a_9,a_10,a_11,a_12,a_13", ",", -1, 1)
Array2 = Split ("b_1,b_2,b_3,b_4,b_5,b_6,b_7,b_8,b_9,b_10,b_11,b_12,b_13", ",", -1, 1)
Array3 = Split ("c_1,c_2,c_3,c_4,c_5,c_6,c_7,c_8,c_9,c_10,c_11,c_12,c_13", ",", -1, 1)
Dimm i
Dimm sql
For i = 0 to uBound(Array1)
sql = "INSERT INTO etapa_esp " & Array1(i) & " VALUES " & Request.Form(Array1(i))
conn.Execute(sql)
Next
For i = 0 to uBound(Array2)
sql = "INSERT INTO etapa_esp " & Array2(i) & " VALUES " & Request.Form(Array2(i))
conn.Execute(sql)
Next
For i = 0 to uBound(Array3)
sql = "INSERT INTO etapa_esp " & Array3(i) & " VALUES " & Request.Form(Array3(i))
conn.Execute(sql)
Next
conn.Close
Set conn = Nothing