<html><div style='background-color:'><DIV class=RTE>Hola amigos postgreanos estuve haciendo unas pruebas con PGOLEDB pero me sale este error<BR>ya que lo registre y nada cuando tiene que mostrar los datos en la grilla y este<BR>es el error que me sale pero en cambio via ODBC me muetra los datos espero que<BR>me ayuden amigos ahi les pongo mis dos conecciones y con el OLEDB no funciona.<BR>espero sus ayudas amigos.<BR>----------------------------------------------------------------------<BR>Error '7004' en tiempo de ejecusion</DIV>
<DIV class=RTE>El conjunto de Datos no admite marcadores<BR>-----------------------------------------------------------------------<BR>uso el PgOleDb-1.0.0.20.zip de la comunidad</DIV>
<DIV class=RTE>Private Sub Form_Load()<BR>Dim rs As New ADODB.Recordset<BR>Set rs = New ADODB.Recordset<BR>Dim cn As New ADODB.Connection<BR>'Set cn = New ADODB.Connection<BR>With cn<BR> .CursorLocation = adUseServer<BR> .Open ("Provider=PostgreSQL OLE DB Provider;Data Source=localhost;Location=rafa;User ID=postgres;Password=123456")<BR> '.Open ("Provider=MsDataShape.1;Persist Security Info=False;User ID=postgres;Extended
Properties=""DSN=PostgreSQL;DATABASE=rafa;SERVER=localhost;PORT=5432;SSLMODE=prefer;UID=postgres;PWD=123456;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 """)<BR> <BR>End With<BR>rs.Open "select * from ubigeo", cn<BR>Set grid.DataSource = rs<BR>End Sub</DIV>
<DIV class=RTE> </DIV>
<DIV class=RTE>Ruben Avila G.</DIV></div></html>