| From: | Alejandro Carrillo <fasterzip(at)yahoo(dot)es> |
|---|---|
| To: | "jayala(at)cromotex(dot)com(dot)pe" <jayala(at)cromotex(dot)com(dot)pe> |
| Cc: | "pgsql-es-ayuda(at)postgresql(dot)org" <pgsql-es-ayuda(at)postgresql(dot)org> |
| Subject: | Re: Refcursor + vb6 + oledb |
| Date: | 2011-10-03 11:14:53 |
| Message-ID: | 1317640493.1692.YahooMailNeo@web27402.mail.ukl.yahoo.com |
| Views: | Whole Thread | Raw Message | Download mbox | Resend email |
| Thread: | |
| Lists: | pgsql-es-ayuda |
Buenos dias,
Disculpe por reabrir este mensaje pero tengo la solucion a lo que usted necesita. Veamos su ejemplo
Conn.BeginTrans
> Cmd.ActiveConnection = Conn
> Cmd.CommandText = "select
> kardexf('017033','01/04/2009','30/04/2009','data');FETCH ALL IN data;"
> Set Rst = Cmd.Execute
Rst.NextRecordset 'falta esto
> Do Until Rst.EOF
> Me.List1.AddItem Rst.Fields(0) 'Rst!Movimiento
> Rst.MoveNext
> Loop
> Rst.Close
> Conn.CommitTrans
y ya eso es todo. Con eso muestra el resultado del fetch, es decir muestra los datos del cursor
| From | Date | Subject | |
|---|---|---|---|
| Next Message | Alejandro Carrillo | 2011-10-03 14:06:57 | Ayuda al obtener cursor de una funcion |
| Previous Message | Manuel Fernando Aller | 2011-10-03 10:53:21 | Re: responder problema |