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, 3337 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
VB for Applications
gelöst Mehrere CSV Dateien aus verschiedenen Ordner einlesen via VBA (12)

Frage von mtufangil zum Thema VB for Applications ...

Batch & Shell
gelöst Dateien in Ordner verschiebenm abhängig vom Jahr des Änderungsdatums (11)

Frage von freakonaleash zum Thema Batch & Shell ...

Windows 7
Dateien und Ordner vernünftig organisieren (5)

Frage von blackhawk17 zum Thema Windows 7 ...

Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(8)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Heiß diskutierte Inhalte