Alaska Software Inc. - how RUNSHELL( xcopy ) ???
Username: Password:
AuthorTopic: how RUNSHELL( xcopy ) ???
AUGE_OHRhow RUNSHELL( xcopy ) ???
on Tue, 09 Aug 2005 20:08:46 +0200
hi,

i use XCOPY /S/E to copy hole Directory-Structure, but i can RUNshell it
in Xbase++ ?

cDisk := TRIM(SUBSTR(cLaufwerk,1,1)+TRIM(SUBSTR(cDirStart,2,250)))
cTest := "XCOPY.EXE *.NFO "+cDisk+" /S/E"
RUNSHELL( cTest )

... nothing happend. i also try to create a *.BAT and RUNshell it :

nHandle := FCreate( "TU2CRE.BAT", FC_NORMAL )
IF nHandle == -1
ELSE
   FWrite( nHandle, cTest )
   FClose( nHandle )
   SLEEP(100)
   MSGBOX(cTest)
   RUNSHELL("/C TU2CRE.BAT")
*   RUN("TU2CRE.BAT")
   SLEEP(100)
*   FErase("TU2CRE.BAT")
ENDIF

... but also nothing happend. it work if i run *.bat from DOS/CMD
can someone help please !

greetings by OHR
Jimmy
Joe Carrick Re: how RUNSHELL( xcopy ) ???
on Tue, 09 Aug 2005 11:38:16 -0700
Try:

cDisk := TRIM(SUBSTR(cLaufwerk,1,1)+TRIM(SUBSTR(cDirStart,2,250)))
cTest := "/C XCOPY.EXE *.NFO "+cDisk+" /S/E"
RUNSHELL( cTest,,,.T. )

That should work.

-Joe



AUGE_OHR wrote:
> hi,
> 
> i use XCOPY /S/E to copy hole Directory-Structure, but i can RUNshell it
> in Xbase++ ?
> 
> cDisk := TRIM(SUBSTR(cLaufwerk,1,1)+TRIM(SUBSTR(cDirStart,2,250)))
> cTest := "XCOPY.EXE *.NFO "+cDisk+" /S/E"
> RUNSHELL( cTest )
> 
> ... nothing happend. i also try to create a *.BAT and RUNshell it :
> 
> nHandle := FCreate( "TU2CRE.BAT", FC_NORMAL )
> IF nHandle == -1
> ELSE
>    FWrite( nHandle, cTest )
>    FClose( nHandle )
>    SLEEP(100)
>    MSGBOX(cTest)
>    RUNSHELL("/C TU2CRE.BAT")
> *   RUN("TU2CRE.BAT")
>    SLEEP(100)
> *   FErase("TU2CRE.BAT")
> ENDIF
> 
> ... but also nothing happend. it work if i run *.bat from DOS/CMD
> can someone help please !
> 
> greetings by OHR
> Jimmy
> 
>
AUGE_OHRRe: how RUNSHELL( xcopy ) ???
on Tue, 09 Aug 2005 22:15:31 +0200
hi,

> cDisk := TRIM(SUBSTR(cLaufwerk,1,1)+TRIM(SUBSTR(cDirStart,2,250)))
> cTest := "/C XCOPY.EXE *.NFO "+cDisk+" /S/E"
> RUNSHELL( cTest,,,.T. )
>
> That should work.

Indeed it work !

thx, greetings by OHR
Jimmy
AUGE_OHRRe: how RUNSHELL( xcopy ) ???
on Sat, 13 Aug 2005 03:06:08 +0200
hi,

> > cDisk := TRIM(SUBSTR(cLaufwerk,1,1)+TRIM(SUBSTR(cDirStart,2,250)))
> > cTest := "/C XCOPY.EXE *.NFO "+cDisk+" /S/E"
> > RUNSHELL( cTest,,,.T. )
> >
> > That should work.
>
> Indeed it work !

under Win98se

... but not under XP sp1 ...same *.BAT works under XP sp1

greetings by OHR
Jimmy