
Update y Select en la misma conexion
Publicado por Raul (1 intervención) el 10/10/2015 06:37:59
Saludos, mi problema es el siguiente.
Estoy intentando Actualizar un campo de una tabla en particular y luego en la misma conexion traerme los datos actualizados a un recordset, esto lo hago ya que la aplicacion trabaja mediante internet y necesito hacer estos dos procesos en una sola conexion!!.
este codigo me saca el error 3704, la operacion no esta permitida si el objeto esta cerrado.
Nota: Si cambio el orden y en vez de update primero, coloco el select y luego el update, funciona el codigo, pero me trae los datos al recordset antes de la actualizacion...
Alguna idea?
Aca el codigo:
Estoy intentando Actualizar un campo de una tabla en particular y luego en la misma conexion traerme los datos actualizados a un recordset, esto lo hago ya que la aplicacion trabaja mediante internet y necesito hacer estos dos procesos en una sola conexion!!.
este codigo me saca el error 3704, la operacion no esta permitida si el objeto esta cerrado.
Nota: Si cambio el orden y en vez de update primero, coloco el select y luego el update, funciona el codigo, pero me trae los datos al recordset antes de la actualizacion...
Alguna idea?
Aca el codigo:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim conn As ADODB.Connection
Dim results As ADODB.Recordset
Dim SqlStr As String
Set conn = New ADODB.Connection
conn.ConnectionTimeout = 1000
conn.Open ConnectionString
conn.CursorLocation = adUseClient
SqlStr = "UPDATE data.registro_detalle SET monto = 0; " & _
"SELECT * FROM data.registro_detalle "
Set results = conn.Execute(SqlStr, N)
MsgBox results.RecordCount & " " & results!monto
Valora esta pregunta


0