[Pgsql-ayuda] idle in transaction... Thnks Jorge Zurita

Jorge, gracias por contestar tan rápidamente y debo acotar que tu
acotación respecto a mi programa es correcta... quizas si puedes revisar
mi código te lo agradecería mucho.
Mira al cargar la forma llamo esta función que crea la conexión con el
postgres... :

Public conex As ADODB.Connection
Public Function creaconexion()
Dim connectString As String

Set conex = Nothing
Err.Clear
On Error GoTo 0

connectString = "SERVER=" + SERVER + ";" + _
"UID=" + USER + ";" + _
"PWD=" + Pwd + ";" + _
"DSN=" + Dsn + ";" + _
"DATABASE=" + Base + "; " + _
"LANGUAGE=us_english;" + _
"AutoTranslate=No"

Set conex = New ADODB.Connection

With conex
.ConnectionString = connectString
.ConnectionTimeout = 10
.CursorLocation = adUseClient
.Open
End With
conex.CommandTimeout = 20
end function

La que pienso no debería tener problema, sin embargo para ingresar datos
uso la siguiente función:...

Dim ADORs As ADODB.Recordset
Dim cmd_sql As ADODB.Command

conex.BeginTrans
Set cmd_sql = New ADODB.Command
With cmd_sql
Set .ActiveConnection = conex
.CommandText = consulta ' insert into tabla values....
.CommandType = adCmdText
End With
On Error GoTo Err_Execute
Set ADORs = New ADODB.Recordset
'Resume Next
Set ADORs = cmd_sql.Execute(afectadas)
conex.CommitTrans

puede haber algún error por este lado?????

te agradecería que me dieras tu opinion...

Mauricio.