
19/03/2008, 07:38
|
| | Fecha de Ingreso: febrero-2008
Mensajes: 111
Antigüedad: 17 años, 2 meses Puntos: 1 | |
Re: Recorrer datos de una cadena y grabarlos en una base de datos tu url genera esto:
com_75_1_76: 118
com_75_12_77: 126
com_75_13_77: 130
com_75_14_78: 124
com_75_15_78: 132
com_75_16_79: 122
com_75_17_79: 134
com_75_18_80: 120
com_75_19_80: 136
com_75_2_76: 128
Rad_76: 81
Che_77_88: 88
Che_77_89: 89
Che_77_90: 90
Che_77_91: 91
Che_77_92: 92
Rad_78: 96
Rad_79: 98
Rad_80: 100
Rad_81: 102
Mtr_82_103: 39
Mtr_82_104: 37
Mtr_82_105: 36
Mtr_82_106: 36
Mtr_82_107: 39
Mtr_82_108: 37
Mtr_82_109: 36
Rad_83: 110
eso debes guardarlo en una variable y luego esa variable en un arreglo:
(sería bueno que pudieras discriminar antes de qué tipo son y guardarlos en variables distintas)
dim arreglo
dim variable
variable= request("aqui va el origen de tus datos, los que te retorna la url")
arreglo= split(variable,",") ' acá separas el arreglo por comas
y ahora recorres el arreglo:
for i=lbound(arreglo) to ubound(arreglo)
'antes de hacer algo, preguntas por el tipo de datos que viene en el arreglo
if arreglo(i)="tipoCom" then
'acá puedes poner de lleno la sentencia sql para insertar o puedes llamar a un método
'que lo haga desde una componente
else
if arreglo(i)="tipoCom" then
'lo mismo
else
if arreglo(i)="tipoRad" then
'lo mismo
else
if arreglo(i)="tipoChe" then
'lo mismo
else
if arreglo(i)="tipoMtr" then
'lo mismo
end if
end if
end if
end if
next
prueba y comenta.... |