robeyza
06 de Junio del 2003

He agregado un Command1 a un Dataenvironment1.
El Command1 lo he configurado para q ejecute una sentencia sql con un parametro en la sentencia where "...where codubic=miparam".
Desde un Form1 llamo a un Datareport1 q esta enlazado al Command1. Desde el mismo Form1 tengo Text1 donde ingreso el valor q necesita el parametro. Como codifico para enviar el parametro

Agradecere su ayuda

angeles
06 de Junio del 2003

Antes de usarlo:
If DataEnvironment1.rsnombredelcommand.State= adStateOpen then
DataEnvironment1.rsnombredelcommand.close
ens if
DataEnvironment1.Commands("nombredelcomando").commandtext= "Select * from tabla where codubic='" & text1.text & "'"
datareport1.show

Espero que te sirva