-> Hier kostenlos registrieren
Hallo zusammen,
ich habe das folgende Skript nur auf meine Lokale Rechner getestet, aber leider es hat nicht richtig geklappt.
Beim kopiern bekomme ich als Meldung : error #76 der Pfad wurde nicht gefunden.
was mach ich da falsch?
ich habe das folgende Skript nur auf meine Lokale Rechner getestet, aber leider es hat nicht richtig geklappt.
Beim kopiern bekomme ich als Meldung : error #76 der Pfad wurde nicht gefunden.
was mach ich da falsch?
Code:
'Das Script kopiert die gespeicherten Archive auf den PC
Dim fs,fso
On Error Resume Next
Set fso = CreateObject("Scripting.FileSystemObject")
If Err.Number<> 0 Then
ShowSystemAlarm "error #" & CStr(Err.Number) & " " & Err.Description
Err.Clear
Exit Sub
End If
fso.CopyFile "C:\CSV\Alfa.csv","[URL="file://\\C:\Ordner1"]\\C:\Ordner1[/URL]"
If Err.Number<> 0 Then
ShowSystemAlarm "error #" & CStr(Err.Number) & " " & Err.Description
Err.Clear
Exit Sub
End If
Set fs=Nothing
ShowSystemAlarm "Done"