Jump to content

Blade1981

Members
  • Gesamte Inhalte

    187
  • Registriert seit

  • Letzter Besuch

Alle erstellten Inhalte von Blade1981

  1. Hab das jetzt noch so ausprobiert: Dim Path Dim Value Dim WshShell Dim FSO Set WshShell = CreateObject("Wscript.Shell") Path = "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Security\OutlookSecureTempFolder" Value = WshShell.RegRead(Path) Set FSO = CreateObject("Scripting.FileSystemObject") FSO.DeleteFolder (Value, true) die letzte Zeile darf keine Klammer enthalten (Beim Aufrufen einer Unterroutine dürfen keine Klammern verwendet werden). Also, Klammer weg - Ergebnis: Zeile 12 - Zeichen 1 - Der Pfad wurde nicht gefunden! ???
  2. Also muss ich nur noch alle Dateien abfragen, die in diesem Verzeichnis sind, in ein Array schreiben und dann diese Dateien löschen lassen oder geht das auch einfacher wie bei Batch zum Beispiel mit dem *.*?!
  3. was sagt diese Zeile aus? Set fso = nothing Ich dacht mirs auch schon, dass es jetzt im Endeffekt besser gewesen wäre, das ganz über VBS zu lösen, aber wenn so auch geht ;) Und das Verzeichnis selbst darf ja nicht gelöscht werden, sondern nur die Dateien! Hmmm... Wenn man danach das Verzeichnis einfach wieder neu erstellt? Dann könnte man das natürlich auch machen!
  4. Die Batch-Datei löscht sich selbst ;) (Die letzten 3 Zeilen, welche ich zunächst auskommentierte zeigt, was in diese Batch-Datei geschrieben wird) Danke für deine Infos! Hier noch das komplette Script so wie ich es bisher habe - funktionsfertig: ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, Dim Path Dim Value Dim WshShell Dim loeschen Set WshShell = CreateObject("Wscript.Shell") 'Aus Registry auslesen, wo die Temporären Dateien liegen Path = "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Security\OutlookSecureTempFolder" Value = WshShell.RegRead(Path) 'Variable mit Batch-Befehlszeile gefüllt (wird später in eine Batch-Datei geschrieben) loeschen = "del """ + Value + "*.*"" /q" 'Erstellung der Batch-Datei, welche die Temporären Dateien löscht Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.CreateTextFile("c:\temp.bat") 'Füllen der Batch-Datei objFile.WriteLine "@echo off" objFile.WriteLine "echo Achtung, die Dateien aus folgendem Verzeichnis werden geloescht:" objFile.WriteLine "echo." objFile.WriteLine "echo " + Value objFile.WriteLine "echo." objFile.WriteLine "echo Abbrechen mit CTRL+C - weiter mit Enter" objFile.WriteLine "echo." objFile.WriteLine "Pause" objFile.WriteLine "echo." objFile.WriteLine "echo Bitte warten sie, bis die Dateien geloescht wurden!" objFile.WriteLine(loeschen) objFile.WriteLine "echo." objFile.WriteLine "echo Fertig!" objFile.WriteLine "echo." objFile.WriteLine "pause" objFile.WriteLine "del c:\temp.bat" objFile.Close 'Erstellte Batch-Datei ausführen WshShell.Run "c:\temp.bat" ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, Vielleicht bringt es ja jemand Anderen auch weiter! Noch zu bemerken: Die Batch-Datei muss nach dem Füllen wieder geschlossen werden, da sie sonst nicht ausgeführt werden kann!
  5. Vielen Dank, das mit der Batch-Datei ausführen funktioniert jetzt! Wenn noch jemand eine Lösung weiß und posten könnte, ohne dass ich diese temporäre Batch-Datei erstellen muss, dann habe ich dafür immer gerne ein offenes Auge ;)
  6. Wieder einmal ein VBS-Problemchen ;) Ich muss aus der Registry den Pfad auslesen, welchen Outlook für temporäre Dateien verwendet, da dieser nicht auf jedem Rechner der selbe ist (Sucht man den Pfad per Explorer, sucht man vergeblich, auch wenn man Systemdateien und versteckte Dateien anzeigen lässt). Diesen Ordner muss man einfach leeren können, da wir hiermit oftmals Probleme wegen FAXEN haben, bis man diesen Ordner eben geleert hat! Hier mein Code, der eben so weit eigentlich funktioniert. Aber es kommt immer die Meldung: "Das System kann die angegebene Datei nicht finden!" nachdem er den Ordner leeren soll. Ich habe den Inhalt der Variablen "loeschen" schon in eine .bat-Datei schreiben lassen und wenn ich diese manuell ausführe, werden die Dateien gelöscht, was bedeutet, dass die löschen-zeile doch soweit richtig ist, oder? Was ist noch falsch? Hier der bisherige Code: Dim Path Dim Value Dim WshShell Dim loeschen set objshl = createobject("wscript.shell") Set WshShell = CreateObject("Wscript.Shell") Path = "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Security\OutlookSecureTempFolder" Value = WshShell.RegRead(Path) loeschen = "del """ + Value + "*.*"" /q" WScript.Echo loeschen Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.CreateTextFile("c:\temp.bat") 'objFile.WriteLine(loeschen) 'objFile.WriteLine "pause" 'objFile.WriteLine "del c:\temp.bat" Die letzten 3 Zeilen erstellen die Batch-Datei, welche sich nach Ausführen selbst wieder löschen soll, aber ich weiß nicht wie ich diese Batch-Datei "starten" kann!? und das ist auch die unschönere Art. Thankx for Infos and Help!
  7. Hallo QBall! Zunächst mal: Das ist ein neues Thema also solltest du einen neuen Thread aufmachen! Ansonsten so viel dazu: Warum machst du das überhaupt per Count?
  8. @thorgood Weißt du, wie ich in eine Excel-Datei den Inhalt der Variablen einfügen kann? Das wär echt super! (Siehe Link zu anderem Thread im Posting zuvor!)
  9. Weiß denn niemand etwas hierzu? Muss doch irgendwie gehen!
  10. Jetz muss i nommal stören! Kannst du mir vielleicht auch bei diesem hier weiter helfen??? http://www.mcseboard.de/windows-forum-allgemein-28/vbscript-variable-excel-liste-schreiben-98160.html
  11. Ich kenne SyncBack, welches recht gute und sinnvolle Funktionen hat! 2BrightSparks | SyncBackSE Probiers doch mal aus und gib bescheid, ob es so funktioniert, wie du es dir vorstellst! Ich kann es jedenfalls sehr empfehlen! Edit: Ups, falscher Link, hab ich ausgebessert, sorry! (siehe Link oben!)
  12. Schau mal im Gerätemanager nach, ob dort Ausrufe oder Fragezeichen vorhanden sind und poste diese Einträge. Ansonsten würde ich empfehlen, einen aktuellen Chipsatztreiber zu installieren. P.S.: Im Gerätemanager müsste der letzte Eintrag USB-Controller sein. Schau doch mal in diesem Eintrag, ob hier USB2 zu sehen ist. Musst aber genauer schauen, kann man auch gerne mal übersehen! Falls der Eintrag fehlt, hast du entweder kein USB2.0 oder eben den Chipsatztreiber nicht richtig installiert, oder was noch sein kann, deine Betriebssystemversion ist zu alt. Z.B. W2k ohen SP4 und auch XP hatte anfangs damit so seine Probleme!
  13. Hallo! Ich habe ein Script, welches Logfiles auswertet. Die Funktion des Scriptes soll erweitert werden und die gelieferten Ergebnisse in Excel ausgeben. Dazu soll die Excel-Datei erst einmal per Script erstellt werden. Dateiname soll von der Variablen varDateiname kommen. Weiter geht es mit den Zellen: Zelle A1 leer Zelle A2 "Eingehender Mailverkehr" Zelle A3 "Ausgehender Mailverkehr" Zelle B1 "<1MB" Zelle C1 "<10 MB" Zelle D1 ">= 10 MB" Somit sollen die Werte der Variablen varGroesseEingehend jeweils in die Zellen B2, C2 und D2 geschrieben werden. Die Werte von varGroesseAusgehend sollen jeweils in die Zellen B3, C3 und D3 geschrieben werden. Wie kann ich das anstellen? Ich stell mir das so vor: Private Function fncExcelExport Falls Datei existiert, dann überschreiben mit Neuer und leerer Datei Else Excel-Datei erstellen Daten in Excel-Datei schreiben End Function fertig Spielt es eine Rolle, welche Excel-Version verwendet wird? Danke schonmal!
  14. Is ja super :) Schon ausprobiert und hat super geklappt! Vielen vielen Dank! Ich würd dir ja jetz an Drink spendieren, aber is bissi schwierig ;)
  15. Hmmm... Mir gehts darum, dass das Script nicht mit ner Fehlermeldung enden soll, weil die Datei zu Ende sei. Aber das werde ich mal ausprobieren, wie ich das am besten löse. Mal schauen. Habe aber nun ein anderes Problem. Wenn ich zwischen den Leerzeichen die GRÖßE auslese, dann behandelt er diesen Wert als String und nicht als Integer. Wie kann ich das umwandeln? Er zählt mir in einem weiteren Schritt die Zahlen also nicht zusammen, sondern setzt diese lediglich nebeneinander. Wenn die erste Größe z.B. 50 ist und die zweite Größe ist 6, dann kommt 506 raus und nicht 56.
  16. Na die Antwort ging ja schnell, super, danke! Hat erstmal funktioniert! Und jetzt noch ne Frage. Wie kann ich abfragen, wie viele Zeilen die gesamte Textdatei hat? Wär super, wenn das auch noch so einfach zu machen wäre! Danke schonmal!
  17. Hallo! Ich habe wieder einmal ein VBS-Problem: Ich muss Logfiles auswerten. Und zwar sind diese so aufgebaut: Daten Daten Daten Daten Daten GRÖßE Daten ..... Daten Daten Daten Daten Daten Daten Daten .... Daten Daten Daten Daten Daten GRÖßE Daten ..... Daten Daten Daten Daten Daten GRÖßE Daten ..... .... usw Ich muss aus jeder Zeile, die GRÖßE enthält auch GRÖßE auslesen, wobei weder Daten zuvor, Daten danach oder GRÖßE in jeder Zeile die selbe Länge haben sondern immer abweichen. Lediglich die Leerzeichen dienen als Anhaltspunkt. Die Zeile, in welcher GRÖßE enthalten ist, bekomme ich in eine Variable geschrieben, das ist nicht das Problem. Aber wie komme ich nun an die GRÖßE ran, welche zwischen dem 5. und dem 6. Leerzeichen steht und in eine Variable geschrieben? Per Excel ist das nicht möglich zu lösen, da die Logfiles teilweise zu viele Zeilen haben! Danke schonmal!
  18. Nein, das geht so auch nicht... Hmmm... Wie gesagt, es gibt eine Möglichkeit, mit der man das auch anders machen kann. Ich glaub, so kommen wir nicht weiter... Wenn noch jemand was weiß, ruhig posten, bin um jede Info dankbar! Vielleicht komm ich ja selbst noch auf eine Lösung oder finde das Tool, welches ich meine. Ghost steht mir leider nicht zur Verfügung, aber @lefg, du hast mich gerade auf eine Idee gebracht, die mich evtl. schon weiter bringt. Wegen den Parametern zum Starten des Imageprogrammes. Okay, mal schauen, was ich noch herausfind... Jedenfalls nochmals vielen Dank für eure Hilfe!
  19. Also... Es soll folgendes möglich sein: Von Windows heraus eine Datei ausführen, worauf ein Neustart folgt. Je nachdem, welche Datei man verwendet, soll DOS entweder mit Netzwerkkartentreibern von Rechner A starten, oder eben von Rechner B. Oder PartitionMagic, das Imageprogramm oder Sonstiges. Folgende Möglichkeiten eines DOS gibt es: Dos-Partition: Wenn ich den Weg über eine DOS-Partition gehen würde, müsste ich alle vorhandenen Images neu erstellen. Das wäre etwas sehr mühselig. USB-Boot: geht nicht bei allen Rechnern (als Boot-Laufwerk nicht möglich) Boot-Diskette: Nicht jeder Rechner hat ein Diskettenlaufwerk und man müsste zu viele Disketten mitnehmen Boot-CD: unflexibel und diese müsste auch jeder dabei haben Außerdem soll es möglich sein, ohne weitere Mittel den Rechner neu starten zu können, sodass er dann bei dem nächsten Boot in DOS bootet und nicht in Windows. Dass man eben keine weiteren Mittel braucht, um den Rechner in DOS zu booten. So einfach wie mögich eben für den jenigen, der davor sitzt.
  20. Ich kenn das von einem Programm, das Parameter vom System ausliest (z.B. IP), und diese in eine Datei hineinschreibt. Wie das dann genau funktioniert mit dem Disketten-Image und dass die IP bei einem Neustart mit in den DOS-Boot übernommen wird, das weiß ich eben nicht und ich weiß auch das Programm nicht. Also es gibt eine Lösung, nur muss man den Weg selbst beschreiten. Und wenn man nicht weiß wo der Weg ist, dann kann man ihn nicht beschreiten ; ) Jedenfalls funktioniert das per doppelklick und it works! Trotzdem schonmal vielen Dank für eure Hilfe! Vielleicht finde ich ja noch eine vernünftige Lösung! **** ist auch, dass die Hersteller sich auf keinen Netzwerkkarten-Standard einigen und man somit für jeden Rechner mit ner anderen Netzwerkkarte eine eigene Diskette benötigt (oder zumindest einen eigenen Treiber).
  21. Nun, da wir verschiedene Disketten verwenden, um Images zurück zu spielen (wir verwenden PowerCast ImageCenter, recht alt aber funktioniert!), ist es sinnvoll, die Disketten so zu sichern, dass man diese nicht immer "neu erfinden" müsste, falls die doch relativ anfälligen Disketten kaputt gingen. Das Laden der Disketten-Imagedatei macht Sinn, wenn man eine Verbesserung einbringen möchte oder rumprobieren will und man dazu mehrere Disketten kopieren muss (zum Beispiel auf einen USB-Stick). Auf dem herkömmlichen Weg ist es notwendig, die Diskette einzulegen und dann abzuwarten, bis die Diskette endlich kopiert ist. Im Falle eines Tools, mit dem man Disketten-Images laden könnte, wäre man viel schneller (Disketten sind nunmal sehr langsam). Außerdem könnte man diese virtuellen Disketten viel schneller überarbeiten, ohne ständig das Disketten-Image auf eine frisch formatierte Diskette aufspielen zu müssen und dort die Dateien abzuändern. Alle Disketten durch USB-Sticks zu ersetzen ist etwas kostspielig und außerdem haben wir Rechnertypen, die einen boot von Diskette nicht ermöglichen. Und auf einer CD habe ich bisher noch nicht die Möglichkeit gefunden, den Boot-Bereich zu ändern (wenn man z.B. unter Nero eine Boot-CD erstellt und eine Diskette als Quelle auswählt, dann ist der von mir so genannte Boot-Bereich - also der Bereich, wo die Dateien der Diskette sind - nicht unter Windows auf der CD sichtbar, also macht eine CD-RW auch keinen Sinn, außer jemand weiß hier eine Möglichkeit!) Jep, ich hab mir dazu auch schon Gedanken geamacht, so isses ja nicht ; )
  22. Oder wenn wir gerade bei dem Thema Disketten-Images sind, kennt von euch jemand ein Freeware-Tool, um Disketten-Images unter Windows zu laden? So wie Nero Image-Drive für CD/DVD?
  23. Wir verwenden unsere Rechner auf Veranstaltungen und als Notfallkonzept haben wir Images der Rechner auf sich selbst (von Partition c bis e eine Imagedatei auf f erstellt). Um das Image zurückspielen zu können, muss man zunächst DOS starten können (ohne dass Windows im Hintergrund mitläuft, also ist ein Neutstart nötig). Sehr praktisch wäre es, wenn man dies zugleich kombienieren könnte mit virtuellen Disketten, wodurch ein Rechnerspeziefischer oder auch Verwendungszweckspeziefischer Neustart zu DOS realisiert werden könnte. Ich weiß, dass es solche Programme gibt, aber ich weiß nicht, wie diese heißen und ich habe auch nichts per Google gefunden. P.S.: Per Diskette lässt sich das nicht immer realisieren, da manche Rechner kein Diskettenlaufwerk haben (können - Dank des Herstellers!). Und für jeden Rechner und Verwendungszweck eine Boot-CD wäre etwas umfangreich.
  24. Hallo! Kennt jemand von euch eine Möglichkeit, unter Windows XP oder Windows 2000 per Mausklick einen Neustart zu DOS zu veranlassen? Super wäre es, wenn man sogar direkt eine Disketten-Imagedatei einbinden könnte. Praktisch ein Neustart mit Boot von Disketten-Image. Vielen Dank bereits!
  25. Wenn ich zwischen den beiden VLANs routen sollte, dann muss ich das doch wieder explizit einstellen. VLAN-Routing ein und wieder aus und wieder ein und wieder aus... Image aufspielen, VLAN-Routing aus, Daten aktualisieren, VLAN-Routing ein. Dann ist es einfacher so wie wir es jetzt machen, das Netzwerkkabel zu ziehen und wieder einzustecken. Und genau dies wird gerne mal vergessen, leider... Es würde doch reichen, wenn ich einen Switch auftreibe, der keine Multicasts zulässt, oder? Danke trotzdem!
×
×
  • Neu erstellen...