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

gelöst VBScript - Dateinamen (Nummer) einem Namen zuordnen

Mitglied: downloader94

downloader94 (Level 1) - Jetzt verbinden

17.07.2009, aktualisiert 12:19 Uhr, 4905 Aufrufe, 4 Kommentare

VBScript - Dateinamen (Nummer) einem Namen zuordnen

Hallo,

In einem Ordner sind bestimmte Dateien. Zuerst steht eine feste Nummer, dann ein Bindestrich und dann der Monat als 2 Zahlen und danach das Jahr als 2 Zahlen. Meine Frage wäre jetzt: Ist es auch möglich der festen Nummer einen Namen zuzuordnen (z.B. die Nummer 12345 hat den Namen Max) und den Monat als Wort und das Jahr mit 4 Zahlen (2009) als Nachicht auszugeben? Das soll nur nochmal zur Überprüfung sein, damit auch die Datei mit dem richtigen Monat genommen wird.
Danke im voraus.


Lg downloader94
Mitglied: bastla
17.07.2009 um 16:22 Uhr
Hallo downloader94!

Die Antwort auf Deine Frage ist:
Vermutlich ja, zB mit einem Dictionary.

Sollte Dir das zu wenig konkret erscheinen, geht es Dir etwa so wie mir beim Lesen Deiner "Problembeschreibung" ...


.... da ich aber andererseits über ein gewisses Maß an Phantasie verfüge:
01.
'Namensliste erstellen 
02.
Set d = CreateObject("Scripting.Dictionary") 
03.
d.Add "12345", "Max" 
04.
d.Add "22345", "Moritz" 
05.
d.Add "32345", "Hugo" 
06.
 
07.
'Woher auch immer der Dateiname kommt ... 
08.
Dateiname = "12345-0709" 
09.
 
10.
'Zerlegen und (oberflächlich) prüfen 
11.
N = Split(Dateiname, "-") 
12.
If UBound(N) <> 1 Then 
13.
    WScript.Echo "Der Dateiname " & Dateiname & " entspricht nicht dem vorgegebenen Schema!" 
14.
    WScript.Quit 1 
15.
End If 
16.
 
17.
Nummer = N(0) 
18.
If Len(N(1)) <> 4 Then 
19.
    WScript.Echo "Der Datumsteil " & N(1) & " besteht nicht aus 4 Zeichen!" 
20.
    WScript.Quit 2 
21.
End If 
22.
 
23.
Monat = Left(N(1), 2) 
24.
Jahr = "20" & Mid(N(1), 3) 
25.
 
26.
If Not d.Exists(Nummer) Then 
27.
    WScript.Echo "Es wurde kein Name für die Nummer " & Nummer & " gefunden!" 
28.
    WScript.Quit 3 
29.
End If 
30.
 
31.
'Ausgabe Info 
32.
WScript.Echo d.Item(Nummer) & ", " & Monthname(Monat) & " " & Jahr
Grüße
bastla
Bitte warten ..
Mitglied: downloader94
21.07.2009 um 19:33 Uhr
Ich habe das kopiert, eingefügt und den Dateiname geändert und dann kommt diese Meldung:
Der Datei 0709.ebe enthält keine 4 Zeichen.
Ich vermute mal, das man da noch die Dateiendung ".ebe" entfernen muss, damit die Fehlermeldung nicht mehr kommt.

Lg Tim
Bitte warten ..
Mitglied: Biber
21.07.2009 um 19:51 Uhr
Moin downloader,
Zitat von downloader94:
Ich habe das kopiert, eingefügt und den Dateiname geändert
und dann kommt diese Meldung:
Der Datei 0709.ebe enthält keine 4 Zeichen.
Okay, es stimmt, bastla ist ziemlich belastbar und jetzt nach 10,75 Tagen Urlaub sicherlich noch mehr.
Und er wird auch seine Meldung "Der Datumsteil 0709.ebe besteht nicht aus 4 Zeichen!" ,
die auf Deinem vermutlich nicht professionell feinjustierten Bildschirm als "Der Datei 0709.ebe enthält keine 4 Zeichen." dargestellt wird, wiedererkennen.
Oder steht der Monitor möglicherweise in einem Pausenraum, der offiziell als Raucherzimmer ausgezeichnet ist?
Dann empfehle ich Glasreiniger.

Was mich interesssieren würde: Warum "bestellst" Du hier ein Rundum-Sorglos-Schlüsselfertig-Skript für die Namenskonvention
Zuerst steht eine feste Nummer, dann ein Bindestrich und dann der Monat als 2 Zahlen und danach das Jahr als 2 Zahlen.
...um es dann mit einer anderen Namenskonvention auszuprobieren (".ebe" angehängt)?

