
06/02/2007, 21:52
|
 | | | Fecha de Ingreso: enero-2007 Ubicación: STGO - CHILE
Mensajes: 51
Antigüedad: 18 años, 3 meses Puntos: 0 | |
Re: ingresar varios registro Pero, tambien los campos pueden tener el mismo nombre y los separas con un split(STRING,",") los separas por COMAS porque al tener los mismos campos quedarian separados cada uno por COMAS.
<%
'RECIBO LOS CAMPOS
Dim ArregloCampos,ArregloStatus,size1,size2,i
ArregloCampos=split(Request.Form("NombreParte"),", ")
ArregloStatus=split(Request.Form("status"),",")
size1=ubound(ArregloCampos)
size2=ubound(ArregloStatus)
i=0
If size1=size2 Then 'Comprobamos que ambos arreglos tengan la misma cantidad de datos
While (i<=size1)
dato1=ArregloCampos(i)
dato2=ArregloStatus(i)
'INSERTAS LAS VARIABLES CON LOS DATOS
i=i+1
Wend
End If
If size1<>size2 Then
Response.Write("Falto Completar Datos")
End If
%> |