roadtek
Goto Top

Ordner umbennen - NTFS konforme Namen - suche Tool

Ordner, die von einem Mac aus auf einer NTFS Freigabe anleget worden sind, umbenennen.

Guten Tag,

Folgende Aufgabenstellung hat sich ergeben:

Wir haben eine Freigabe auf einem NTFS formatierten Laufwerk erstellt.
Macs greifen via SMB://Freigabename darauf zu und können lesen und schreiben.
Leider lassen vom Mac aus auch Ordner und Dateien anlegen, deren Namen nicht NTFS konform sind, zb. mit Leerstellen am Ende des Datei- bzw. Ordnernnamen.

Mit dir /X und ren kann ich diese unter DOS umbenennen.

Das ist aber nicht besonders komfortabel, da hier einige 100 GB Daten liegen und recht viele Dateien und Ordner umbenannt werden müssen.

Kennt ihr ein Tool, es darf auch kostenpflichtig sein, mit dessen Hilfe ich die Dateien/Ordnernamen "in einem Schwung" umbenennen kann?
Bulk rename Pro scheitert beispielsweise an unzureichenden Berechtigungen, auch wenn ich es, wie mein DOS Fenster, als lokaler Administrator des freigebenden Servers aufrufe,

Über Tipps würde ich mich freuen und bedanke mich schon mal im Voraus.

Grüße

Oliver
Kommentar vom Moderator Biber am Feb 28, 2012 um 17:30:56 Uhr
Ordner umbennen - NTFS konforme Namen - suche Tool
set /a rgc += 1
#797
aber leider gibt es gar keine Umbenntools.... nicht mal gebraucht bei eBay.

Content-Key: 181187

Url: https://administrator.de/contentid/181187

Printed on: April 23, 2024 at 06:04 o'clock

Mitglied: 60730
60730 Feb 28, 2012 at 13:17:57 (UTC)
Goto Top
moin,

das ist ein heisses Eisen...

Uns Bastla (wirst du sicherlich noch kennenlernen) hat mal ein vbs hervorgekramt, dass sowas kann...
Ordner = "i:\"  


Set fso = CreateObject("Scripting.FileSystemObject")  
Set Fld = fso.GetFolder(Ordner)

DirEntries = ""  
DoFolders(Fld)

Arr = Split(Mid(DirEntries, 3), vbCrLF)

For i = 0 To UBound(Arr)
    WScript.Echo i & vbTab & Arr(i)
Next
'Ende Hauptprogramm  

Sub DoFolders(Folder) 

For Each SubFolder In Folder.SubFolders 
    If InStr(SubFolder.Name, ",") Or InStr(SubFolder.Name, " ") Then   
        NewPath = Replace(Replace(SubFolder.Path, ",", " -"), " ", "_")   
        If Not fso.FolderExists(NewPath) Then 
            NewName = Replace(Replace(SubFolder.Name, ",", " -"), " ", "_")   
            SubFolder.Name = NewName 
            DirEntries = DirEntries & vbCrLF & SubFolder.Path 
        Else 
            DirEntries = DirEntries & vbCrLF & "##" & SubFolder.Path   
        End If 
    End If 

    DoFolders(SubFolder) 
Next 

For Each File In Folder.Files 

    If InStr(File.Name, ",") Or InStr(File.Name, " ") Then   
        NewPath = Replace(Replace(File.Path, ",", " -"), " ", "_")   
        If Not fso.FileExists(NewPath) Then 
            NewName = Replace(Replace(File.Name, ",", " -"), " ", "_")   
            File.Name = NewName 
            DirEntries = DirEntries & vbCrLF & File.Path 
        Else 
            DirEntries = DirEntries & vbCrLF & "####" & File.Path   
        End If 
    End If 
Next 
End Sub
Und die andere koryphäe, der unter Biber firmiert, den hast du ja schon mit dem #RCG geweckt.

Nur ich warne vorher - wenn da irgendein Hannebambel irgendwelche Excellisten nutzt, die Dateinamensbasiert sind - dann....
immer schee uff die Finger kloppe

Also gehen tut das, aber.....klopp den Macindianern einfach auf die Finger, denn das Ding da oben kümmert sich nicht unbedingt darum, ob die Datei/Ordner offen ist oder nicht.

Gruß
Member: roadtek
roadtek Mar 01, 2012 at 10:05:03 (UTC)
Goto Top
Danke für das vbs script.
Leider hat das nicht alle Eventualitäten abgedeckt, oder was wahrscheinlicher ist, ich kann es nicht richtig einsetzen face-wink

Nach einigem Herumprobieren habe ich einen anderen Lösungsweg gefunden:
Ein alter Mac OSX 10.4x Rechner, dessen SMB Client so alt ist, dass er ACLs und gelockte Folder /Files scheinbar ignoriert.

Dort eine "A Better Finder Rename" Version 7 Lizenz aufgespielt, es gibt noch alte Versionen, die mit 10.4 laufen.
Das Tool hat eine Option namens: Make file names Windows NTFS /SMB compatible.
Die Aktion lässt sich rekursiv anwenden und gerade läuft er über die Daten und benennt brav um.

Neuere Versionen der Software, bzw. aktuellere Betriebssystemversionen scheitern an den falsch benannten und gelockten Ordnern, die Version 7 nicht!

Grüße

Oliver