Problema con Update

19/02/2004 - 15:49 por Srenau | Informe spam
Uso SQL Server y ASP, tengo un roblema al actualizar una
tabla, si actualizo 5 campos no hay problema, pero si
actualizo uno solo se me queda bloqueado.

El codigo:


Set registros = CreateObject("ADODB.Recordset")
registros.CursorType = adOpenStatic
registros.LockType = adLockOptimistic

SQL="Select * from TB_OFICINAS WHERE proveedor_cl='" &
proveedor_cl & "' and destino_cl='" & destino_cl & "'"
registros.Open sql, conexion_bd

registros("informacion_en")="informacion_en"
registros("comments_en")="comentarios_en"
registros("informacion_de")="informacion_de"
registros("comments_de")="comentarios_de"
registros("notas")="notas"
registros.Update
registros.Close()
set registros=nothing

-
Los campos son ntext (16).

Ayuda.
 

Leer las respuestas

#1 Jhonny Vargas P.
19/02/2004 - 16:06 | Informe spam
Utiliza esto:

SQL = "Update TB_OFICINAS Set " & _
"informacion_en='informacion_en', " & _
"comments_en='comentarios_en', " & _
"informacion_de='informacion_de', " & _
"comments_de='comentarios_de' " & _
"WHERE proveedor_cl='" & proveedor_cl & "' and destino_cl='" &
destino_cl & "'"

conexion_bd.Execute SQL

Por otra parte si utilizas SQL Server, te recomendaría mirar los
procedimientos almacenados...

Saludos,
Jhonny Vargas P. [MS-MVP]
Santiago de Chile
http://www.mvp.cl


"Srenau" escribió en el mensaje
news:1278901c3f6f7$88389370$
Uso SQL Server y ASP, tengo un roblema al actualizar una
tabla, si actualizo 5 campos no hay problema, pero si
actualizo uno solo se me queda bloqueado.

El codigo:


Set registros = CreateObject("ADODB.Recordset")
registros.CursorType = adOpenStatic
registros.LockType = adLockOptimistic

SQL="Select * from TB_OFICINAS WHERE proveedor_cl='" &
proveedor_cl & "' and destino_cl='" & destino_cl & "'"
registros.Open sql, conexion_bd

registros("informacion_en")="informacion_en"
registros("comments_en")="comentarios_en"
registros("informacion_de")="informacion_de"
registros("comments_de")="comentarios_de"
registros("notas")="notas"
registros.Update
registros.Close()
set registros=nothing

-
Los campos son ntext (16).

Ayuda.

Preguntas similares