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 mit VBScript Dateien verschieben

Mitglied: Xethria

Xethria (Level 1) - Jetzt verbinden

23.10.2007, aktualisiert 24.10.2007, 10179 Aufrufe, 3 Kommentare

Hallo.

Vorab zu meiner Person. Ich bin vor fast drei Wochen in eine Ausbildung gerutscht. Die unter anderem VBScript in der Berufsschule beinhaltet. Für die Firma meinen Job brauch ich es nicht aber für die Schule. Vor der Ausbilung hatte ich keine Ahnung und jetzt auch nicht viel mehr. Soviel dazu, dass ich wohl nach eurer Hilfe mehr Fragen habe als vorher.

Der Unterricht diesbezüglich (VBScript) läuft so ab: der Lehrer gibt uns eine Aufgabe, wie die, mit der ich mein Problem habe und dann sitzen wir (Schüler) da. Ohne Einleitung oder Anleitung.

Auf meine Frage hin, woher ich mein Wissen nehmen soll, war die Antwort: aus dem Buch, und/oder suche solange bis du eine ähnliche Lösung für dein Problem findest und bau sie um.

Das genannte Buch heisst "Windows Scripting lernen". Steht vieles nützliches über die Grundbausteine drin, aber nun mangelt es an der tatsächlichen Umsätzung.

Natürlich habe ich ein paar Kollegen in meiner Firma die mir helfen können, aber sie haben nicht immer Zeit für mich und ich lerne es ja wirklich von Grund auf. Ich dachte mir vielleicht, dass ihr mir helfen könnt, und es vielleicht immer einen gibt, der Zeit und Lust hat auf meine vielen kommenden Fragen zu antworten.

Nun aber zu meinem Problem:
Die Aufgabe war es zwei Programme zu schreiben. Mit dem einen sollten wir eine Ordnerhierachie erstellen.

|-A
| -A
| -...
|-B
| -A
| -B
| -...
| -Z
|-C
|-D
|-...
|-Z

also 26 Ordner von A bis Z und in jedem Ordner wieder 26 Ordner von A bis Z.

Diese Aufgabe konnte ich nach langem Hin und Her und mehreren Minuten und Stunden der Verzweiflung mit etwas Hilfe löse.
Aber das zweite Programm schaff ich nicht. Wobei man sagte, es sei einfacher als das Erste.

Die zweite Aufgabe ist ein Programm zu schreiben, dass aus einem Ordner, wo viiieeellee .txt-Dateien drin sind, diese je nach Namen in die vorher erstellte Ordnerhierachie zu ordnen. Beispiel:

Zsjf.txt in Ordner Z
Ksopt.txt in Ordner K
Azifdc.txt in Ordner A
usw.

Ich bitte euch so dringend um Hilfe. Ich erwarte bald wieder eine Aufgabe von der Schule und habe sowenig Zeit und viel zu wenig Wissen das alleine zu schaffen.

Lieben Gruß.
Mitglied: SarekHL
23.10.2007 um 21:45 Uhr
Ich bitte euch so dringend um Hilfe. Ich erwarte bald wieder eine Aufgabe von der Schule und habe sowenig Zeit und viel zu wenig Wissen das alleine zu schaffen.

Naja, ich denke nicht, daß die Schule Euch überfordert, und ein wenig Zeit sollte man in seine Ausbildung schon investieren. Ich weiß ja nicht, was Du nebenbei noch machst, wenn du sooo wenig Zeit hast, aber das mußt Du vielleicht mal reduzieren.

Nun aber zu Deinem Anliegen

Die zweite Aufgabe ist ein Programm zu schreiben, dass aus einem Ordner, wo viiieeellee .txt-Dateien drin sind, diese je nach Namen in die vorher erstellte Ordnerhierachie zu ordnen. Beispiel:

Zsjf.txt in Ordner Z
Ksopt.txt in Ordner K
Azifdc.txt in Ordner A
usw.

Ich werde Dir jetzt keine fertige Lösung präsentieren, denn man lernt ja am besten, indem man sich die Lösung selber erarbeitet. Aber vielleicht ein paar Ansätze:


http://www.vbarchiv.net/archiv/tipp_details.php?pid=505 zeigt Dir, wie Du eine (in diesem Fall nach Datum und Uhrzeit) sortiere Dateiliste erstellen kannst. Das ist zwar eine Lösung für VB und weniger für VBscript, aber vielleicht kannst Du sie Dir ja anpassen.

Den Befehl LEFT kennst Du ja vermutlich [Left("KSOPT.txt",1) ergibt K], damit kannst Du dann aus dem Dateinamen ermitteln, in welchen Ordner die Datei muß.

http://www.vbarchiv.net/vbapi/MoveFile.php erklärt Dir die MoveFile-Funktion zum Verschieben von Dateien.


Viel Erfolg ...
Bitte warten ..
Mitglied: bastla
23.10.2007 um 22:26 Uhr
Hallo Xethria und willkommen im Forum!

Eine fertige Lösung möchte auch ich Dir nicht anbieten, aber ein Script für eine ähnliche Aufgabenstellung (Kopiere alle Dateien des Ordners "D:\Dateien" nach ihrem Dateityp in den jeweils entsprechenden Ordner unterhalb von "D:\Archiv", also etwa "Zsjf.txt" in den Ordner "D:\Archiv\txt" oder "Ksopt.vbs" in den Ordner "D:\Archiv\vbs") würde etwa so aussehen:
01.
Const Quelle = "D:\Dateien"
02.
Const Ziel = "D:\Archiv"
03.
Set fso = CreateObject("Scripting.FileSystemObject")
04.
Set Ordner = fso.GetFolder(Quelle)
05.
For Each Datei In Ordner.Files
06.
	Datei.Copy Ziel & "\" & Right(Datei.Name, 3) & "\" & Datei.Name
