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
Kommentar vom Moderator Biber am 31.03.2010 um 16:24:25 Uhr
Irgendwie habe ich den Eindruck, einige Fragesteller versuchen gewissen running gag countern weiträumig aus dem Wege zu gehen, hmm?
Is' jezz' nur so'n Verdacht....
GELÖST

Ordnername ist gleich Dateiname renamer

Frage Entwicklung Batch & Shell

Mitglied: timlagezz

timlagezz (Level 1) - Jetzt verbinden

31.03.2010, aktualisiert 16:24 Uhr, 6091 Aufrufe, 3 Kommentare

brauche hilfe beim erstellen einer bat

hallo leider kenn ich mich mit den bat befehlen nicht so aus. ich brauche aber eine bat da es sonst sehr lange dauern würde, alles per hand umzuändern

Situation:

ich habe einen ordner in denen ca 100 ordner sind,
in jedem dieser 100 ordnern befindet sich eine datei.
und genau diese datei soll den namen des ordners (in dem sie liegt) erhalten.

(ich hoffe man versteht was ich brauch?)

Bsp.:

Ordnerxy\001\abc.bmp
Ordnerxy\002\def.bmp
Ordnerxy\003\ghi.bmp

wird zu:

Ordnerxy\001\001.bmp
Ordnerxy\002\002.bmp
Ordnerxy\003\003.bmp


sowas müsste doch mit einer bat datei zu machen sein?
ich habe schon mehrere rename tools probiert aber keinen erfolg gehabt.
ich hoffe mir kann jemand helfen
Mitglied: bastla
31.03.2010 um 14:51 Uhr
Hallo timlagezz und willkommen im Forum!

Wenn es tatsächlich in jedem Ordner genau eine Datei gibt, dann etwa so:
for /d %i in ("D:\Ordnerxy\*.*") do @for %a in ("%i\*.bmp") do @echo ren "%~fa" "%~nxi%~xa"
Die Zeile ist zum Einsatz direkt im CMD-Fenster und als Test gedacht, da - solange das "echo" vor dem "ren" steht - nur der Befehl für das Umbenennen angezeigt wird.

Grüße
bastla
Bitte warten ..
Mitglied: Edi.Pfisterer
31.03.2010 um 15:21 Uhr
Hallo timlagezz und auch Willkommen von mir

Hier noch die Entsprechung in vbs... (sollte auch funktionieren, wenn mehrere Files in den Ordnern sind...)
(falls das mal jemand sucht...)

01.
woissndes = "c:\Ordnerxy" 
02.
neuesformat = ".bmp" 
03.
Set objFSO = CreateObject("Scripting.FileSystemObject") 
04.
Set objFolder = objFSO.GetFolder(woissndes) 
05.
Set colSubfolders = objFolder.Subfolders 
06.
For Each objSubfolder in colSubfolders 
07.
 '   Wscript.Echo objSubfolder.Name 
08.
    zaehler = -1 
09.
    For Each File in objSubfolder.Files 
10.
            if objSubfolder.Files.Count = 1 then 
11.
               zusatz = "" 
12.
            else 
13.
                zaehler = zaehler+1 
14.
                zusatz = "_" & zaehler 
15.
            end if 
16.
          '   Wscript.Echo File.Name 
17.
            quelle = woissndes & "\" & objSubfolder.Name & "\" 
18.
            objFSO.MoveFile quelle & File.Name, quelle & objSubfolder.Name & zusatz & neuesformat 
19.
            filezaehler = filezaehler+1 
20.
    Next 
21.
ordnerzaehler = ordnerzaehler+1 
22.
Next 
23.
Wscript.Echo filezaehler & " Dateien in " & ordnerzaehler & " Ordnern umbenannt, Honey!"
btw: Du bist knapp am Wort (jetzt schreib ichs) UMBENENNEN oder noch besser UMBENNEN vorbeigeschrammt
aber bei dieser Auflage sollte man einen entsprechenden Eintrag im Index nicht ungenützt verstreichen lassen...
@Biber: auf gehts!

lg
Edi,
der Mann, der Ferien sehr zu schätzen weiss UND sich über die entsprechenden Wünsche in der letzten Woche von Bastla noch mehr freute Danke!
Bitte warten ..
Mitglied: timlagezz
31.03.2010 um 15:53 Uhr
hat beides super funktioniert vielen dank !!
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Ordnernamen aus Dateinamen erstellen (1)

Frage von Dr.Byte zum Thema Batch & Shell ...

Batch & Shell
gelöst Dateiname entsprechend einem um x-Ebenen übergeordeten Ordnernamen umbenennen (3)

Frage von Booster07 zum Thema Batch & Shell ...

Windows 10
gelöst Script rename (5)

Frage von Florian86 zum Thema Windows 10 ...

Batch & Shell
gelöst Dateiname über Batch ändern (6)

Frage von c64b311ee9 zum Thema Batch & Shell ...

Neue Wissensbeiträge
Entwicklung

Exploit Development

Anleitung von burhanudinn123 zum Thema Entwicklung ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(1)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Netzwerkprotokolle
Leiten "dumme" Switches VLAN-Tags mit durch? (17)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

Router & Routing
gelöst Linksys wrt1200ac v2 mit dd-wrt: keine vlan-einstellungen im GUI (15)

Frage von Pixi123 zum Thema Router & Routing ...

E-Business
Wo tragt ihr eure privaten Termine ein? (13)

Frage von honeybee zum Thema E-Business ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...