Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VBScript um alle Dateien aus verschiedenen Ordner in die andere Ordner zu verschieben

Frage Entwicklung VB for Applications

Mitglied: highpriest

highpriest (Level 1) - Jetzt verbinden

17.05.2012, aktualisiert 19.05.2012, 3363 Aufrufe, 7 Kommentare

Hallo VBS-Experten,

da ich wenig Ahnung von VBScripten habe, benötige ich Eure Hilfe.

Ich brauche einen VBScript, das folgende Aufgabe erfüllen soll:

In den Quellordnern "E:\test\test\a", "E:\test\test\b", "E:\test\test\c" liegen Dateien,
die (alle) in die Zielordner "E:\test\test1\1", "E:\test\test1\2", "E:\test\test1\3"
entsprechend verschoben werden sollen (also a zu 1, b zu 2, c zu 3).
Die Zielordner sind zu diesen Zeitpunkt sind immer leer, also die Abfrage ist nicht wirklich nötig.

Ich bedanke mich im Voraus!

highpriest
Mitglied: 60730
17.05.2012 um 01:22 Uhr
Moin,

Ich hoffedass ihr mir einen passenden Script schreiben könnt (die Pfade werde ich versuchen selber anzupassen).
  • ymmd schönen Vatertag

Gruß
Bitte warten ..
Mitglied: TsukiSan
17.05.2012 um 14:31 Uhr
/OT
Hi Timo,

ist dein Bier schon kalt? Wenn JA, dann schick doch mal von DEINEM Kühlschrank in MEINEN
und das ganze ohne Nachfrage Also immer schön auffüllen, egal zu welcher Zeit

Schönen Vatertag!

Tsuki
/<OT
Bitte warten ..
Mitglied: highpriest
17.05.2012 um 17:45 Uhr
@TimoBeil, @TsukiSan

Wie hilfreich!
Auch Euch wünsche ich einen schönen Vatertag!

@netzwerkknecht

Leider komme ich nicht weiter.
Trotzdem Danke für die Antwort.
Bitte warten ..
Mitglied: netzwerkknecht
17.05.2012 um 18:45 Uhr
Zitat von highpriest:
Leider komme ich nicht weiter.

Vielleicht hilft Dir eine deutschsprachige Darlegung zu Robocopy eher weiter: http://www.wintotal.de/artikel/artikel-2007/91.html

netzwerkknecht auf Windows Intune: http://bit.ly/wide12hp
Bitte warten ..
Mitglied: highpriest
19.05.2012, aktualisiert um 01:24 Uhr
Ich habe jetzt was gefunden, was auch die Dateien verschiebt:

Option Explicit
Dim fso, oFile, oFiles, oFolder
Dim sQuelle, sZiel

Set fso = CreateObject("Scripting.FileSystemObject")
Set oFolder = fso.GetFolder("E:\test\test\a\")
Set oFiles = oFolder.Files

sZiel = "E:\test\test1\1\"

For Each oFile In oFiles
sQuelle = fso.GetAbsolutePathName(oFile)
fso.MoveFile sQuelle, sZiel
Next
Wie kann ich Script jetz so anpassen, damit es mit drei verschiedenen Ordner funktioniert?
Bitte warten ..
Mitglied: highpriest
23.05.2012 um 21:15 Uhr
Hat sich erledigt.
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Ordner per Batch verschieben, Datei kopieren (2)

Frage von Shape.Shifter zum Thema Batch & Shell ...

Batch & Shell
Datei nach Erstellungsdatum verschieben (2)

Frage von Kugelschreiber1 zum Thema Batch & Shell ...

Neue Wissensbeiträge
Windows Server

Umstellung SHA 1 auf SHA 2 - Migration der CA von CSP auf KSP

Tipp von Badger zum Thema Windows Server ...

Windows 10

Quato DTP94 unter Windows 10 x64 installieren und verwenden

Anleitung von anteNope zum Thema Windows 10 ...

Windows 10

Win10 1703 und Nutzerkennwörter bei Ersteinrichtung - erstaunliche Erkenntnis

(15)

Erfahrungsbericht von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
CNC Maschinen verlieren Netzwerkverbindung (kurioser Fehler) (22)

Frage von NoHopeNoFear zum Thema LAN, WAN, Wireless ...

Drucker und Scanner
Erfahrungen mit Enterprise-Tintenstrahldruckern A4 und A3 (14)

Frage von User1000 zum Thema Drucker und Scanner ...

Webentwicklung
Aktuellen Mitarbeiter auf Homepage anzeigen (13)

Frage von alemanne21 zum Thema Webentwicklung ...