Ver Mensaje Individual
  #4  
Antiguo 30-06-2004
Bagy Bagy is offline
Registrado
 
Registrado: jun 2004
Posts: 9
Reputación: 0
Bagy Va por buen camino

TYPE
crRepPagPlaz: TCrpe; //
.....
dentro de un procedimiento el siguiente codigo:

crRepPagPlaz := tCRPE.Create(NIL);
TRY
crRepPagPlaz.ReportName:=ExtractFileDir(Application.ExeName) + '\Pagplaz2.rpt'; // RUTA DEL REPORTE
crRepPagPlaz.Connect.ServerName:='BD'; //SERVIDOR
crRepPagPlaz.Connect.UserID :='PRUEBA'; //USUARIO
crRepPagPlaz.Connect.Password :='PRUEBA'; //PASSWORD


crRepPagPlaz.Output := toWindow;
crRepPagPlaz.Execute;
FINALLY if crRepPagPlaz <> nil then crRepPagPlaz.free;
Responder Con Cita