Mensaje enviado por "Barajas, Arturo" <abarajas@ppg.com> el 14/01/2003
Di con la solución, por si a alguien le interesa. Es simplemente crear un recordset a partir del "Execute" del SP:
Dim rs as New ADODB.Recordset
With deTickets
.Commands("cmdCodigo").Parameters("txt_codigo") = Me.dcbCodigos
Set rs = .Commands("cmdCodigo").Execute
End With
lbl1.Caption = rs("Campo1")
rs.Close
Set rs = Nothing
Ojalá a alguien le sirva.
--
Un gran saludo/Big regards...
Arturo Barajas, Tech Support Supervisor
IT/Systems PPG MX (SJDR)
(427) 271-9918
> -----Original Message-----
> From: Barajas, Arturo [mailto:abarajas@ppg.com]
> Sent: Martes, 14 de Enero de 2003 11:07 a.m.
> To: Lista VB (E-mail)
> Subject: (VB-ESP) Duda con DataEnvironment
> Importance: High
>
>
> Saludos de nuevo.
>
> Tengo un DataEnvironment definido con un Stored Procedure al
> que le paso un parámetro. Eso ya me funciona bien. Ahora,
> ¿cómo hago para leer los datos?
>
> Definí 4 labels en mi formulario, las cuales están ligadas
> (DataSource, DataMember, DataField) a los campos que me
> regresa el SP, pero al ejecutar el siguiente código
> simplemente no me hace ningún cambio. ¿Qué me falta? A decir
> verdad, sigo novato con esto del ADO y los DataEnvironments.
>
> deTickets.Commands("cmdCodigo").Parameters("txt_codigo") =
> Me.dcbCodigos
> deTickets.Commands("cmdCodigo").Execute
>
> ¿Me falta algún "open" o algo así? ¡Me URGE!
> --
> Un gran saludo/Big regards...
> Arturo Barajas, Tech Support Supervisor
> IT/Systems PPG MX (SJDR)
> (427) 271-9918
>