C:\Temp\Oakley File-1.dat
C:\Temp\Oakley File-2.dat
COPY FILE FileOnRDPWorkstation.xxx TO "\\tsclient\C\Temp\FileOnLocalWorkstation.xxx"
lcMappe = gcTemp + 'MAB_TempPaste'
IF DIRECTORY((lcMappe), 1)
loFSO = CREATEOBJECT("Scripting.FileSystemObject")
loFSO.GetFolder(lcMappe).DELETE(.T.)
RELEASE loFSO
ENDIF
IF !DIRECTORY((lcMappe), 1)
MKDIR (lcMappe)
ENDIF
loShell = CREATEOBJECT("Shell.Application")
loNS = loShell.NameSpace(lcMappe)
FOR lnCount = 1 TO loNS.SELF.Verbs.COUNT
WITH loNS.SELF.Verbs.ITEM(lnCount)
lcVerb = ALLTRIM(UPPER(.NAME))
lcVerb = CHRTRAN(lcVerb, '&', '')
IF INLIST(lcVerb, 'PASTE', 'LIM INN')
.Doit()
ENDIF
ENDWITH
ENDFOR
For example:
Open in new window
points to the local workstation's C drive and its TEMP subdirectory.WIth that in mind your VFP application can do something like:
Open in new window
Good Luck