07.
Next
Da Du schon angekündigt hast, auch in Zukunft hier Hilfe suchen zu wollen, vielleicht eines vorweg: Zumindest die grundsätzliche Überlegung, welche einzelnen Arbeitsschritte nötig sind, solltest Du schon selbst anstellen! Versuche, diese Schritte so genau wie möglich zu beschreiben, dann musst Du "nur" noch die richtigen Werkzeuge finden, zB in Deinem Buch oder in der Hilfe-Datei "script56.chm" (falls Du diese noch nicht zur Verfügung haben solltest, kannst Du eine deutschsprachigen Version zB hier bekommen).

Wenn Du dann Deinen Script-Entwurf hier im Forum darstellst, wirst Du sicherlich Unterstützung in Form von Ergänzungen oder Korrekturen erhalten.

Grüße
bastla
Bitte warten ..
Mitglied: Xethria
24.10.2007 um 07:43 Uhr
Ich bedanke mich schonmal vielmals für eure Hilfe. In den zweieinhalb Wochen, die ich nun die Ausbilung machen, versuche ich den Stoff der Schule von fast 3 Monaten nachzuholen. Sie läuft schon seit August. Ich bin nur einen Tag in der Woche in der Berrufsschule und sonst von 8Uhr bis mindestens 17Uhr im Betreib. Meist länger, dass kann sich jeder denken.

Ich bin eifrig dabei VBScript zu verstehen. Aber ich glaub ihr könnt mich ein bissel verstehen, wenn ich eben noch soviel anderes im Nacken hab und über jede Hilfe froh bin. Ich hatte es ja immerhin fast alleine geschafft die Ordnerhierachie zu erstellen.

Ich geh nun zur Arbeit und heute abend mach ich mich ran es zu basteln.

Vielen Dank!
Bitte warten ..
Ähnliche Inhalte
Batch & Shell

VBScript - Kopiere lokale Datei auf mehrere Netzwerkpfade

gelöst Frage von chasperlisimba1Batch & Shell6 Kommentare

Hallo liebe Gemeinde Ich versuche folgendes per VBScript zu lösen. Eine Datei soll auf 6 verschiedene Server kopiert werden ...

VB for Applications

Per vbscript element aus xml datei löschen

gelöst Frage von aletriVB for Applications4 Kommentare

guten abend an alle nun folgt der gegenzug nämlich <Path>C:\Program Files\Lockheed Martin\Prepar3D v4\ATiLibs\scenery</Path> entfernen! Script löscht die Zeile nicht ...

VB for Applications

Vbscript zum Anfügen von Text in scenery.cfg Datei

gelöst Frage von aletriVB for Applications27 Kommentare

Guten Tag an alle Der folgende Script fügt der Scenery.cfg Datei des Flugsimulators einen Szenerie Eintrag hinzu. Das hatte ...

VB for Applications

Per vbscript neues element an xml datei einfügen

gelöst Frage von aletriVB for Applications1 Kommentar

guten abend an alle das xml file, dass dieser script bearbeitet sieht leer so aus: <?xml version="1.0"?> -<DynPlacement.Document> -<Config> ...

Neue Wissensbeiträge
iOS
IOS hat nen Cursor !!!
Tipp von Criemo vor 7 StundeniOS

Nette Funktion im iOS. iPhone-Mauszeiger aktivieren „Nichts ist nerviger, als bei einem Tippfehler zu versuchen, den iOS-Cursor an die ...

Off Topic
Avengers 4: Endgame - Erster Trailer
Information von Frank vor 2 TagenOff Topic1 Kommentar

Ich weiß es ist Off Topic, aber ich freue mich auf diesen Film und vielleicht geht es anderen hier ...

Webbrowser
Microsoft bestätigt Edge mit Chromium-Kern
Information von Frank vor 2 TagenWebbrowser5 Kommentare

Microsoft hat nun in seinem Blog bestätigt, dass die nächste Edge Version kein EdgeHTML mehr für die Darstellung benutzen ...

Sicherheit

MikroTik: Sicherheitslücke wird ausgenutzt obwohl ein Update seit langem verfügbar ist

Information von sabines vor 2 TagenSicherheit

Obwohl ein Update, dass die nun massenhaft ausgenutzte Lücke schließt, seit langem (März 2018) verfügbar ist, wird es offensichtlich ...

Heiß diskutierte Inhalte
Exchange Server
Exchange Server 2010: Keine Eingehenden E-MAils
Frage von gabeBUExchange Server15 Kommentare

Hallo Zusammen Ich habe das kurzen auf dem Exchange 2010 Server das Problem, dass ich keine externen E-Mails mehr ...

Rechtliche Fragen
Systemhaus auf Abwegen
Frage von rocco61Rechtliche Fragen13 Kommentare

Hallo zusammen, bin derzeit ratlos bei dem folgenden Scenario: In einen Seniorenheim wurde beschlossen, die IT an eine andere ...

Router & Routing
MikroTik - Routing, Bridging, Switching
gelöst Frage von Alex29Router & Routing9 Kommentare

Hallo in die Runde, als Hobby-Admin würde ich bitte mal wieder Eure Hilfe benötigen. Seit der Umstellung auf RouterOS ...

Outlook & Mail
Kalendersync mit Android und Outlook
Frage von Stefan007Outlook & Mail8 Kommentare

Hi Leute, kennt jemand eine Möglichkeit um Termine zwischen installiertem Outlook auf dem PC und dem Kalender auf einem ...