Go To Post

Die funktionen hab zu meinen VB zeiten benutzt.
Das wäre Datei verschieben

Imports System.IO
 
FileIO.FileSystem.MoveFile("DATEIPFAD", "AUSGABEPFAD")

Das wäre Ordner verschieben

Imports System.IO
 
FileIO.FileSystem.MoveDirectory("ORDNERPFAD", "AUSGABEPFAD")

Würde die jeweiligen funktionen aber mit einer try-catch abfrage "verpacken"

EDIT: Hab vergessen das es für die spezielle Ordner spezielle Codes gibt:

Dim pfad As String = Environment.GetFolderPath(Environment.SpecialFolder.DERGEWÜNSCHTEORDNER)

Visual Basic Express sollte dir eh anzeigen was du einsetzen kannst, bei Visual Studio ist es zuminderst so.

Und zu deiner Ersetzen funktion, würde ich es so machen:

Try 'Wenn Datei von nicht exestiert
     FileIO.FileSystem.MoveFile("DATEIPFAD", "AUSGABEPFAD")
Catch ex As Exception 'Wenn Datei schon exestiert
     FileIO.FileSystem.DeleteFile("PFAD", 0, FileIO.RecycleOption.DeletePermanently)
     FileIO.FileSystem.MoveFile("DATEIPFAD", "AUSGABEPFAD")
End Try

Mfg,
hukditur

Go To Post

Habe es damals immer so genutzt und hatte nie Probleme damit. Ist vielleicht nicht die Beste Variante, aber die Beste ist auch nicht die einzige
Außerdem arbeite ich nicht mehr mit VB, daher habe ich einfach in meinen alten Projekten nachgesehen und dies gefunden.

Go To Post

Willst du unbedingt den Benutzernamen wissen? Wenn nicht, ich geh mal davon aus, und du auf den Desktop zugreifen willst, nimm einfach:

Dim pfad As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
Dim pfad2 As String = pfad + "\verschiebmich.exe" 'Falls es so nicht klappt dan so:
Dim pfad2 As String = pfad + "verschiebmich.exe"
 

Mfg,
hukditur