Shell Befehl in Verbindung mit Xcopy ausführen

Steamy2010 · 13. Januar 2018, 10:25

Guten Morgen @ all, nach langer Pause habe ich wieder angefangen zu programmieren und stehe jetzt vor folgendem Problem:

Ich möchte eine Datei mittels Shell in einen noch nicht anderen Ordner kopieren.

VB.NET-Quellcode

Dim DatenSichern As Integer
DatenSichern = Shell("xcopy.exe C:\Users\Administrator\Documents\Outlook-Dateien\xxxxx.pst /y D:\OutlookMozillaSicherung")

Allerdings läuft das Programm durch ohne Fehlermeldung, aber es passiert nichts. Es wird kein Ordner angelegt und nichts kopiert.
Bin für jeden Tip dankbar!!

SpaceyX · 13. Januar 2018, 10:38

Hi,

nutze doch die im Framework integrierten Funktionen zum kopieren von Dateien.

System.IO.File.Copy("source", "destination")

RodFromGermany · 13. Januar 2018, 10:44

@SpaceyX "xcopy" kopiert ganze Verzeichnisse.
Da müsste der Einzeiler durch eine komplexere Prozedur ersetzt werden.
@Steamy2010 Funktioniert dieser Befehl in einer Batch-Datei?

SpaceyX · 13. Januar 2018, 10:45

Sieht aber so aus, als wolle er nur eine Datei kopieren oder täusche ich mich da?

Steamy2010 · 13. Januar 2018, 10:56

Danke für Deine rasche Antwort!!
Nur allerdings muss der Ordner vorher exestieren, was mache ich wenn er nicht exestiert und angelegt werden soll?

RodFromGermany · 13. Januar 2018, 10:57

@SpaceyX Jou, hab ich ganz übersehen. :whistling:

@Steamy2010 Was ganz genau soll da wohin kopiert werden?
====

VB.NET-Quellcode

IO.Directory.CreateDirectory("D:\OutlookMozillaSicherung")

Das funktioniert auch, wenn das Verzeichnis bereits besteht.

Steamy2010 · 13. Januar 2018, 10:58

@RodFromGermany : Ja in einer Batch funzt es

RodFromGermany · 13. Januar 2018, 11:02

@Steamy2010 Nach den diversen Einwürfen:
Was ist jetzt das Problem?

RodFromGermany schrieb:

Was ganz genau soll da wohin kopiert werden?

Steamy2010 · 13. Januar 2018, 11:06

Ich möchte die .pst-Datei von Laufwerk C in den Ordner OutlookMozillaSicherung auf Laufwerk D kopieren. Sollte der Ordner nicht exestieren, soll er erstellt werden. Ist diese Datei in dem Ordner schon vorhanden, soll sie ohne Bestätigung überschrieben werden.

RodFromGermany · 13. Januar 2018, 11:20

@Steamy2010 So was:

VB.NET-Quellcode

Dim fi = New IO.FileInfo("C:\Users\Administrator\Documents\Outlook-Dateien\xxxxx.pst")
Dim target = "D:\OutlookMozillaSicherung"
IO.Directory.CreateDirectory(target)
If fi.Exists Then
fi.CopyTo(target, True)
End If

Steamy2010 · 13. Januar 2018, 11:52

Danke für die Antwort @ RodFromGermany,

jedoch bekomme ich die Fehlermeldung in Zeile 5 = Die Zieldatei ist keine Datei sondern ein Verzeichnis

RodFromGermany · 13. Januar 2018, 12:20

@Steamy2010 Öffne den Explorer und sieh Dir an, was da im Laufwerk D:\ als OutlookMozillaSicherung angezeigt wird.
Wenn das eine Datei sein sollte, benene sie um oder lösche sie.

Steamy2010 · 13. Januar 2018, 13:25

So funktioniert es:

VB.NET-Quellcode

Dim PstDatei = New IO.FileInfo("C:\Users\Administrator\Documents\Outlook-Dateien\xxx.pst")
Dim Zielverzeichnis = "D:\OutlookMozillaSicherung"
IO.Directory.CreateDirectory(Zielverzeichnis)
If PstDatei.Exists Then
PstDatei.CopyTo("D:\OutlookMozillaSicherung\xxx", True)
End If

Shell Befehl in Verbindung mit Xcopy ausführen

Shell Befehl in Verbindung mit Xcopy ausführen

VB.NET-Quellcode

VB.NET-Quellcode

RodFromGermany schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

Benutzer online 1

Ähnliche Themen

3 Benutzer haben hier geschrieben