From: | Henry <hensa22(at)yahoo(dot)es> |
---|---|
To: | Paulina Quezada <paulina(dot)quezada(at)gmail(dot)com>, pgsql-es-ayuda(at)postgresql(dot)org |
Subject: | RE: Problemas con ADODB y Postgres |
Date: | 2007-03-03 05:04:54 |
Message-ID: | 623896.53707.qm@web30805.mail.mud.yahoo.com |
Views: | Whole Thread | Raw Message | Download mbox | Resend email |
Thread: | |
Lists: | pgsql-es-ayuda |
Paulina Quezada <paulina(dot)quezada(at)gmail(dot)com> escribió: Hola:
Tengo mi aplicación en visual basic 6.0 usando ADODB para interactuar con la base de datos, el problema es que mis consultas en postgres usando el PGadmin tienen un tiempo de respuesta satisfactorio o casi inmediato, pero al abrir el recordset se demora varios segundos.
dim rec_um as adodb.recordset
s_sql = "select ttc.color_ttc from abastecimientomp.temporada_cosecha as tc," _
& "abastecimientomp.tipo_temporada_cosecha As ttc where tc.id_ins = " _
& s_insumo + " and extract(month from timestamp '" _
& s_fechaActual + "') between tc.mes_ini_tco and mes_fin_tco and " _
& "tc.id_ttc = ttc.id_ttc;"
rec_um.Open s_sql, ConexionBD, adOpenStatic, adLockOptimistic
(esta sentencia es la que se demora varios segundos, y no es solo con esa sentencia SQL sino con todas)
EStoy usando Postgres 8.2.1, y la cadena de conexión que uso es esta:
s_cadenaConexion = "Provider=MSDASQL.1;Persist Security Info=False;" _
& "User ID=" + s_usuario + ";" _
& "Extended Properties='DSN=PostgreSQL;" _
& "DATABASE=" + s_base + ";" _
& "SERVER=" + s_servidor + ";PORT=5432;" _
& "UID=" + s_usuario + ";" _
& "PWD=" + s_password + ";" _
& "ReadOnly=0;Protocol=6.4;FakeOidIndex=0;ShowOidColumn=0;" _
& "RowVersioning=0;ShowSystemTables=0;ConnSettings=;Fetch=100;" _
& "Socket=8192;UnknownSizes=0;MaxVarcharSize=254;" _
& "MaxLongVarcharSize=8190;Debug=0;CommLog=0;Optimizer=1;" _
& "Ksqo=1;UseDeclareFetch=0;TextAsLongVarchar=1;" _
& "UnknownsAsLongVarchar=0;BoolsAsChar=1;Parse=0;" _
& "CancelAsFreeStmt=0;ExtraSysTablePrefixes=dd_;;" _
& "LFConversion=1;UpdatableCursors=0;DisallowPremature=0;" _
& "TrueIsMinus1=0;BI=0;ByteaAsLongVarBinary=0;UseServerSidePrepare=0;" _
& "LowerCaseIdentifier=0'"
If (ConexionBD.State = adStateOpen) Then
ConexionBD.Close
ConexionBD.ConnectionString = s_cadenaConexion
ConexionBD.Open
Else
ConexionBD.ConnectionString = s_cadenaConexion
ConexionBD.Open
End If
Alguien me podría ayudar en si existe algún problema en la conexión o por qué se puede producir el problema?
Muchas gracias!
Paulina Q.
si vas a usar tu consulta para solo lectura, en vez de usar PGODBC usa PGOLEDB version 1.0.0.19 porque la 1.0.0.20 es muy lenta.
---------------------------------
LLama Gratis a cualquier PC del Mundo.
Llamadas a fijos y móviles desde 1 céntimo por minuto.
http://es.voice.yahoo.com
From | Date | Subject | |
---|---|---|---|
Next Message | Leonel Nunez | 2007-03-03 14:44:46 | Re: validacion de usuarios |
Previous Message | Gabriel Colina | 2007-03-03 00:22:52 | Re: Problemas con ADODB y Postgres |