[Pgsql-ayuda] idle in transaction... Thnks Jorge Zurita
Mauricio E. Pastorini Torres
m_pastorini@elgolfo.cl
Mon, 27 Oct 2003 19:59:57 -0300 (CLST)
Hola Silvia... le verdad es que no lo tengo muy claro porque según la
literatura los timeout son los tiempos de espera en segundos para realizar
la conexión o ejecutar el comando antes de marcar un error...
pienso no esta fácil el tema... o si?
> .ConnectionTimeout = 10
>> .CursorLocation = adUseClient
>> .Open
>> End With
>> conex.CommandTimeout = 20
>> end function
>
>
> No le estas diciendo se que desconecte cada 10 minutos y se vuelva a
> conectar cada 20?
> ----- Original Message -----
> From: "Mauricio E. Pastorini Torres" <m_pastorini@elgolfo.cl>
> To: <pgsql-ayuda@tlali.iztacala.unam.mx>
> Sent: Monday, October 27, 2003 3:08 PM
> Subject: [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.
>> _______________________________________________
>> Pgsql-ayuda mailing list
>> Pgsql-ayuda@tlali.iztacala.unam.mx
>> http://tlali.iztacala.unam.mx/mailman/listinfo/pgsql-ayuda
>
>
--
Mauricio Pastorini T.
WebMaster El Golfo S.A.
Fono : (56)41-269462, Fax: (56)41-584482
Celular: 09-9997439
ICQ : 35877860
Http://www.elgolfo.cl