fs.filecopy überschreiben?

hoT

Level-1
Beiträge
109
Reaktionspunkte
1
Zuviel Werbung?
-> Hier kostenlos registrieren
Guten Tag,

besteht die Möglichkeit auf einem Panel unter WinCE 3.0 eine Datei über das Netzwerk auf einen PC zu kopieren und dir alte Datei zu überschreiben?

Hab schon alle Kombinationen durch oder geht es damit nicht?

Set fs = CreateObject("filectl.filesystem")
fs.filecopy "Datei 1", "Datei2" ,1

mfg hoT
 
Die Methode FileCopy hat nur 2 Parameter (PathName, NewPathName), keinen Modus-Parameter.
Sie erzeugt einen Runtime-Error, wenn die Zieldatei schon existiert. Das kann man nicht ändern, aber umgehen:
Code:
[COLOR="Blue"]Set[/COLOR] fso = [COLOR="blue"]CreateObject[/COLOR]([COLOR="darkred"]"FileCtl.FileSystem"[/COLOR])
[COLOR="Green"]'FileCopy erzeugt Runtime-Error, wenn DestFile schon existiert
'deshalb DestFile vorher löschen[/COLOR]
[COLOR="blue"]If[/COLOR] fso.Dir(DestFile) <> [COLOR="DarkRed"]""[/COLOR] [COLOR="blue"]Then[/COLOR] fso.Kill DestFile
fso.FileCopy SourceFile, DestFile
Falls die Zieldatei schreibgeschützt oder geöffnet ist, dann erzeugt Kill einen Runtime-Error.

Harald
 
Zurück
Oben