Ver Mensaje Individual
  #4  
Antiguo 14-02-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Vamos por partes como dijo jack

El error que te da en esta linea
Código Delphi [-]
WinExec( PChar('Command.com / c ARJ A ' + fecha + '  *.gdb '), SW_SHOW );
seguramente es debido a que en windows XP no existe el fichero "Command.com", el interprete de comandos se llama "cmd.exe". Si sigues queriendo usarlo consulta primero su nombre en la variable de entorno COMSPEC, aunque no veo la necesidad de usarlo en este caso. Una instrucción como esta también serviría:
Código Delphi [-]
WinExec( PChar('C:\sistema\backup\ARJ A ' + fecha + '  *.gdb '), SW_SHOW );

Pero tienes razón, la instrucción WinExec esta condenada a desaparecer, solo se incluye para compatibilidad con aplicaciones antiguas. Así que mejor usar otra funciones como ShellExecute.

La razón porque no te funciona ShellExecute es porque en esta función el ejecutable y los parámetros se pasan por separado. Es decir, tendrías que hacer algo así:
Código Delphi [-]
fecha:='a co140207.arJ *.*';   Shellexecute(f_backup.handle,nil,'C:\sistema\backup\ARJ.exe',PChar(fecha),nil,SW_SHOW);

PD: me llamo seoane
Responder Con Cita