Jump to content

Datei von USB Stick auf Rechner automatisch kopieren


Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Empfohlene Beiträge

Geschrieben

Hallo zusammen,

 

ich möchte Dateien auf Rechnern mit einem Skript, welches durch die "Autorun.inf" auf einem USB Stick aufgerufen wird, verteilen.

Mein Problem ist, dass an den Rechnern der USB Stick mit unterschiedlichem Laufwerksbuchstaben erkannt wird.

Wenn ich mit WSH einen Copy Befehl erstelle schlägt dieser fehl, wenn ich keinen Laufwerksbuchstaben vor den Quellpfad setze.

Es sollen einzelne Dateien kopiert werden, keinen Ordner.

 

Folgendes Skript funktioniert nicht mit nicht angegebenem Laufwerksbuchstaben:

Set fs = CreateObject("Scripting.FileSystemObject")
Set f1 = fs.GetFile("\dateien\dateixy.txt")
f1.copy ("c:\")

 

Vielen Dank im Voraus für eure Hilfe

 

Gruß Wolle

Geschrieben

Vielleicht so in der Art?

strRunDir = WScript.ScriptFullName
strRunDir = Left(strRunDir,InStr(strRunDir,WScript.ScriptName)-2)

Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile strRunDir & "\dateien\dateixy.txt" , "C:\"

Geschrieben

Muss es unbedingt WSH sein?

Mit einer Batch wäre das eigentlich kein großes Problem.

Hier würde sich auch beispielsweise der Pfad der Batch über eine Variable ermitteln lassen. (Evtl. könnte man so auch die Variable als Aufrufvariable an WSH übergeben.)

 

Grüße

smileyman

Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Erstelle ein Benutzerkonto oder melde dich an, um zu kommentieren

Du musst ein Benutzerkonto haben, um einen Kommentar verfassen zu können

Benutzerkonto erstellen

Neues Benutzerkonto für unsere Community erstellen. Es ist einfach!

Neues Benutzerkonto erstellen

Anmelden

Du hast bereits ein Benutzerkonto? Melde dich hier an.

Jetzt anmelden
×
×
  • Neu erstellen...