Top-Themen

Aktuelle Themen (A bis Z)

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

Frage Entwicklung VB for Applications

GELÖST

VBS: Unterordner gleichen Namens verschieben

Mitglied: Gurkenhobel

Gurkenhobel (Level 1) - Jetzt verbinden

11.02.2015 um 13:16 Uhr, 582 Aufrufe, 3 Kommentare, 1 Danke

Hallo Gemeinde,

Ich habe auf einem Laufwerk 12 Unterordner (Januar ... Dezember) die wiederum jeweils sieben Unterordner (Montag ... Sonntag) umfassen - also insgesamt 12 + (12*7) = 96 Unterordner.
Wie kann ich die Unterordner (mit Tagesnamen) gleichen Namens "zusammenschieben", d.h. der Inhalt des Unterordners "Januar\Montag" wird mit den restlichen 11 Montags-Ordnern in den (neu zu errichtenden) Unterordner "Montag" verschoben, die Inhalte aller zwölf "Dienstags"-Unterordner in den neuen Unterordner "Dienstag" usw. Am Ende müssten dann 12 leere Monats-Unterordner und sieben gefüllte Tages-Ordner bestehen.

Wie kann ich das in VBS bewerkstelligen ?
Mitglied: emeriks
11.02.2015 um 13:42 Uhr
Hi,
Wie kann ich das in VBS bewerkstelligen ?
Ja sicher.

Wenn das ne einmalige Sache ist, dann geht das aber auch ganz einfach in der CMD machen
01.
for %m in (Januar Februar März ....) do for %d in (Montag Dienstag ...) do move /Y X:\%m\%d X:\Ziel\%d
Das sollte doch gehen?

Da musst Du natürlich noch die Monate und Wochentage vervollständigen, is klar. Und X:\ sowie X:\Ziel musst Du auch an Deine Gegebenheiten anpassen.
Wenn das in eine Batch soll, dann müssen %m und %d als %%m bzw. %%d geschrieben werden.

E.
Bitte warten ..
Mitglied: 114757
LÖSUNG 11.02.2015, aktualisiert 12.02.2015
01.
Const FOLDER_YEARS = "D:\Temp" 
02.
Const FOLDER_DAYS_TARGET = "D:\Tagezusammengefasst" 
03.
Set fso = CreateObject("Scripting.Filesystemobject") 
04.
For Each dayfolder In fso.GetFolder(FOLDER_YEARS).SubFolders 
05.
	For Each f In dayfolder.SubFolders 
06.
		f.Copy FOLDER_DAYS_TARGET & "\",True 
07.
		f.Delete True 
08.
	Next 
09.
Next
Gruß jodel32
Bitte warten ..
Mitglied: Gurkenhobel
11.02.2015, aktualisiert 12.02.2015
@emeriks
Danke, aber es kommt immer die Fehlermeldung kann syntaktisch an dieser Stelle nicht verarbeitet werden., unabhängig davon, ob ich den Pfad (>8 Zeichen pro Ordner) in Hochommas setze oder %d oder %%d verwende.
Außerdem
Wenn das ne einmalige Sache ist, dann geht das aber auch ganz einfach in der CMD machen
, ist es keine einmalige Sache und deswegen dachte ich eher an VBS.

@114757
Das Script läuft wie gewollt und "schiebt" auch andere Ordner zusammen, die den gleichen Namen tragen, z.B. den Inhalt von Landschaft\Wald und Australien\Wald nach Wald. Danke !
Bitte warten ..
Ähnliche Inhalte
VB for Applications
VBS oder Batch um eine Datei in Unterordner zu verschieben
Frage von MrRoyalVB for Applications1 Kommentar

Hallo zusammen, ich bin neu hier und kenne mich leider im Bereich VBS und Batch nicht so gut aus. ...

Batch & Shell
Dateien gleich Ordnernamen umbenennen (auch in allen Unterordnern)
gelöst Frage von OOmatrixOOBatch & Shell14 Kommentare

Hallo. Ich möchte in einem speziellen Ordner in ALLEN Unterordnern ALLE Dateien nach ihren Ordnernamen umbenennen. Ich habe mir ...

Batch & Shell
Per Batch Dateien aus Unterordner verschieben
gelöst Frage von ministaBatch & Shell10 Kommentare

Hallo Zusammen Ich habe folgende Struktur: Ich möchte nun dass alle Dateien aus dem Ordner B und deren Subordner ...

Batch & Shell
Batch Datei zum verschieben von Dateien aus Unterordnern ?
gelöst Frage von Ghostrider1911Batch & Shell10 Kommentare

Hallo, ich bräuchte eine Batch Datei die Dateien aus Unterordnern verschiebt. Also ich habe folgende Verzeichniss Struktur: Z:\Dateien\Ordner1\M1\ Z:\Dateien\Ordnärx\M1\ ...

Neue Wissensbeiträge
CPU, RAM, Mainboards

Meltdown und Spectre: Intel zieht Microcode-Updates für Prozessoren zurück

Information von keine-ahnung vor 38 MinutenCPU, RAM, Mainboards

Moin, extrem lutztig. Nur gut, dass ich noch nicht beim Probanden-Bingo mitgemacht habe :-) LG, Thomas

Router & Routing

PfSense als Addon auf QNAP

Information von magicteddy vor 14 StundenRouter & Routing3 Kommentare

Moin, für Spielereien eine ganz nette Idee aber ich fürchte das soetwas auch als echte Firewall genutzt wird: In ...

Datenschutz

Teamviewer kommt für IoT-Geräte wie den Raspberry Pi

Information von magicteddy vor 20 StundenDatenschutz1 Kommentar

Moin, jetzt werden IoT Geräte endgültig zur Wanze? Anscheinend kann man auf einem Dashboard seine Geräte visualisieren Ich stelle ...

Microsoft

Letzte Updates für Win10 und Server2016 müssen bei Bedarf über den Update catalogue in den WSUS importiert werden!

Tipp von DerWoWusste vor 1 TagMicrosoft1 Kommentar

automatisch kommt da nichts an im WSUS und auch nicht im SCCM. Siehe Hinweise zum Bezug der jeweils neuesten ...

Heiß diskutierte Inhalte
Netzwerkmanagement
Preis für Wartungsvertrag ok?
gelöst Frage von a-za-zNetzwerkmanagement22 Kommentare

Hallo! Mal ne Frage, weil ich mich mit dem akzeptablen Preis für einen Reaktionszeitvertrag nicht auskenne. Meine Firma hat ...

Windows Netzwerk
Ist ein Portforwarding auf einen PC ohne lauschendes Programm ein (großes) Sicherheitsproblem?
Frage von PluwimWindows Netzwerk13 Kommentare

Hallo zusammen, zur Fernwartung eines Rechners an einem anderen Ort nutze ich VNC. Da dieser Rechner einfach nur eine ...

Multimedia & Zubehör
Welches Tablet für die Verkäufer?
Frage von Hendrik2586Multimedia & Zubehör11 Kommentare

Guten Morgen meine Lieben, vielleicht könnt ihr mir ja helfen. Es geht um unsere Außendienstmitarbeiter /Verkäufer. Sie sollen demnächst ...

Windows Server
Terminal Server 2016 erkennt Berechtigungen nicht
gelöst Frage von Thomas2Windows Server10 Kommentare

Hallo Administratoren, folgendes Problem stellt sich dar: Es gibt zwei Windows Server 2016, die als Terminal Server fungieren. Jetzt ...