02/06/2006, 06:13
|
| | | Fecha de Ingreso: julio-2003
Mensajes: 70
Antigüedad: 21 años, 9 meses Puntos: 0 | |
| intente esto
Dim abonado(), I
I = 0
For Each Valor In Request.Form("abonado")
Redim Preserve abonado(I)
abonado(I) = Valor
I = I + 1
Next
oConn.execute "INSERT INTO servicios_"&nmes&"(abonado,servicio,usuario,puntod eventa,fecha,hora,destino,estado) VALUES('"&valor(I)&"','"&servicio&"','"&usuario&"' ,'"&puntodeventa&"','"&Date()&"','"&Time()&"','"&d estino&"','"&estado&"')"
pero el error que sale es No coinciden los tipos: 'Valor'
__________________
NormaB |