Actualizar varios registros a la vez desde una consulta dinamica

[Mulato]

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 ...

[Mulato]

Nuevamente saludos

Es muy dificil lo que estoy tratando de hacer ?, alguien me podria sugerir como hacerlo, en verdad me urge hallar una solución,

Alguien ha hecho lo mismo o algo similar...?

[Mulato]

Saludos colegas...

Gracias a la ayuda del colega bakanzipp pudimos hallar una solución al respecto, sucedia que al realizar el update el string le añadia espacios a la data, creo que es por la forma como esta configurada la celda en la BD informix, así que despues de realizar un response al sql...

antes:

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

despues:

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

Y listo ya se puede actualizar cualquier fila sin necesidad de chekbox (para este caso)...

nuevamente le agradezco a bakanzipp su ayuda por ayudarme a encontra la solución