Hello!
How do I force the overlaying of an existing file? Currently a message pops up asking if it is OK to overlay, but I want it to assume that it is OK to do so.
THANKS!
CJ
Below is my code:
SET PATH TO F:\I\Test\, F:\B\TestlnTotal = ADIR(laTemp,[F:\I\Test\*.pdf])
IF lnTotal > 0
THIS.Enabled = .F.
CREA CURSOR TEXTFILES (filename C(254))
APPE FROM ARRAY laTemp
SCAN
xfile2 = ("F:\B\TRND\"
xfile3 = ("F:\I\TRND\*.pdf"
RUN /N &xfile
COPY FILE ALLT(TEXTFILES.filename) TO (xfile2) ;
+ ALLT(TEXTFILES.filename)
ENDSCAN
DELETE FILE(xfile3)
THIS.Enabled = .T.
ENDIF
How do I force the overlaying of an existing file? Currently a message pops up asking if it is OK to overlay, but I want it to assume that it is OK to do so.
THANKS!
CJ
Below is my code:
SET PATH TO F:\I\Test\, F:\B\TestlnTotal = ADIR(laTemp,[F:\I\Test\*.pdf])
IF lnTotal > 0
THIS.Enabled = .F.
CREA CURSOR TEXTFILES (filename C(254))
APPE FROM ARRAY laTemp
SCAN
xfile2 = ("F:\B\TRND\"
xfile3 = ("F:\I\TRND\*.pdf"
RUN /N &xfile
COPY FILE ALLT(TEXTFILES.filename) TO (xfile2) ;
+ ALLT(TEXTFILES.filename)
ENDSCAN
DELETE FILE(xfile3)
THIS.Enabled = .T.
ENDIF