Ich vermute mal, das man da noch die Dateiendung ".ebe" entfernen muss, damit die Fehlermeldung nicht mehr kommt.
Ich vermute mal, dass Dir diese Aktion kein "man" aus diesem Forum abnehmen kann. Oder will.

Guckt ihr alle zu viele Nachmittags-Talkshows?

Manchmal verstehe ich, dass die Astronauten von Apollo 11 und anderen Mondlandeteams allesamt mit Depressionen zu kämpfen hatten, als sie wieder zurück im normalen Erd-Alltag zurück waren.

Grüße
Biber
Bitte warten ..
Mitglied: bastla
21.07.2009 um 23:16 Uhr
@Biber
Warum "bestellst" Du hier ein Rundum-Sorglos-Schlüsselfertig-Skript für die Namenskonvention
...um es dann mit einer anderen Namenskonvention auszuprobieren (".ebe" angehängt)?
Es wird Dich kaum überraschen, dass sich meine Überraschung in Grenzen hält ...
@downloader94
Falls Du noch eine Zeile 9 kaufen willst ...
Dateiname = CreateObject("Scripting.FileSystemObject").GetBaseName(Dateiname)
Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Batch & Shell

Verschieben und Umbenennen von Video-Dateien anhand der Nummer im Namen

gelöst Frage von Foja.FilmerBatch & Shell3 Kommentare

Hallo, da ich mich in der Batch Programmierung nicht auskenne, bitte ich um eure Unterstützung. Ich möcht mit einer ...

VB for Applications

Zuordnen von indirekt verknüpften Daten

gelöst Frage von LordXearoVB for Applications5 Kommentare

Hallo zusammen, ich könnte etwas Hilfe bei der Erstellung eines Skripts ODER einer SQL-Abfrage gebrauchen ( Falls es bereits ...

Xenserver

USB einem bestimmten PC zuordnen

Frage von toadroadranchXenserver3 Kommentare

Hallo, ich arbeite auf einem WTS via Citrix, auf dessen Einstellung ich keinen Einfluß habe. Außerdem habe ich noch ...

Batch & Shell

Batch, Suche der Nummer in der Datei!

Frage von SportiiiBatch & Shell8 Kommentare

Hallo, mir wurde bereits durch jodel32 sehr geholfen es fehlt nur ein kleines Stück: Folgendes: Wenn ich eine Nummer ...

Neue Wissensbeiträge
Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 4 StundenGoogle Android2 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Sicherheit

Intel gibt neue Spectre V2-Microcode-Updates frei (20.02.2018)

Information von kgborn vor 5 StundenSicherheit

Intel hat zum 20. Februar 2018 weitere Microcode-Updates für OEMs freigegeben, um Systeme mit neueren Prozessoren gegen die Spectre ...

Microsoft
ARD-Doku - Das Microsoft Dilemma
Tipp von Knorkator vor 8 StundenMicrosoft3 Kommentare

Hallo zusammen, vor einigen Tagen lief in der ARD u.a. Reportage. Das Youtube Video dazu dürfte länger verfügbar sein. ...

Windows 10

Neue Sicherheitslücke in Windows 10 (Version 1709) durch Google öffentlich geworden

Information von kgborn vor 1 TagWindows 10

Vor ein paar Tagen haben Googles Sicherheitsforscher vom Projekt Zero eine Sicherheitslücke im Edge-Browser publiziert. Jetzt wurde eine weitere ...

Heiß diskutierte Inhalte
Windows Server
AD DS findet Domäne nicht, behebbar?
Frage von schapitzWindows Server39 Kommentare

Guten Tag, ich habe bei einem Kunden ein Problem mit den AD DS. Umgebung ist folgende: Windows Server 2016 ...

Router & Routing
LANCOM VPN CLIENT einrichten
Frage von Finchen961988Router & Routing27 Kommentare

Hallo, ich habe ein Problem und hoffe ihr könnt mir helfen, wir haben einen Kunden der hat einen Speedport ...

Router & Routing
ISC DHCP 2 Subnetze
gelöst Frage von janosch12Router & Routing18 Kommentare

Hallo, ich betreibe bei mir im Netzwerk einen ISC DHCP Server auf Debian, der DHCP verwaltet aktuell ein /24 ...

CPU, RAM, Mainboards
32 gb RAM zu wenig?
Frage von pcguyCPU, RAM, Mainboards13 Kommentare

Hallo zusammen, mein PC verfügt über 32GB Ram. Nun kriege ich bei grossen Dateien im Illustrator die Fehlermeldung das ...