Ver Mensaje Individual
  #1 (permalink)  
Antiguo 25/11/2003, 14:59
Avatar de Mulato
Mulato
 
Fecha de Ingreso: diciembre-2001
Ubicación: Caracas
Mensajes: 158
Antigüedad: 23 años, 4 meses
Puntos: 0
Pregunta Actualizar varios registros a la vez desde una consulta dinamica

Saludos colegas...

Estoy tratando de actualizar varios registros traidos desde una consulta, en la misma el campo de telefono es un text field para introducir los nuevos valores, hasta aqui todo bien, cuando modifico el primer registro esta función me actualiza el primero, pero si modifico el segundo, tercero o cuarto solo actualiza el primero y no me arroja ningun error...

Aqui esta el ejemplo:

<%'Se declara una variable para almacenar el parametro de la forma

dim carnet, telefono, total,

carnet=Request.Form("carnet")
telefono= Request.Form("telf")
total = Request.Form("contador")

'Abre la conexion con la base de datos

Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "DSN=base_prueba"

'Se crea los arreglos

arr_carnet=Split(carnet,",")
arr_telf=Split(pbax,",")

'Se recoge el arreglo para actualizar

for i=LBound(arr_carnet) to UBound(arr_carnet)

sqltxt="update personal Set tele_ofi = '"& arr_telf(i) &"' where is_carnet = '"& arr_carnet(i) &"' "

set res = cnn.Execute(sqltxt)
next
%>

Tambien lo probe así

for i= 1 to total

y me lanza este error...

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A0009)
El subíndice está fuera del intervalo: 'i'
/sistemas/dirtelf/gtc_telf/gtc_actuali.asp, line 35


A ver, quien me ayuda a solucionar este rollo y se lo agradezco de antemano ...
__________________
Necesito aprender para compartir mi saber...