134
Automatische Änderung einer bestimmten Zeile in einer Textdatei
Da ich bei uns im Betrieb eine neue DNC Box installieren musste (davor wurden CNC Programme auf Diskette gespeichert, Disketten gingen immer kaputt) und sie jetzt im LAN gespeichert werden, stehe ich vor folgendem Problem:
Wir haben eine ganz alte CNC Fräsmaschine (Böhringer, Bjh. 1981). Der Speicher der Maschine ist sehr begrenzt.
Die txt bzw. dnc Datei sieht folgender Maßen aus:
$$ (3859965)
%PM
N3859961 (SIEBKORB)
Der Dateiname lautet 3859965.dnc
Man sieht, dass in der dritten Zeile N3859961 (SIEBKORB) die falsche Nummer steht (da von anderem Programm an der Maschine kopiert), es muss N3859965 heißen, so wie der Dateiname oder die Nummer in der 1. Zeile.
An der Maschine selbst kann man das Programm nicht ändern(zu alt).
Es solte dann so sein:
$$ (3859965)
%PM
N3859965 (SIEBKORB)
Mein Chef reißt mir den Kopf ab, teure Hardware gekauft und jetzt wird die dritte Zeile falsch angezeigt, weil die Maschine keine Änderungen am Programm zulässt.
Gibt es vielleicht eine Möglichkeit, eine Batch zu schreiben? Alle Dateien sind in einem Ordner.Habe schon ganz google durch und weiß einfach nicht weiter.
Bin kurz vor dem Abschluss meiner Lehre und jetzt passiert sowas.
Hoffentlich kann mir da jemand helfen!
$$ (3859965)
%PM
N3859961 (SIEBKORB)
Der Dateiname lautet 3859965.dnc
Man sieht, dass in der dritten Zeile N3859961 (SIEBKORB) die falsche Nummer steht (da von anderem Programm an der Maschine kopiert), es muss N3859965 heißen, so wie der Dateiname oder die Nummer in der 1. Zeile.
An der Maschine selbst kann man das Programm nicht ändern(zu alt).
Es solte dann so sein:
$$ (3859965)
%PM
N3859965 (SIEBKORB)
Mein Chef reißt mir den Kopf ab, teure Hardware gekauft und jetzt wird die dritte Zeile falsch angezeigt, weil die Maschine keine Änderungen am Programm zulässt.
Gibt es vielleicht eine Möglichkeit, eine Batch zu schreiben? Alle Dateien sind in einem Ordner.Habe schon ganz google durch und weiß einfach nicht weiter.
Bin kurz vor dem Abschluss meiner Lehre und jetzt passiert sowas.
Hoffentlich kann mir da jemand helfen!
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Kommentar vom Moderator Biber am Aug 31, 2011 um 09:00:30 Uhr
Verschoben von "Windows"-"Netzwerk" nach "Batches from Hell"
Habe schon ganz google durch
Und ich habe hier schon 3 Millionen mal gesagt, ihr sollt nicht immer so übertreiben.Content-Key: 172339
Url: https://administrator.de/contentid/172339
Printed on: April 19, 2024 at 10:04 o'clock
134 Comments
Latest comment
Aloha,
wobei, du grüßt uns auch nicht - also aloha zurück.
greetz André
... wobei deinen Gruß finde ich auch nicht, hm eilig und dringend war es ja wieder, stimmt ja ... ich springe (erstmal ab hier)
wobei, du grüßt uns auch nicht - also aloha zurück.
Habe schon ganz google durch
Und dabei sind wir doch sehr weit oben gelistet ... aber warum habe ich das Gefühl, dass du unsere Suchfunktion noch nicht durchhast (batch Zeile ersetzen)Gibt es vielleicht eine Möglichkeit, eine Batch zu schreiben?
Ja, mit VBS-inliner.greetz André
... wobei deinen Gruß finde ich auch nicht, hm eilig und dringend war es ja wieder, stimmt ja ... ich springe (erstmal ab hier)
Stimmt, kein Gruß, sorry !
HALLO ERSTMAL ZUSAMMEN! danke auch für die schnelle Antwort !
Habe nach VBS inliner gegoogelt, aber wirklich schlau bin ich daraus nicht geworden.
Ist meine Problemstellung auch ohne VB Kenntnisse möglich zu lösen?
Gibt es vielleicht jemand der mir eine fertige Lösung präsentieren kann?
Sorry für die Unverschämtheit, aber ich bin wirklich unter Zeitdruck (Chef kommt morgen aus dem Urlaub und will das gelöst sehen)
Vielen Dank im Voraus!!
HALLO ERSTMAL ZUSAMMEN! danke auch für die schnelle Antwort !
Habe nach VBS inliner gegoogelt, aber wirklich schlau bin ich daraus nicht geworden.
Ist meine Problemstellung auch ohne VB Kenntnisse möglich zu lösen?
Gibt es vielleicht jemand der mir eine fertige Lösung präsentieren kann?
Sorry für die Unverschämtheit, aber ich bin wirklich unter Zeitdruck (Chef kommt morgen aus dem Urlaub und will das gelöst sehen)
Vielen Dank im Voraus!!
Servus,
Gruß
- wenn du den auch an jedem Tag Grußlos vorbeieilst, verstehe ich das
Habe schon ganz google durch.
- Und bei welchem Buchstaben bist du gelandet A wie Adminisrotor.de?
- Kleiner Tipp, kau Google nochmal einen Buchstaben weiter durch, das sollte B wie Batch sein
Bin kurz vor dem Abschluss meiner Lehre und jetzt passiert sowas.
- Tröste dich, gestern war einer da, der genauso aufgetreten ist (Doppelpost - nur hatte dessen 2. Post wenigstens einen Gruß vor dem "Auftrag" - ok nicht ganz freiwillig, aber who cares) und der hatte frisch das Strassenabretuhr gemacht.
Hoffentlich kann mir da jemand helfen!
- Wie weit bist du denn mit der Batch gekommen und wo hängst?
Gruß
Hallo,
sorry erstmal für alles(wenn ich grad soviel Blödsinn schreibe). Aber wirklich grad Stress pur.
Habe noch nie eine batch datei geschrieben (außer rename *.* *.dnc) um die CNC Programme in DNC Dateien umzubennen.
Nach zed habe ich schon geschaut, aber da kann ich doch nicht automatisiert ändern?
Und ich weiß ja nicht wie ich die Zeile rausfiltern soll, die ich ersetzt haben möchte durch den Dateiname. Sprich: Ich hab keina Ahnung.
Gruß
sorry erstmal für alles(wenn ich grad soviel Blödsinn schreibe). Aber wirklich grad Stress pur.
Habe noch nie eine batch datei geschrieben (außer rename *.* *.dnc) um die CNC Programme in DNC Dateien umzubennen.
Nach zed habe ich schon geschaut, aber da kann ich doch nicht automatisiert ändern?
Und ich weiß ja nicht wie ich die Zeile rausfiltern soll, die ich ersetzt haben möchte durch den Dateiname. Sprich: Ich hab keina Ahnung.
Gruß
Hi,
sieh doch einfach mal im Thread unten in die Liste unterhalb von "Mögliche Antworten oder verwandte Beiträge" oder klicke auf die Zeile. Da findest du sicher etwas, das dir einen ersten Ansatz ermöglicht.
Gruß
sieh doch einfach mal im Thread unten in die Liste unterhalb von "Mögliche Antworten oder verwandte Beiträge" oder klicke auf die Zeile. Da findest du sicher etwas, das dir einen ersten Ansatz ermöglicht.
Gruß
Zitat von @lordofremixes:
Stimmt, kein Gruß, sorry !
HALLO ERSTMAL ZUSAMMEN! danke auch für die schnelle Antwort !
Stimmt, kein Gruß, sorry !
HALLO ERSTMAL ZUSAMMEN! danke auch für die schnelle Antwort !
- ok ok...
- Denn suchen und ersetzen - egal ob Batch oder VBS ist immer mit Nebenwirkungen verbunden und in der Steuerdatei sind ganz sicher mehrere (und ganz andere) Sonderzeichen, als nur % und $...
Auch wenn dir das nicht aufällt, beim umschreiben kann man auch etwas umschreiben, das so nicht gewollt ist und wenn die gut abgehangene Böhringer dann wegen einer Reihe "falscher" Steuerbefehle mit Karacho gegen sich selbst fährt - sei mir sicher - dann reisst dir dein Chef nicht nur den Kopf, sondern zuerst jeden Fingernagel einzln raus.
- Spreche mit deinem Chef, deinem Lieferanten und kläre ab, was das kleinste Übel ist.
Gruß
Hallo,
ich lese seit 7.45 verschiedene Threads durch.
In allen DNC Dateien gibt es außer in den ersten beiden Zeilen sonst keine $ oder % Zeichen mehr.
Habe diesen Ansatz probiert:
@echo off & setlocal
set "Textdatei=D:\Meine.TXT"
set "tempdatei=%temp%\tmp"
type nul>"%tempdatei%"
move /y "%tempdatei%" "%Textdatei%"
goto :eof
:Zeile
echo %Zeile: ABC=ABC%>>%tempdatei%
Aber das ist doch viel zu kompliziert oder nicht? Es muss doch auch mit Batch gehen.
Ich würde gern wissen (und das steht in keinem anderen Thread), wie ich die dritte Zeile (steht auch IMMER in der dritten Zeile) die N3859965 rausfiltriere , und durch N+Dateiname ersetzen kann.
Von der Logik sieht das doch so aus . Denke ich da richtig ?
1. öffne Dateiname.dnc
2. Springe zur dritten Zeile
3. entferne nur N3859961
4. ersetze durch NDateiname
5. speichere als Dateiname.dnc
Mit dem Lieferanten habe ich gestern den ganzen Tag telefoniert, er kennt keine Lösung, und an der Maschine ist es einfach nicht möglich die Datei manuell zu ändern und abzuspeichern.
Danke für die ganzen Antworten!
Gruß
ich lese seit 7.45 verschiedene Threads durch.
In allen DNC Dateien gibt es außer in den ersten beiden Zeilen sonst keine $ oder % Zeichen mehr.
Habe diesen Ansatz probiert:
@echo off & setlocal
set "Textdatei=D:\Meine.TXT"
set "tempdatei=%temp%\tmp"
type nul>"%tempdatei%"
move /y "%tempdatei%" "%Textdatei%"
goto :eof
:Zeile
echo %Zeile: ABC=ABC%>>%tempdatei%
Aber das ist doch viel zu kompliziert oder nicht? Es muss doch auch mit Batch gehen.
Ich würde gern wissen (und das steht in keinem anderen Thread), wie ich die dritte Zeile (steht auch IMMER in der dritten Zeile) die N3859965 rausfiltriere , und durch N+Dateiname ersetzen kann.
Von der Logik sieht das doch so aus . Denke ich da richtig ?
1. öffne Dateiname.dnc
2. Springe zur dritten Zeile
3. entferne nur N3859961
4. ersetze durch NDateiname
5. speichere als Dateiname.dnc
Mit dem Lieferanten habe ich gestern den ganzen Tag telefoniert, er kennt keine Lösung, und an der Maschine ist es einfach nicht möglich die Datei manuell zu ändern und abzuspeichern.
Danke für die ganzen Antworten!
Gruß
- Hüstel..
Aber das ist doch viel zu kompliziert oder nicht? Es muss doch auch mit Batch gehen.
"DAS" ist Batch, bzw. die Sprache, die cmd.exe versteht.
Ich würde außerdem grob Tippen, das das ein "echter" oder mal von Bastla inspirietes Schnippselchen ist.
Ich dachte da soll
N3859965 (SIEBKORB)
rein..... Und die Datei heisst nicht xyz (SIEBKORB)
Ich würde außerdem grob Tippen, das das ein "echter" oder mal von Bastla inspirietes Schnippselchen ist.
Wie meinst du das ^^
Aloha,
Wenn die batch imselben Verzeichnis wie .dnc-Dateien liegt, arbeitet es seine befindliche Verzeichnisebene durch, für jede auftretende .dnc-Datei und ersetzt dabei den Wert aus Zeile drei mit dem Wert aus Zeile eins.
edit Ach, der erste Wert == Dateiname, oh Mann, besser lesen, werde es gleich umbauen xD
Wenn der Wert aus Zeile 3 mehrfach vorkommt, macht das nichts, da hierbei nur der erste Fund ersetzt wird (ergo Zeile 3, da dies der erste Treffer ist).
greetz André
edit: Warum war das VBS-Erstellen eigentlich im Ablauf *grübel* ist doch sinnfrei
P.S.: @bastla ob der noch einmal hier reinguckt *grübel* immer wieder gut, deine inliner, vor allem, wenn man weiß, wo sie geschrieben stehen *gg*
@echo off & setlocal
set R=Replace.vbs
if not exist %R% >%R% echo Set fso=CreateObject("Scripting.FileSystemObject"):Set a=WScript.Arguments:T=fso.OpenTextFile(a(0)).ReadAll:fso.CreateTextFile(a(0)).Write Replace(T,a(1),a(2),1,1)
for %%s in (*.dnc) do call :Ablauf "%%s"
pause
goto :eof
:Ablauf
for /f "tokens=1 delims= " %%m in ('findstr /n "^" "%~1"^|findstr /B "3:"') do set "Alt=%%m"
set "Alt=%Alt:~2%"
cscript //nologo %R% %1 "%Alt%" "N%~n1"
goto :eofWenn die batch imselben Verzeichnis wie .dnc-Dateien liegt, arbeitet es seine befindliche Verzeichnisebene durch, für jede auftretende .dnc-Datei und ersetzt dabei den Wert aus Zeile drei mit dem Wert aus Zeile eins.
Wenn der Wert aus Zeile 3 mehrfach vorkommt, macht das nichts, da hierbei nur der erste Fund ersetzt wird (ergo Zeile 3, da dies der erste Treffer ist).
greetz André
edit: Warum war das VBS-Erstellen eigentlich im Ablauf *grübel* ist doch sinnfrei
P.S.: @bastla ob der noch einmal hier reinguckt *grübel* immer wieder gut, deine inliner, vor allem, wenn man weiß, wo sie geschrieben stehen *gg*
Hi @all,
das hier wäre meine Batch-Lösung gewesen:
Gruß
Friemler
das hier wäre meine Batch-Lösung gewesen:
@echo off & setlocal
::Quellverzeichnis
set "SrcDir=."
::Zielverzeichnis
set "DestDir=E:\Test"
::Zu verarbeitende Dateitypen
set "FileType=dnc"
::Alle Dateien des angegebenen Typs im Quellverzeichnis finden
::und im Unterprogramm ProcessFile verarbeiten
for %%f in ("%SrcDir%\*.%FileType%") do (
call :ProcessFile "%%f"
)
::Script Ende
exit /b
::Unterprogramm
:ProcessFile
::Erste Zeile der aktuellen Quelldatei einlesen
set /p "FirstLine=" < "%~1"
::Die Maschinen-Nummer (in runden Klammern eingeschlossen) extrahieren
for /f "tokens=2 delims=()" %%n in ("%FirstLine%") do (
set "MachineNo=%%n"
)
::Leere Zieldatei anlegen
type NUL > "%DestDir%\%MachineNo%.%FileType%"
::Alle Zeilen der aktuellen Quelldatei einlesen
(for /f "tokens=1* delims=:" %%l in ('findstr /n "^" "%~1"') do (
if %%l neq 3 (
rem Alle Zeilen ausser der 3. direkt in die Zieldatei schreiben
echo %%m
) else (
rem Aus der 3. Zeile die Maschinen-Nummer herausfiltern, die neue
rem Maschinen-Nummer einsetzen und alles in die Zieldatei schreiben
for /f "tokens=1* delims=0123456789" %%a in ("%%m") do (
echo %%a%MachineNo%%%b
)
)
)) >> "%DestDir%\%MachineNo%.%FileType%"
::Rücksprung ins Hauptprogramm
exit /bGruß
Friemler
HALLO,
sag mal spinnt ihr???
das ist DIE LÖSUNG. Wie hast du das so schnell hinbekommen?????
Weißt du wie ich mich gerade freu?? Echt hammer !! Aufgabenstellung genau erkannt und perfekt, durchgeführt !! Geil!!! Danke, Danke, und nochmal Danke!!
Eine Frage noch, da diese Batch Datei immer laufen sollte, sprich: Arbeiter an der Maschine schickt das Programm weg, es wird falsch (also mit dem Fehler in der dritten Zeile) an den PC geschickt.
Kann man das irgendwie einschränken, dass er nur die Dateien macht die neu reingekommen sind?
Also, dass die batch Datei den ganzen Tag läuft und er nur korrigiert, wenn er eine neue Datei reinbekommt? Sonst müsste man immer die Datei starten und sie würde 9800 dnc Dateien durchforsten.
Gruß und nochmals vielen Dank!
sag mal spinnt ihr???
das ist DIE LÖSUNG. Wie hast du das so schnell hinbekommen?????
Weißt du wie ich mich gerade freu?? Echt hammer !! Aufgabenstellung genau erkannt und perfekt, durchgeführt !! Geil!!! Danke, Danke, und nochmal Danke!!
Eine Frage noch, da diese Batch Datei immer laufen sollte, sprich: Arbeiter an der Maschine schickt das Programm weg, es wird falsch (also mit dem Fehler in der dritten Zeile) an den PC geschickt.
Kann man das irgendwie einschränken, dass er nur die Dateien macht die neu reingekommen sind?
Also, dass die batch Datei den ganzen Tag läuft und er nur korrigiert, wenn er eine neue Datei reinbekommt? Sonst müsste man immer die Datei starten und sie würde 9800 dnc Dateien durchforsten.
Gruß und nochmals vielen Dank!
Hallo,
danke für deine Hilfe.
Wenn ich dieses Programm ausführe, sind danach alle dnc Dateien leer. Vielleicht habe ich was falsch gemacht. Das Output Verzeichnis habe ich natürlich geändert ?
danke für deine Hilfe.
Wenn ich dieses Programm ausführe, sind danach alle dnc Dateien leer. Vielleicht habe ich was falsch gemacht. Das Output Verzeichnis habe ich natürlich geändert ?
Hallo lordofremixes,
das Input- und das Outputverzeichnis müssen verschieden sein. Das war auch meine Absicht, damit die Originaldateien nicht überschrieben werden.
Zu Deiner Frage mit dem Überwachen des Verzeichnisses auf neue Dateien: Wenn Du die Programmdateien einmalig änderst, warum ist es dann immer noch möglich, dass ein Arbeiter an einer Maschine eine fehlerhafte Version hat? Ich habe Dein Eröffnungsposting so verstanden, dass die Programme ab sofort über das Netzwerk geladen werden, eben aus dem Verzeichnis mit den korrigierten Versionen.
Gruß
Friemler
das Input- und das Outputverzeichnis müssen verschieden sein. Das war auch meine Absicht, damit die Originaldateien nicht überschrieben werden.
Zu Deiner Frage mit dem Überwachen des Verzeichnisses auf neue Dateien: Wenn Du die Programmdateien einmalig änderst, warum ist es dann immer noch möglich, dass ein Arbeiter an einer Maschine eine fehlerhafte Version hat? Ich habe Dein Eröffnungsposting so verstanden, dass die Programme ab sofort über das Netzwerk geladen werden, eben aus dem Verzeichnis mit den korrigierten Versionen.
Gruß
Friemler
nevermind, ich blick schon gar nicht mehr, wer worauf wie antwortet (gleich gibt's Mittag)
Zitat von @lordofremixes:
Also, dass die batch Datei den ganzen Tag läuft und er nur korrigiert, wenn er eine neue Datei reinbekommt? Sonst müsste man immer die Datei starten und sie würde 9800 dnc Dateien durchforsten.
Also, dass die batch Datei den ganzen Tag läuft und er nur korrigiert, wenn er eine neue Datei reinbekommt? Sonst müsste man immer die Datei starten und sie würde 9800 dnc Dateien durchforsten.
Hm, die Frage taucht öfter vor, mir will nur keine schnelle Lösung einfallen, irgendwo im Forum muss dazu schon etwas existieren, ich guck erst nach dem Mittagessen wieder rein
Am Einfachsten wäre es, alle Dateien nach der Bearbeitung zu verschieben, sprich zwei Verzeichnisse zu haben, Eingang und Ausgang, somit wird nur Eingang überprüft (batch im Task/Aufgabenplanung) und bearbeitet und in Ausgang liegen die fertigen Dateien.
greetz André
Nein, vielleicht hab ich mich da ein wenig umständlich ausgedrückt.
Das Input und Outputverzeichnis sind das selbe. Es ging darum, wenn er ein bestehendes Maschinenprogramm läd und daran was ändert (zum Beispiel nur die Länge), muss er dieses Programm ja unter einer anderen Zeichnungsnummer abspeichern. Das klappt so weit auch, die neue Zeichnungsnummer wird unter dem neuen Dateiname(=neue Zeichnungsnummer, da z.B. Länge geändert)abgespeichert. Nur die dritte Zeile, wird dann trotzdem noch unter der untersprünglichen Zeichnungsnummer abgespeichert. Das kann man an der Maschine manuell nicht ändern und wenn ich das neue Programm dann nochmal einlsen möchte, meckert die Maschine , dass es so ein Programm schon gibt.
Das Input und Outputverzeichnis sind das selbe. Es ging darum, wenn er ein bestehendes Maschinenprogramm läd und daran was ändert (zum Beispiel nur die Länge), muss er dieses Programm ja unter einer anderen Zeichnungsnummer abspeichern. Das klappt so weit auch, die neue Zeichnungsnummer wird unter dem neuen Dateiname(=neue Zeichnungsnummer, da z.B. Länge geändert)abgespeichert. Nur die dritte Zeile, wird dann trotzdem noch unter der untersprünglichen Zeichnungsnummer abgespeichert. Das kann man an der Maschine manuell nicht ändern und wenn ich das neue Programm dann nochmal einlsen möchte, meckert die Maschine , dass es so ein Programm schon gibt.
Ok ,das wäre dann wirklich Ultima!!
Wünsch dir en guten Appetit!!
Gruß
Wünsch dir en guten Appetit!!
Gruß
[OT]
Moin LordofPürierstab,
willkommen im Forum.
Geht mich ja nix an, aber...
Da kannst hier im Forum fragen, wen du willst - ich achte ja schon sehr auf die Einhaltung der Gender(und Genderinnen)-Richtlinien.
Aber selbst ich bin bis heute total gedankenlos darüber hinweggegangen, dass Monate auf diesem Planeten immer nur einen Ultimo haben und keine Ultima.
Ich werde in Zukunft mehr auf meine Formulierungen achten.
Das ist mir am heutigen Ultimo bzw. der heutigen Ultima klargeworden.
Grüße
Biber
[/OT]
Moin LordofPürierstab,
willkommen im Forum.
Geht mich ja nix an, aber...
Da kannst hier im Forum fragen, wen du willst - ich achte ja schon sehr auf die Einhaltung der Gender(und Genderinnen)-Richtlinien.
Aber selbst ich bin bis heute total gedankenlos darüber hinweggegangen, dass Monate auf diesem Planeten immer nur einen Ultimo haben und keine Ultima.
Ich werde in Zukunft mehr auf meine Formulierungen achten.
Das ist mir am heutigen Ultimo bzw. der heutigen Ultima klargeworden.
Grüße
Biber
[/OT]
Es ist leider nicht möglich, zwei verschiedene Verzeichnisse anzulegen, da das alte ftp Programm, das den Dateitransfer regelt, nur auf ein Verzeichnis zugreifen kann 
(habe grad noch mal geschaut).
(habe grad noch mal geschaut).
[OT]
Moin, Biber
sein nachsichtig, er hat doch nur das ratio unterschlagen.
Gruß
[/OT]
Moin, Biber
sein nachsichtig, er hat doch nur das ratio unterschlagen.
Gruß
[/OT]
danke für den hinweis,
liegt glaub ich daran dass ich früher zu viel ultima online gezockt hab ;)
liegt glaub ich daran dass ich früher zu viel ultima online gezockt hab ;)
Ein bisschen Eigeninitiative könntest du ja auch entwickeln. Dann durchsuchst du halt nur die Dateien, deren Archivbit gesetzt ist und setzt nach der Änderung durch die Batchdatei gleich das Archivbit wieder zurück.
Aber nein, hier wird ja immer alles brühwarm aufbereitet und vorgekaut, damit sich niemand selbst Mühe zu geben braucht. Zum Kotzen .......
Aber nein, hier wird ja immer alles brühwarm aufbereitet und vorgekaut, damit sich niemand selbst Mühe zu geben braucht. Zum Kotzen .......
Hallo lordofremixes,
schau Dir mal diesen Thread an, dort habe ich einen Installer für einen WMI Permanent Event Consumer veröffentlicht, der ein Verzeichnis auf neu erstellte Dateien eines bestimmten Typs überwacht und jedesmal ein VBScript aufruft, wenn das passiert. Das im obigen Thread aufgerufene Script ist für Dich natürlich untauglich. Dazu müsste Skyemugen (?) eine Pure-VBScript Version seiner Lösung erstellen. Außerdem müssen im Installer noch 3 Zeilen angepasst werden. Ich habe heute zu wenig Zeit, um mich darum zu kümmern. Meine Erklärungen in obigem Thread sollten aber weiterhelfen.
Gruß
Friemler
schau Dir mal diesen Thread an, dort habe ich einen Installer für einen WMI Permanent Event Consumer veröffentlicht, der ein Verzeichnis auf neu erstellte Dateien eines bestimmten Typs überwacht und jedesmal ein VBScript aufruft, wenn das passiert. Das im obigen Thread aufgerufene Script ist für Dich natürlich untauglich. Dazu müsste Skyemugen (?) eine Pure-VBScript Version seiner Lösung erstellen. Außerdem müssen im Installer noch 3 Zeilen angepasst werden. Ich habe heute zu wenig Zeit, um mich darum zu kümmern. Meine Erklärungen in obigem Thread sollten aber weiterhelfen.
Gruß
Friemler
Hallo Friemler,
die Lösung von Skyemugen hat bei mir aber ausgezeichnet funktioniert. Habe schon einige Dateien , die falsch waren, getestet, und alle sind richtig umgewandelt.
Wo liegt bei seinem Script der Fehler und was ist Pure-VB-Script?
Habe den WMI Permanent Event Consumer angeschaut, muss aber ehrlich gestehen, dass ich nicht weiß wie ich das für meinen Fall bezogen einstellen muss.
Du hast geschrieben dass man nur die Zeilen 13 - 15 anpassen muss. Zeile 13 ist unklar, ich vermute aber dass hier der Aufruf des Scripts rein kommt.(z.B. das Skyemugen Script, wenn es richtig ist)
Zeile 14 ist klar, das Verzeichnis in dem sich die dnc Dateien befinden.
Zeile 15 ist auch klar.
wie komme ich überhaupt in diese Zeilen rein?
13.
strEventDescription = "New Textfile Creation"
14.
strMonitorFileSpec = "E:\Test\*.TIFF"
15.
strPollingIntervall = "1"
die Lösung von Skyemugen hat bei mir aber ausgezeichnet funktioniert. Habe schon einige Dateien , die falsch waren, getestet, und alle sind richtig umgewandelt.
Wo liegt bei seinem Script der Fehler und was ist Pure-VB-Script?
Habe den WMI Permanent Event Consumer angeschaut, muss aber ehrlich gestehen, dass ich nicht weiß wie ich das für meinen Fall bezogen einstellen muss.
Du hast geschrieben dass man nur die Zeilen 13 - 15 anpassen muss. Zeile 13 ist unklar, ich vermute aber dass hier der Aufruf des Scripts rein kommt.(z.B. das Skyemugen Script, wenn es richtig ist)
Zeile 14 ist klar, das Verzeichnis in dem sich die dnc Dateien befinden.
Zeile 15 ist auch klar.
wie komme ich überhaupt in diese Zeilen rein?
13.
strEventDescription = "New Textfile Creation"
14.
strMonitorFileSpec = "E:\Test\*.TIFF"
15.
strPollingIntervall = "1"
Aloha Kaputtnick,
der Gedanke ist wirklich nicht dumm, daran hatte ich selbst nicht gedacht.
Default müsste das Attribut ja vorhanden sein, sodass das Skript in Zeile 05 in
geändert und nach Zeile 13 (vor 14) dann
hinzugefügt werden müsste.
greetz André
P.S.:@Friemler
joke one das würde ich wenn dann bastla oder dir überlassen *gg*
der Gedanke ist wirklich nicht dumm, daran hatte ich selbst nicht gedacht.
Default müsste das Attribut ja vorhanden sein, sodass das Skript in Zeile 05 in
for /f "delims=" %%s in ('dir /b /AA *.dnc') do call :Ablauf "%%s"attrib -A %1greetz André
P.S.:@Friemler
Dazu müsste Skyemugen (?) eine Pure-VBScript Version seiner Lösung erstellen
Nice das würde ich wenn dann bastla oder dir überlassen *gg*
Aloha,
Friemler sagte nicht, dass ein Fehler vorhanden sei, sondern das Skript für seine erweiterte Lösung
Pure-VB-Script ist ein komplettes .vbs-Skript also keine Batch mehr (die wie hier einen .vbs-inliner nutzt).
greetz André
Friemler sagte nicht, dass ein Fehler vorhanden sei, sondern das Skript für seine erweiterte Lösung
untauglich
ist, sprich: Nicht im Zusammenspiel verwendet werden kann (außer man baut noch mehr rum).Pure-VB-Script ist ein komplettes .vbs-Skript also keine Batch mehr (die wie hier einen .vbs-inliner nutzt).
greetz André
Hallo lordofremixes,
dass die Lösung von Skyemugen nicht funktioniert habe ich nie behauptet. Im Gegenteil, wenn ich sie mir anschaue, wird sie ganz sicher funktionieren. Sie ist aber in Batchscript geschrieben und enthält nur einen Schnipsel VBScript zum Austausch der Maschinen-Nummer. Der Event Consumer aus dem genannten Thread kann aber nur VBScript-Dateien starten, das umzubauen wäre zu viel Aufwand.
In Zeile 13 wird nicht das Script eingetragen, das aufgerufen werden soll. Hier wird ein String eingetragen, unter dem der Permanent Event Consumer und der zugehörige Filter bei WMI registriert wird. Aus dem String ergibt sich außerdem der Name des VBScripts, das beim Auslösen aufgerufen wird (die Leerzeichen in dem String werden entfernt und zusätzlich "EventHandler.vbs" angehängt).
Ließ dir bitte in dem Thread auch dieses Posting gründlich durch, dort ist alles nochmal genau erklärt.
Was meinst Du mit
Gruß
Friemler
dass die Lösung von Skyemugen nicht funktioniert habe ich nie behauptet. Im Gegenteil, wenn ich sie mir anschaue, wird sie ganz sicher funktionieren. Sie ist aber in Batchscript geschrieben und enthält nur einen Schnipsel VBScript zum Austausch der Maschinen-Nummer. Der Event Consumer aus dem genannten Thread kann aber nur VBScript-Dateien starten, das umzubauen wäre zu viel Aufwand.
In Zeile 13 wird nicht das Script eingetragen, das aufgerufen werden soll. Hier wird ein String eingetragen, unter dem der Permanent Event Consumer und der zugehörige Filter bei WMI registriert wird. Aus dem String ergibt sich außerdem der Name des VBScripts, das beim Auslösen aufgerufen wird (die Leerzeichen in dem String werden entfernt und zusätzlich "EventHandler.vbs" angehängt).
Ließ dir bitte in dem Thread auch dieses Posting gründlich durch, dort ist alles nochmal genau erklärt.
Was meinst Du mit
Gruß
Friemler
ahh, ok , verstanden..
habe schon versucht, Friemlier s Lösung mit deiner Batch anzupassen , aber geht ja nicht, zeile 13 muss ja die vbs Datei drin stehn . *lichtaufgeh*
habe schon versucht, Friemlier s Lösung mit deiner Batch anzupassen , aber geht ja nicht, zeile 13 muss ja die vbs Datei drin stehn . *lichtaufgeh*
Hallo Friemler,
ja sry zu spät habe es grad gelesen und verstanden. Aber trotzdem finde ich dein Thread für andere vbs Sachen sehr, sehr hilfreich..
In Zeile 13 wird nicht das Script eingetragen, das aufgerufen werden soll. Hier wird ein String eingetragen, unter dem der Permanent Event Consumer und der zugehörige Filter bei WMI registriert wird. Aus dem String ergibt sich außerdem der Name des VBScripts, das beim Auslösen aufgerufen wird (die Leerzeichen in dem String werden entfernt und zusätzlich "EventHandler.vbs" angehängt.
Ok, verstanden. Hatte ich schon vermutet, oder steht auch in deinem Thread sry..
(bin heut einfach zu zappelig, morgen kommt der chef und irgendwie muss das mit der Batch heut noch gelöst werden)
Danke an alle die sich damit beschäftigen !!
Gruß
ja sry zu spät habe es grad gelesen und verstanden. Aber trotzdem finde ich dein Thread für andere vbs Sachen sehr, sehr hilfreich..
In Zeile 13 wird nicht das Script eingetragen, das aufgerufen werden soll. Hier wird ein String eingetragen, unter dem der Permanent Event Consumer und der zugehörige Filter bei WMI registriert wird. Aus dem String ergibt sich außerdem der Name des VBScripts, das beim Auslösen aufgerufen wird (die Leerzeichen in dem String werden entfernt und zusätzlich "EventHandler.vbs" angehängt.
Ok, verstanden. Hatte ich schon vermutet, oder steht auch in deinem Thread sry..
(bin heut einfach zu zappelig, morgen kommt der chef und irgendwie muss das mit der Batch heut noch gelöst werden)
Danke an alle die sich damit beschäftigen !!
Gruß
> ----
> wie komme ich überhaupt in diese Zeilen rein?
hat sich erledigt, dachte ich muss cscript.exe anpassen, aber das ich ja ein script von dir .> wie komme ich überhaupt in diese Zeilen rein?
Nur noch einmal als Wink mit dem Zaunpfahl, eventuell ist der Kommentar untergegangen bei der Threadstruktur
Attributsnutzung für nicht-alle-immer-wieder-durchkauen
Hatte auf Kaputtnicks Kommentar geantwortet, daher steht es jetzt mitten im Nirvana ^_^
greetz André
Hallo Skyemugen ,
ist das die Lösung, soll ich das einfügen? (mit der Attributsnutzung)?
Oder wie meinst du das grad?
gruß
ist das die Lösung, soll ich das einfügen? (mit der Attributsnutzung)?
Oder wie meinst du das grad?
gruß
Hallo lordofremixes,
ich habe doch noch Zeit gefunden, das Eventhandler Script zu schreiben. Beachte die Regeln zur Namensgebung, die im Thread mit dem Event Consumer angegeben sind.
Gruß
Friemler
ich habe doch noch Zeit gefunden, das Eventhandler Script zu schreiben. Beachte die Regeln zur Namensgebung, die im Thread mit dem Event Consumer angegeben sind.
'Eine Konstante definieren
Const ForReading = 1
'Pfad und Name der als Parameter übergebenen
'neu erstellten Datei in Variable einlesen
strFileName = WScript.Arguments(0)
'Dateisystem-Objekt erzeugen
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Dateiinhalt komplett in einen String einlesen
Set objInFile = objFSO.OpenTextFile(strFileName, ForReading, False)
strContent = objInFile.ReadAll
objInFile.Close
'Den String anhand des Zeilenumbruchs in ein Array zerlegen,
'dessen Elemente die einzelnen Zeilen enthalten.
arrContent = Split(strContent, vbCrLf)
'Objekt für Reguläre Ausdrücke erzeugen
Set objRegExp = New RegExp
'Nur den ersten Treffer zurückliefern
objRegExp.Global = False
'Suchmuster für die Maschinen-Nummer in Zeile 1 der Eingabedatei
objRegExp.Pattern = "\(([0-9]*)\)"
'Die Maschinen-Nummer extrahieren
strNewMachineNo = objRegExp.Execute(arrContent(0))(0).SubMatches(0)
'Suchmuster für den Aufbau der kompletten Zeile 3
objRegExp.Pattern = "(N)([0-9]*)( .*)"
'Maschinen-Nummer austauschen
arrContent(2) = objRegExp.Replace(arrContent(2), "$1" & strNewMachineNo & "$3")
'Aus dem Array wieder einen String machen, die einzelnen
'Arrayelemente durch Zeilenumbrüche voneinander trennen
'und den String in die ursprüngliche Datei schreiben.
'Der alte Inhalt wird dabei überschrieben.
Set objOutFile = objFSO.CreateTextFile(strFileName, True)
objOutFile.Write Join(arrContent, vbCrLf)
objOutFile.CloseGruß
Friemler
Aloha,
das wäre durchaus eine mögliche Lösung, denn da bei der Bearbeitung das Archivattribut am Ende gelöscht wird, wird es beim nächsten Durchgang nicht mehr mit aufgelistet, also nicht erneut durchgearbeitet - wenn man die batch dann als Aufgabe / Task aktiviert im X-Minuten-Zyklus, hätte man eine stetige (wenn auch natürlich etwas verzögerte) Abarbeitung der gesamten Situation
Oder du nimmst Friemlers Durcharbeitung ^_^
greetz André
das wäre durchaus eine mögliche Lösung, denn da bei der Bearbeitung das Archivattribut am Ende gelöscht wird, wird es beim nächsten Durchgang nicht mehr mit aufgelistet, also nicht erneut durchgearbeitet - wenn man die batch dann als Aufgabe / Task aktiviert im X-Minuten-Zyklus, hätte man eine stetige (wenn auch natürlich etwas verzögerte) Abarbeitung der gesamten Situation
Oder du nimmst Friemlers Durcharbeitung ^_^
greetz André
Fallo Friemler,
wirklich super von dir. Das ist mir nochunklar?
1. Ich mach daraus jetzt eine Batch Datei? denke mal ja?
2. Diese muss im gleichen Verzeichnis wie die die dnc Dateien und das Script von skyemugen stehen?
3. in dem anderen Thread muss ich nur die Zeilen 13-15 bearbeiten, diese sind strEventDescription , strMonitorFileSpec und strPollingIntervall ?
welche sind das in diesem script?
wirklich super von dir. Das ist mir nochunklar?
1. Ich mach daraus jetzt eine Batch Datei? denke mal ja?
2. Diese muss im gleichen Verzeichnis wie die die dnc Dateien und das Script von skyemugen stehen?
3. in dem anderen Thread muss ich nur die Zeilen 13-15 bearbeiten, diese sind strEventDescription , strMonitorFileSpec und strPollingIntervall ?
welche sind das in diesem script?
Hallo Skyemugen,
leider gibt es im Taskplaner nur Täglich, wöchentlich, usw.. aber nicht minütlich.
Zu deinem Script:
Ich werde das Script von Friemler nehmen, aber wie kann ich am Ende die Zeile "Bitte eine Taste drücken" rauslöschen?
Weil sonst wenn das Script von Friemler dein Script aufruft, bleibt es ja stehen, weil man erst eine Taste drücken muss?
Gruß und Danke für alles
leider gibt es im Taskplaner nur Täglich, wöchentlich, usw.. aber nicht minütlich.
Zu deinem Script:
Ich werde das Script von Friemler nehmen, aber wie kann ich am Ende die Zeile "Bitte eine Taste drücken" rauslöschen?
Weil sonst wenn das Script von Friemler dein Script aufruft, bleibt es ja stehen, weil man erst eine Taste drücken muss?
Gruß und Danke für alles
Hallo lordofremixes,
Du machst jetzt folgendes:
Wenn nun eine DNC-Datei in dem überwachten Verzeichnis angelegt wird, wird das Eventhandler Script ausgeführt. Davon sieht man aber nichts.
Das Installer Script kannst Du jetzt löschen, es wird nicht mehr benötigt.
Gruß
Friemler
Du machst jetzt folgendes:
- Den Installer für den Permanent Event Consumer z.B. unter
Installer.vbsspeichern. - Den Installer für den Permanent Event Consumer anpassen. Z.B.
strEventDescription = "New DNC File Creation"strMonitorFileSpec = "Pfad zum Verzeichnis, das überwacht werden soll\*.DNC"strPollingIntervall = "1"- Das obige Eventhandler Script in diesem Fall unter dem Namen
NewDNCFileCreationEventHandler.vbsspeichern. - Die beiden Scripte in ein Verzeichnis kopieren, am besten in ein neu erstelltes Unterverzeichnis von
C:\Programme. - Auf einer Windows-Version ab Vista ein Konsolenfenster (CMD.exe) mit
Rechtsklick -> Als Administrator ausführenöffnen. Unter XP/Server2003 genügt es, CMD.exe einfach zu starten. In beiden Fällen mußt Du aber unter einem Administrator-Konto angemeldet sein. - Mit
CDin das Verzeichnis wechseln, in dem Du die Scripte abgelegt hast. - Dann folgenden Befehl eingeben:
cscript /nologo Installer.vbs. Es erscheint bei fehlerfreier Ausführung keine Meldung auf dem Schirm.
Wenn nun eine DNC-Datei in dem überwachten Verzeichnis angelegt wird, wird das Eventhandler Script ausgeführt. Davon sieht man aber nichts.
Das Installer Script kannst Du jetzt löschen, es wird nicht mehr benötigt.
Gruß
Friemler
Aloha,
1. Friemler arbeitet nicht mit meinem Skript (zusammen)
2. entferne einfach den Befehl
greetz André
P.S.: Mehrfachzeitplan lautet im Taskplaner das Stichwort, da muss man sich schon arbeit machen *gg* - man kann natürlich auch die batch dauerlaufen lassen, indem man sie immer wieder zum Anfang springen lässt und nie aufhört (evtl. noch mit ping localhost oder sleep.exe)
1. Friemler arbeitet nicht mit meinem Skript (zusammen)
2. entferne einfach den Befehl
pause ...greetz André
P.S.: Mehrfachzeitplan lautet im Taskplaner das Stichwort, da muss man sich schon arbeit machen *gg* - man kann natürlich auch die batch dauerlaufen lassen, indem man sie immer wieder zum Anfang springen lässt und nie aufhört (evtl. noch mit ping localhost oder sleep.exe)
das wäre ja auch eine super idee, wie kann man sie wieder zum Anfang springen lassen ?
und wie das dann mit der sleep funktion?
wo muss ich diese einbinden?
wo muss ich diese einbinden?
Hallo lordofremixes,
die Idee, im Hintergrund ständig ein Batchscript laufen zu lassen, um das Verzeichnis zu überwachen, ist keine gute. Das erzeugt eine immens hohe Prozessorlast (ca. 60%). Du hast von mir einen funktionierenden Vorschlag mit ausführlicher Anleitung (siehe hier). Ich rate Dir, diese auch zu nutzen.
Gruß
Friemler
die Idee, im Hintergrund ständig ein Batchscript laufen zu lassen, um das Verzeichnis zu überwachen, ist keine gute. Das erzeugt eine immens hohe Prozessorlast (ca. 60%). Du hast von mir einen funktionierenden Vorschlag mit ausführlicher Anleitung (siehe hier). Ich rate Dir, diese auch zu nutzen.
Gruß
Friemler
Aloha Friemler,
wo du gerade davon sprichst:
Wäre der Auslastungsunterschied zwischen der dauerlaufenden batch mit sleep.exe deutlich höher als ein dauerlaufendes VBSkript mit sleep-Befehl, der die Batch zyklisch ausführt?
greetz André
wo du gerade davon sprichst:
Wäre der Auslastungsunterschied zwischen der dauerlaufenden batch mit sleep.exe deutlich höher als ein dauerlaufendes VBSkript mit sleep-Befehl, der die Batch zyklisch ausführt?
greetz André
Hallo Friemler,
Die Lösung ist nahezu perfekt, im Gegensatz dazu hab ich kaum Prozessorleistung.
Wie verhält es sich bei dieser Lösung nach einem Neustart?
Der User , bei dem diese Lösung laufen soll meldet sich immer als Sammeluser an (ein CNC - Benutzername), ist aber kein Administrator. (welche Datei müsste ich also in den Autostart ordner?
Gruß
Die Lösung ist nahezu perfekt, im Gegensatz dazu hab ich kaum Prozessorleistung.
Wie verhält es sich bei dieser Lösung nach einem Neustart?
Der User , bei dem diese Lösung laufen soll meldet sich immer als Sammeluser an (ein CNC - Benutzername), ist aber kein Administrator. (welche Datei müsste ich also in den Autostart ordner?
Gruß
Hallo lordofremixes,
Du musst nichts in den Autostartordner packen. Der Event Consumer ist Permanent installiert, die Registrierung bleibt auch nach einem Reboot erhalten. Das ganze läuft jetzt einfach bis zur nächsten Neuinstallation. Um Benutzerrechte brauchst Du Dir auch keine Gedanken zu machen. Das Eventhandler Script wird unter dem SYSTEM-Konto ausgeführt, der angemeldete Benutzer hat damit nichts zu tun.
Gruß
Friemler
Du musst nichts in den Autostartordner packen. Der Event Consumer ist Permanent installiert, die Registrierung bleibt auch nach einem Reboot erhalten. Das ganze läuft jetzt einfach bis zur nächsten Neuinstallation. Um Benutzerrechte brauchst Du Dir auch keine Gedanken zu machen. Das Eventhandler Script wird unter dem SYSTEM-Konto ausgeführt, der angemeldete Benutzer hat damit nichts zu tun.
Gruß
Friemler
Hi André,
ob SLEEP die Prozessorlast vermindert habe ich noch nicht ausprobiert, könnte aber gut sein. Ich löse sowas mittlerweile immer mit den Permanent Event Consumern, weil man alles möglich im System "monitoren" kann, je nach Konfiguration des Event Filters. Die von mir genannten 60% Prozessorauslastung basieren auf mehreren Erfahrungen vor längerer Zeit.
Gruß
Friemler
ob SLEEP die Prozessorlast vermindert habe ich noch nicht ausprobiert, könnte aber gut sein. Ich löse sowas mittlerweile immer mit den Permanent Event Consumern, weil man alles möglich im System "monitoren" kann, je nach Konfiguration des Event Filters. Die von mir genannten 60% Prozessorauslastung basieren auf mehreren Erfahrungen vor längerer Zeit.
Gruß
Friemler
Das wäre ja super. Hört sich alles sooo gut an , genau wie ichs bräuchte
Habe alles gemacht
Beim starten cscript /nologo Installer.vbs in cmd.exe kommt aber folgender Fehler :
C:\Script\Installer.vbs(112, 22) Kompilierungsfehler in Microsoft VBScript: Anwe
isung erwartet
??
Habe alles gemacht
Beim starten cscript /nologo Installer.vbs in cmd.exe kommt aber folgender Fehler :
C:\Script\Installer.vbs(112, 22) Kompilierungsfehler in Microsoft VBScript: Anwe
isung erwartet
??
[OT]
Hmm ja, ich reduziere mal die beiden Vor-Kommentare auf
Was soll denn der Azubi von uns alten Zauseln denken?
[/OT]
Hmm ja, ich reduziere mal die beiden Vor-Kommentare auf
[Kaputtnick] "Guten Tag, Herr Dr. Friemler!"
[Friemler] "Ihnen ebenfalls, Herr Professor von Caput Nique."
[Friemler] "Ihnen ebenfalls, Herr Professor von Caput Nique."
Was soll denn der Azubi von uns alten Zauseln denken?
[/OT]
[OT]
Hallo Biber,
entschuldige meine Entgleisung und danke fürs Löschen. Aber beim Lesen der meisten Kommentare von Kaputtnick habe ich schon des öfteren eine Schwellung am Hals verspürt .
Das hat er ja schon hier kundgetan.
Gruß
Friemler
[/OT]
Hallo Biber,
entschuldige meine Entgleisung und danke fürs Löschen. Aber beim Lesen der meisten Kommentare von Kaputtnick habe ich schon des öfteren eine Schwellung am Hals verspürt
.Das hat er ja schon hier kundgetan.
Gruß
Friemler
[/OT]
Hallo lordofremixes,
was steht denn in Deiner Zeile 112? Im Original steht
Poste am besten Das ganze Installer Script.
Gruß
Friemler
was steht denn in Deiner Zeile 112? Im Original steht
Set WshShell = Nothing
Poste am besten Das ganze Installer Script.
Gruß
Friemler
ALSO FÜR DIE GANZE HILFE ERSTMAL VIELEN DANK!
@friemer : TOLLE SACHE, wenn du noch diesen kleiner fehler korrigieren könntest ? schick ich dir mein pc samt bildschirm ;)
Gruß
@friemer : TOLLE SACHE, wenn du noch diesen kleiner fehler korrigieren könntest ? schick ich dir mein pc samt bildschirm ;)
Gruß
[Edit Biber]
inhalt dieses Kommentars gelöscht -- hier war eine fehlerhaft gecopy&pastete Friemler-Schnipsel-Version, die sich weiter unten auch nooch mehrmals findet.
Die fehlerhafte Formatierung führte zu etwas unleserlichen Folgekommentaren - siehe unten.
[/Edit Biber]
inhalt dieses Kommentars gelöscht -- hier war eine fehlerhaft gecopy&pastete Friemler-Schnipsel-Version, die sich weiter unten auch nooch mehrmals findet.
Die fehlerhafte Formatierung führte zu etwas unleserlichen Folgekommentaren - siehe unten.
[/Edit Biber]
blöd, jetzt siehst du ja garnicht wol zeile 112 ist ? habe es mit phase geöffnet, alle zeilen nummern rausgelöscht und als installer.vbs gespeichert.
Hallo lordofremixes,
bitte, bitte, setze den geposteten Code in die ! Das geht auch nachträglich über "Beitrag bearbeiten". So macht das wirklich keinen Spaß Dir zu helfen. Und man sieht dann auch die Zeilennummern.
Warum ist hier plötzlich alles in Fettschrift?
Gruß
Friemler
bitte, bitte, setze den geposteten Code in die ! Das geht auch nachträglich über "Beitrag bearbeiten". So macht das wirklich keinen Spaß Dir zu helfen. Und man sieht dann auch die Zeilennummern.
Warum ist hier plötzlich alles in Fettschrift?
Gruß
Friemler
Hallo lordofremixes,
um den Code zu kopieren benutze den Link "Quelltext" am oberen rechten Rand der Box mit dem Code. Dann brauchst Du auch keine Zeilennummern entfernen und es schleichen sich keine Fehler ein.
Gruß
Friemler
um den Code zu kopieren benutze den Link "Quelltext" am oberen rechten Rand der Box mit dem Code. Dann brauchst Du auch keine Zeilennummern entfernen und es schleichen sich keine Fehler ein.
Gruß
Friemler
Zitat von @lordofremixes:
habe es mit phase geöffnet, alle zeilen nummern rausgelöscht und als installer.vbs gespeichert.
habe es mit phase geöffnet, alle zeilen nummern rausgelöscht und als installer.vbs gespeichert.
Zeilennummern löschen ... guck mal rechts oben bei Codeblöcken
da gibt es:
Quelltext | in den Speicher kopieren | drucken ...
und zwar ohne Zeilennummern ...
greetz André
P.S.: Die ständigen mehrfachpostings sind Horror, ernsthaft, gewöhne dir bitte ein edit oder horizontale Linien (siehe Formatierungshilfe - ist in roter Schrift über einem Kommentarerstellungsfenster zu sehen) zu nutzen, das tut uns allen gut und auch der Übersicht, die hier eh schon verloren ist.
edit: too late (wenn man mal wieder abgelenkt wird, har har)
' ===========================================
' Run this script with administrative rights!
' ===========================================
'/////////////////////////////// Configure script's job ///////////////////////////////
'******************** Customize according to your specific needs **********************
'------------------ Set event description and job related variables -------------------
strEventDescription = "New Textfile Creation"
strMonitorFileSpec = "C:\Script\DNC\*.dnc"
strPollingIntervall = "1"
'---------------- Prepare Monitor Filespec for WMI Event Filter query -----------------
Set FSO = CreateObject("Scripting.FileSystemObject")
strDrive = FSO.GetDriveName(strMonitorFileSpec)
strFileName = FSO.GetFileName(strMonitorFileSpec)
intPathBegin = Len(strDrive) + 1
intPathLen = Len(strMonitorFileSpec) - Len(StrDrive) - Len(strFileName)
strPath = Replace(Mid(strMonitorFileSpec, intPathBegin, intPathLen), "\", "\\")
strExtension = FSO.GetExtensionName(strMonitorFileSpec)
Set FSO = Nothing
'----------------------------- Set WMI Event Filter query -----------------------------
strEventFilterQuery = "SELECT * FROM __InstanceCreationEvent" _
& " WITHIN " & strPollingIntervall _
& " WHERE TargetInstance ISA 'CIM_DataFile'" _
& " AND TargetInstance.Drive='" & strDrive & "'" _
& " AND TargetInstance.Path='" & strPath & "'" _
& " AND TargetInstance.Extension='" & strExtension & "'"
'-------------- Set WMI Namespace where the monitored event will occure ---------------
strEventNamespace = "root\Cimv2"
'----------- Set parameters which should be passed to Event Handler script ------------
strEventHandlerParam = """" _
& "%TargetInstance.Drive%" _
& "%TargetInstance.Path%" _
& "%TargetInstance.FileName%" _
& "." _
& "%TargetInstance.Extension%" _
& """"
'**************************************************************************************
'//////////////////////////////// Set script variables ////////////////////////////////
'- Set Event Handler path, quote it and prepare it and its working directory for WMI --
Set FSO = CreateObject("Scripting.FileSystemObject")
strEventHandlerWD = Replace(FSO.GetParentFolderName(WScript.ScriptFullName), "\", "\\")
strEventHandler = Replace(strEventDescription, " ", "") & "EventHandler.vbs"
strEventHandler = """" & strEventHandlerWD & "\\" & strEventHandler & """"
Set FSO = Nothing
'----------------------- Test for existing Event Handler script -----------------------
Set FSO = CreateObject("Scripting.FileSystemObject")
If Not FSO.FileExists(Replace(Replace(strEventHandler, "\\", "\"), """", "")) Then
MsgBox "The Event Handler script " & vbCRLF _
& Replace(strEventHandler, "\\", "\") & vbCRLF _
& "does not exist. Please create it.", _
vbExclamation, _
"Missing Event Handler script"
End If
Set FSO = Nothing
'-------------------------- Build parameters for CScript.exe --------------------------
strCScriptParam = strEventHandler & " " & strEventHandlerParam
'---------------- Get path of Windows Directory and prepare it for WMI ----------------
Set WshShell = WScript.CreateObject("WScript.Shell")
strWinDir = Replace(WshShell.ExpandEnvironmentStrings("%SystemRoot%"), "\", "\\")
Set WshShell = Nothing
'---------------------- Set path of CScript.exe prepared for WMI ----------------------
setCScriptPath = strWinDir & "\\System32\\cscript.exe"
'////////////////////////// Install permanent Event Consumer //////////////////////////
'------- Get WMI Scripting API object (SWbemServices), Namespace: Subscription --------
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!" _
& "\\" & strComputer & "\root\Subscription")
'------------------------------ Create the Event Filter -------------------------------
Set objFilterClass = objWMIService.Get("__EventFilter")
Set objFilter = objFilterClass.SpawnInstance_()
objFilter.Name = strEventDescription & " Event Filter"
objFilter.EventNamespace = strEventNamespace
objFilter.QueryLanguage = "WQL"
objFilter.Query = strEventFilterQuery
Set EventFilterPath = objFilter.Put_()
'----------------------- Create the Commandline Event Consumer ------------------------
Set objEventConsumerClass = objWMIService.Get("CommandLineEventConsumer")
Set objEventConsumer = objEventConsumerClass.SpawnInstance_()
objEventConsumer.Name = strEventDescription & " Commandline Event Consumer"
objEventConsumer.CommandLineTemplate = setCScriptPath & " " & strCScriptParam
objEventConsumer.ExecutablePath = setCScriptPath
objEventConsumer.WorkingDirectory = strEventHandlerWD
objEventConsumer.ShowWindowCommand = 0
Set CommandlineEventConsumerPath = objEventConsumer.Put_()
'------------------ Bind Event Filter to Commandline Event Consumer -------------------
Set objBindingClass = objWMIService.Get("__FilterToConsumerBinding")
Set objBinding = objBindingClass.SpawnInstance_()
objBinding.Filter = EventFilterPath
objBinding.Consumer = CommandlineEventConsumerPath
objBinding.Put_()[Edit Biber] Codeformatierung nachgetragen 31.8.11 19:15h [/Edit]
strEventDescription = "New Textfile Creation"
steht natürlich "New DNCfile Creation"
steht natürlich "New DNCfile Creation"
Hallo lordofremixes,
bitte die benutzen.
Gruß
Friemler
bitte die benutzen.
Gruß
Friemler
MACH DIR BLOß KEINE ARBEIT MEHR !!
ES FUNKTIONIERT HERVORRAGEND !!!
DU GLAUBST GARNICHT WIE FROH ICH BIN!! MEINE FRESSE !!
ES FUNKTIONIERT HERVORRAGEND !!!
DU GLAUBST GARNICHT WIE FROH ICH BIN!! MEINE FRESSE !!
AM LIEBSTEN WÜRD ICH DIE GANZE SEITE MIT DANKE POSTS VOLL SCHREIBEN
Schön, dann kannst Du den Thread ja noch als gelöst markieren.
Und von wegen "Seite mit Danke-Postings vollschreiben" - Lass mal
Und von wegen "Seite mit Danke-Postings vollschreiben" - Lass mal
Hallo Friemler,
kleines Problemchen noch.
An meinem PC ging das wunderbar, hab das jetzt auf dem PC wo dann in Echtzeit die DNC Dateien reinkommen ausprobiert, als Admin installiert , vbs Datei angepasst (Ordner), aber er ändert die neuen Dateien nicht.
Liegt das vielleicht daran dass er in 1 sec. nicht alle 9800 Dateien überprüfen kann?
Wo kann mein Fehler liegen?
kleines Problemchen noch.
An meinem PC ging das wunderbar, hab das jetzt auf dem PC wo dann in Echtzeit die DNC Dateien reinkommen ausprobiert, als Admin installiert , vbs Datei angepasst (Ordner), aber er ändert die neuen Dateien nicht.
Liegt das vielleicht daran dass er in 1 sec. nicht alle 9800 Dateien überprüfen kann?
Wo kann mein Fehler liegen?
Hallo lordofremixes,
es werden nicht jedesmal alle Dateien in dem Verzeichnis geprüft. Nur wenn eine Datei neu erstellt wurde, wird das Eventhandler Script aufgerufen, was dann genau diese Datei bearbeitet.
Ich kann Dir jetzt nur noch raten, die Anleitung nochmal genau durchzugehen. Das Eventhandler Script muss in dem Verzeichnis bleiben, in das Du es zusammen mit dem Installer Script kopiert hast, bevor Du den Installer gestartet hast.
Außerdem müsste Dein Testrechner jetzt noch "gesäubert" werden. Sonst hast Du für alle Zeiten einen Permanent Event Consumer laufen, der ein nicht existierendes Verzeichnis überwacht und/oder das auszuführende Eventhandler Script nicht mehr findet (hast Du ja wahrscheinlich beides gelöscht). Melde Dich deswegen nochmal.
[EDIT]
Ich glaube die Fettschrift hier ist Deine Schuld und durch das erste Posting des Event Consumer Codes entstanden (irgendwelche HTML-Tags reingerutscht?). Schau da bei Gelegenheit noch mal mit der Bearbeiten-Funktion drüber.
[/EDIT]
Gruß
Friemler
es werden nicht jedesmal alle Dateien in dem Verzeichnis geprüft. Nur wenn eine Datei neu erstellt wurde, wird das Eventhandler Script aufgerufen, was dann genau diese Datei bearbeitet.
Ich kann Dir jetzt nur noch raten, die Anleitung nochmal genau durchzugehen. Das Eventhandler Script muss in dem Verzeichnis bleiben, in das Du es zusammen mit dem Installer Script kopiert hast, bevor Du den Installer gestartet hast.
Außerdem müsste Dein Testrechner jetzt noch "gesäubert" werden. Sonst hast Du für alle Zeiten einen Permanent Event Consumer laufen, der ein nicht existierendes Verzeichnis überwacht und/oder das auszuführende Eventhandler Script nicht mehr findet (hast Du ja wahrscheinlich beides gelöscht). Melde Dich deswegen nochmal.
[EDIT]
Ich glaube die Fettschrift hier ist Deine Schuld
und durch das erste Posting des Event Consumer Codes entstanden (irgendwelche HTML-Tags reingerutscht?). Schau da bei Gelegenheit noch mal mit der Bearbeiten-Funktion drüber.[/EDIT]
Gruß
Friemler
Hallo Friemler,
ich habe es ganz genau nach deiner Anleitung hier an diesem PC gemacht. Ich habe die beiden vbs Dateien, die ich auch an dem Testrechner benutzt habe, auf den Rechner hier kopiert (unter C:\dnc programme cnc).
Dann habe ich in der installer.vbs den pfad für die dnc dateien angepasst (C:\CNC Programme DNC\M1).
Dann cmd als Administrator durchgeführt in das Verzeichnis gewechselt und "cscript /nologo Installer.vbs" eingegeben.
Das hat dann ca. 1 Minute gedauert (PC ist ein bisschen älter) und ohne Fehlermeldung abgeschlossen. Dann bin ich zur Maschine und habe eine DNC Datei rübergeschickt. Zum PC und siehe da (sieht man ja auch schon am Änderungsdatum), die Datei ist genauso falsch wie es nicht sein sollte.
Habe dann manuell falsche dnc Dateien reinkopiert (so wie an meinem Testrechner), an meinem PC hat er sie sofort geändert. Hier macht er garnichts, die CPU Auslastung ist aber konstant zwischen 96-und 99 % und der Lüfter ziemlich laut.
Werd noch verrückt ;)
Gruß
ich habe es ganz genau nach deiner Anleitung hier an diesem PC gemacht. Ich habe die beiden vbs Dateien, die ich auch an dem Testrechner benutzt habe, auf den Rechner hier kopiert (unter C:\dnc programme cnc).
Dann habe ich in der installer.vbs den pfad für die dnc dateien angepasst (C:\CNC Programme DNC\M1).
Dann cmd als Administrator durchgeführt in das Verzeichnis gewechselt und "cscript /nologo Installer.vbs" eingegeben.
Das hat dann ca. 1 Minute gedauert (PC ist ein bisschen älter) und ohne Fehlermeldung abgeschlossen. Dann bin ich zur Maschine und habe eine DNC Datei rübergeschickt. Zum PC und siehe da (sieht man ja auch schon am Änderungsdatum), die Datei ist genauso falsch wie es nicht sein sollte.
Habe dann manuell falsche dnc Dateien reinkopiert (so wie an meinem Testrechner), an meinem PC hat er sie sofort geändert. Hier macht er garnichts, die CPU Auslastung ist aber konstant zwischen 96-und 99 % und der Lüfter ziemlich laut.
Werd noch verrückt ;)
Gruß
Hallo lordofremixes,
hast Du denn auch
Gruß
Friemler
hast Du denn auch
C:\CNC Programme DNC\M1\*.dnc eingetragen? Um welche Windowsversion handelt es sich?Gruß
Friemler
Hallo lordofremixes,
in Deinem letzten Posting des Installer Codes habe ich gerade gesehen, dass Du in Zeile 137 statt
diese Zeile
stehen hast. Letzteres ist falsch.
Ich hoffe, Du hast den Quelltext richtig kopiert (durch klick auf den Link "Quelltext" am oberen rechten Rand der Codebox).
Ich sagte ja schon, dass man die Codeformatierung auch nachträglich in ein Posting einfügen kann. Trotz aller Hektik: Bitte ruhig bleiben und die Helfenden unterstützen.
Gruß
Friemler
in Deinem letzten Posting des Installer Codes habe ich gerade gesehen, dass Du in Zeile 137 statt
Set objFilterClass = objWMIService.Get("__EventFilter")
Set objFilterClass = objWMIService.Get("EventFilter")
Ich hoffe, Du hast den Quelltext richtig kopiert (durch klick auf den Link "Quelltext" am oberen rechten Rand der Codebox).
Ich sagte ja schon, dass man die Codeformatierung auch nachträglich in ein Posting einfügen kann. Trotz aller Hektik: Bitte ruhig bleiben und die Helfenden unterstützen.
Gruß
Friemler
Zitat von @Friemler:
[EDIT]
Ich glaube die Fettschrift hier ist Deine Schuld und durch das erste Posting des Event Consumer Codes entstanden (irgendwelche
HTML-Tags reingerutscht?). Schau da bei Gelegenheit noch mal mit der Bearbeiten-Funktion drüber.
[/EDIT]
[EDIT]
Ich glaube die Fettschrift hier ist Deine Schuld
und durch das erste Posting des Event Consumer Codes entstanden (irgendwelcheHTML-Tags reingerutscht?). Schau da bei Gelegenheit noch mal mit der Bearbeiten-Funktion drüber.
[/EDIT]
[OT]
Das ist das zweite Mal seit ich hier angemeldet bin, dass dieses Phänomen auftritt, damals war es auch nicht mehr rückgängig zu machen, selbst wenn man den Code, nachdem es anfing, gelöscht hat :D freu dich auf Dauerfett (oder schreibe in Codeplain *gg* - ist zwar auch fett aber etwas weniger aufdringlich )
[/OT]
Testkommentar um zu sehen, ob nur ab einer Struktur der Fett-Bug auftritt ... (direkt auf EP geantwortet)
hm so einfach geht's nicht auszutricksen, na gut - ein Fall für das Löschen dann
P.S.: Kommentare die vor dem Bugpost landen, bleiben normal also alles, das vor der Struktur von 16:45:31 Uhr landet Beweis
P.P.S.: er lernt es nicht mit den Codetags ...
late edit: Wer hat das Fett verbraten?
hm so einfach geht's nicht auszutricksen, na gut - ein Fall für das Löschen dann
P.S.: Kommentare die vor dem Bugpost landen, bleiben normal also alles, das vor der Struktur von 16:45:31 Uhr landet
BeweisP.P.S.: er lernt es nicht mit den Codetags ...
late edit: Wer hat das Fett verbraten?
Er meint, dass der Codeschnipsel von unserem hochgeschätzten Mitglied bastla stammt
Hallo Friemler,
grade verglichen. Der Code hier ist richtig. Das angegebene Verzeichnis ist auch richtig. Hier läuft Win XP , Service Pack 3.
Ich poste noch einmal die beiden Codes hier am Echtzeit PC , die ich genommen habe.
Fahre dann kurz heim (ca. 20min) und schalte mich dann wieder hier drauf.
Mit der Codeformatierung , habe bei Formatierungshilfe geschaut aber den Code für die Zeilennummerierung finde ich nicht (zu spät?). Danke dass du dich so unermüdlich drum kümmerst, rechne ich dir hoch an.!!
grade verglichen. Der Code hier ist richtig. Das angegebene Verzeichnis ist auch richtig. Hier läuft Win XP , Service Pack 3.
Ich poste noch einmal die beiden Codes hier am Echtzeit PC , die ich genommen habe.
Fahre dann kurz heim (ca. 20min) und schalte mich dann wieder hier drauf.
Mit der Codeformatierung , habe bei Formatierungshilfe geschaut aber den Code für die Zeilennummerierung finde ich nicht (zu spät?). Danke dass du dich so unermüdlich drum kümmerst, rechne ich dir hoch an.!!
der Code von installer.vbs:
[Edit Biber] Codeformatierung [/Edit]
' ===========================================
' Run this script with administrative rights!
' ===========================================
'/////////////////////////////// Configure script's job ///////////////////////////////
'******************** Customize according to your specific needs **********************
'------------------ Set event description and job related variables -------------------
strEventDescription = "New DNCfile Creation"
strMonitorFileSpec = "C:\CNC Programme DNC\M1\*.dnc"
strPollingIntervall = "1"
'---------------- Prepare Monitor Filespec for WMI Event Filter query -----------------
Set FSO = CreateObject("Scripting.FileSystemObject")
strDrive = FSO.GetDriveName(strMonitorFileSpec)
strFileName = FSO.GetFileName(strMonitorFileSpec)
intPathBegin = Len(strDrive) + 1
intPathLen = Len(strMonitorFileSpec) - Len(StrDrive) - Len(strFileName)
strPath = Replace(Mid(strMonitorFileSpec, intPathBegin, intPathLen), "\", "\\")
strExtension = FSO.GetExtensionName(strMonitorFileSpec)
Set FSO = Nothing
'----------------------------- Set WMI Event Filter query -----------------------------
strEventFilterQuery = "SELECT * FROM __InstanceCreationEvent" _
& " WITHIN " & strPollingIntervall _
& " WHERE TargetInstance ISA 'CIM_DataFile'" _
& " AND TargetInstance.Drive='" & strDrive & "'" _
& " AND TargetInstance.Path='" & strPath & "'" _
& " AND TargetInstance.Extension='" & strExtension & "'"
'-------------- Set WMI Namespace where the monitored event will occure ---------------
strEventNamespace = "root\Cimv2"
'----------- Set parameters which should be passed to Event Handler script ------------
strEventHandlerParam = """" _
& "%TargetInstance.Drive%" _
& "%TargetInstance.Path%" _
& "%TargetInstance.FileName%" _
& "." _
& "%TargetInstance.Extension%" _
& """"
'**************************************************************************************
'//////////////////////////////// Set script variables ////////////////////////////////
'- Set Event Handler path, quote it and prepare it and its working directory for WMI --
Set FSO = CreateObject("Scripting.FileSystemObject")
strEventHandlerWD = Replace(FSO.GetParentFolderName(WScript.ScriptFullName), "\", "\\")
strEventHandler = Replace(strEventDescription, " ", "") & "EventHandler.vbs"
strEventHandler = """" & strEventHandlerWD & "\\" & strEventHandler & """"
Set FSO = Nothing
'----------------------- Test for existing Event Handler script -----------------------
Set FSO = CreateObject("Scripting.FileSystemObject")
If Not FSO.FileExists(Replace(Replace(strEventHandler, "\\", "\"), """", "")) Then
MsgBox "The Event Handler script " & vbCRLF _
& Replace(strEventHandler, "\\", "\") & vbCRLF _
& "does not exist. Please create it.", _
vbExclamation, _
"Missing Event Handler script"
End If
Set FSO = Nothing
'-------------------------- Build parameters for CScript.exe --------------------------
strCScriptParam = strEventHandler & " " & strEventHandlerParam
'---------------- Get path of Windows Directory and prepare it for WMI ----------------
Set WshShell = WScript.CreateObject("WScript.Shell")
strWinDir = Replace(WshShell.ExpandEnvironmentStrings("%SystemRoot%"), "\", "\\")
Set WshShell = Nothing
'---------------------- Set path of CScript.exe prepared for WMI ----------------------
setCScriptPath = strWinDir & "\\System32\\cscript.exe"
'////////////////////////// Install permanent Event Consumer //////////////////////////
'------- Get WMI Scripting API object (SWbemServices), Namespace: Subscription --------
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!" _
& "\\" & strComputer & "\root\Subscription")
'------------------------------ Create the Event Filter -------------------------------
Set objFilterClass = objWMIService.Get("__EventFilter")
Set objFilter = objFilterClass.SpawnInstance_()
objFilter.Name = strEventDescription & " Event Filter"
objFilter.EventNamespace = strEventNamespace
objFilter.QueryLanguage = "WQL"
objFilter.Query = strEventFilterQuery
Set EventFilterPath = objFilter.Put_()
'----------------------- Create the Commandline Event Consumer ------------------------
Set objEventConsumerClass = objWMIService.Get("CommandLineEventConsumer")
Set objEventConsumer = objEventConsumerClass.SpawnInstance_()
objEventConsumer.Name = strEventDescription & " Commandline Event Consumer"
objEventConsumer.CommandLineTemplate = setCScriptPath & " " & strCScriptParam
objEventConsumer.ExecutablePath = setCScriptPath
objEventConsumer.WorkingDirectory = strEventHandlerWD
objEventConsumer.ShowWindowCommand = 0
Set CommandlineEventConsumerPath = objEventConsumer.Put_()
'------------------ Bind Event Filter to Commandline Event Consumer -------------------
Set objBindingClass = objWMIService.Get("__FilterToConsumerBinding")
Set objBinding = objBindingClass.SpawnInstance_()
objBinding.Filter = EventFilterPath
objBinding.Consumer = CommandlineEventConsumerPath
objBinding.Put_()[Edit Biber] Codeformatierung [/Edit]
Der Code von NewDNCFileCreationEventHandler.vbs :
'Eine Konstante definieren
Const ForReading = 1
'Pfad und Name der als Parameter übergebenen
'neu erstellten Datei in Variable einlesen
strFileName = WScript.Arguments(0)
'Dateisystem-Objekt erzeugen
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Dateiinhalt komplett in einen String einlesen
Set objInFile = objFSO.OpenTextFile(strFileName, ForReading, False)
strContent = objInFile.ReadAll
objInFile.Close
'Den String anhand des Zeilenumbruchs in ein Array zerlegen,
'dessen Elemente die einzelnen Zeilen enthalten.
arrContent = Split(strContent, vbCrLf)
'Objekt für Reguläre Ausdrücke erzeugen
Set objRegExp = New RegExp
'Nur den ersten Treffer zurückliefern
objRegExp.Global = False
'Suchmuster für die Maschinen-Nummer in Zeile 1 der Eingabedatei
objRegExp.Pattern = "\(([0-9]*)\)"
'Die Maschinen-Nummer extrahieren
strNewMachineNo = objRegExp.Execute(arrContent(0))(0).SubMatches(0)
'Suchmuster für den Aufbau der kompletten Zeile 3
objRegExp.Pattern = "(N)([0-9]*)( .*)"
'Maschinen-Nummer austauschen
arrContent(2) = objRegExp.Replace(arrContent(2), "$1" & strNewMachineNo & "$3")
'Aus dem Array wieder einen String machen, die einzelnen
'Arrayelemente durch Zeilenumbrüche voneinander trennen
'und den String in die ursprüngliche Datei schreiben.
'Der alte Inhalt wird dabei überschrieben.
Set objOutFile = objFSO.CreateTextFile(strFileName, True)
objOutFile.Write Join(arrContent, vbCrLf)
objOutFile.Close
Hallo lordofremixes,
Du brauchst nur auf den schon MEHRMALS angegebenen zu klicken um zu sehen, wie Du die Codeformatierung aktivierst: Einfach den Quellcode in Tags einschließen.
Gruß
Friemler
Zitat von @lordofremixes:
Mit der Codeformatierung , habe bei Formatierungshilfe geschaut aber den Code für die Zeilennummerierung finde ich nicht (zu spät?).
Mit der Codeformatierung , habe bei Formatierungshilfe geschaut aber den Code für die Zeilennummerierung finde ich nicht (zu spät?).
Du brauchst nur auf den schon MEHRMALS angegebenen zu klicken um zu sehen, wie Du die Codeformatierung aktivierst: Einfach den Quellcode in Tags einschließen.
Gruß
Friemler
installer ohne Fettschrift (sry)
' ===========================================
' Run this script with administrative rights!
' ===========================================
'/////////////////////////////// Configure script's job ///////////////////////////////
'* Customize according to your specific needs *
'------------------ Set event description and job related variables -------------------
strEventDescription = "New DNCfile Creation"
strMonitorFileSpec = "C:\CNC Programme DNC\M1\*.dnc"
strPollingIntervall = "1"
'---------------- Prepare Monitor Filespec for WMI Event Filter query -----------------
Set FSO = CreateObject("Scripting.FileSystemObject")
strDrive = FSO.GetDriveName(strMonitorFileSpec)
strFileName = FSO.GetFileName(strMonitorFileSpec)
intPathBegin = Len(strDrive) + 1
intPathLen = Len(strMonitorFileSpec) - Len(StrDrive) - Len(strFileName)
strPath = Replace(Mid(strMonitorFileSpec, intPathBegin, intPathLen), "\", "\\")
strExtension = FSO.GetExtensionName(strMonitorFileSpec)
Set FSO = Nothing
'----------------------------- Set WMI Event Filter query -----------------------------
strEventFilterQuery = "SELECT * FROM __InstanceCreationEvent" _
& " WITHIN " & strPollingIntervall _
& " WHERE TargetInstance ISA 'CIM_DataFile'" _
& " AND TargetInstance.Drive='" & strDrive & "'" _
& " AND TargetInstance.Path='" & strPath & "'" _
& " AND TargetInstance.Extension='" & strExtension & "'"
'-------------- Set WMI Namespace where the monitored event will occure ---------------
strEventNamespace = "root\Cimv2"
'----------- Set parameters which should be passed to Event Handler script ------------
strEventHandlerParam = """" _
& "%TargetInstance.Drive%" _
& "%TargetInstance.Path%" _
& "%TargetInstance.FileName%" _
& "." _
& "%TargetInstance.Extension%" _
& """"
'*
'//////////////////////////////// Set script variables ////////////////////////////////
'- Set Event Handler path, quote it and prepare it and its working directory for WMI --
Set FSO = CreateObject("Scripting.FileSystemObject")
strEventHandlerWD = Replace(FSO.GetParentFolderName(WScript.ScriptFullName), "\", "\\")
strEventHandler = Replace(strEventDescription, " ", "") & "EventHandler.vbs"
strEventHandler = """" & strEventHandlerWD & "\\" & strEventHandler & """"
Set FSO = Nothing
'----------------------- Test for existing Event Handler script -----------------------
Set FSO = CreateObject("Scripting.FileSystemObject")
If Not FSO.FileExists(Replace(Replace(strEventHandler, "\\", "\"), """", "")) Then
MsgBox "The Event Handler script " & vbCRLF _
& Replace(strEventHandler, "\\", "\") & vbCRLF _
& "does not exist. Please create it.", _
vbExclamation, _
"Missing Event Handler script"
End If
Set FSO = Nothing
'-------------------------- Build parameters for CScript.exe --------------------------
strCScriptParam = strEventHandler & " " & strEventHandlerParam
'---------------- Get path of Windows Directory and prepare it for WMI ----------------
Set WshShell = WScript.CreateObject("WScript.Shell")
strWinDir = Replace(WshShell.ExpandEnvironmentStrings("%SystemRoot%"), "\", "\\")
Set WshShell = Nothing
'---------------------- Set path of CScript.exe prepared for WMI ----------------------
setCScriptPath = strWinDir & "\\System32\\cscript.exe"
'////////////////////////// Install permanent Event Consumer //////////////////////////
'------- Get WMI Scripting API object (SWbemServices), Namespace: Subscription --------
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!" _
& "\\" & strComputer & "\root\Subscription")
'------------------------------ Create the Event Filter -------------------------------
Set objFilterClass = objWMIService.Get("__EventFilter")
Set objFilter = objFilterClass.SpawnInstance_()
objFilter.Name = strEventDescription & " Event Filter"
objFilter.EventNamespace = strEventNamespace
objFilter.QueryLanguage = "WQL"
objFilter.Query = strEventFilterQuery
Set EventFilterPath = objFilter.Put_()
'----------------------- Create the Commandline Event Consumer ------------------------
Set objEventConsumerClass = objWMIService.Get("CommandLineEventConsumer")
Set objEventConsumer = objEventConsumerClass.SpawnInstance_()
objEventConsumer.Name = strEventDescription & " Commandline Event Consumer"
objEventConsumer.CommandLineTemplate = setCScriptPath & " " & strCScriptParam
objEventConsumer.ExecutablePath = setCScriptPath
objEventConsumer.WorkingDirectory = strEventHandlerWD
objEventConsumer.ShowWindowCommand = 0
Set CommandlineEventConsumerPath = objEventConsumer.Put_()
'------------------ Bind Event Filter to Commandline Event Consumer -------------------
Set objBindingClass = objWMIService.Get("__FilterToConsumerBinding")
Set objBinding = objBindingClass.SpawnInstance_()
objBinding.Filter = EventFilterPath
objBinding.Consumer = CommandlineEventConsumerPath
objBinding.Put_()
CODEFORMATIERUNG BITTE! Oder ich kriege die Krise! Du musst auch nicht jedesmal ein neues Posting einstellen, Du kannst bestehende Postings ÄNDERN! Link "Bearbeiten" rechts unter Deinem Beitrag.
[EDIT]
Die schon erwähnte Zeile ist immer noch falsch.
[/EDIT]
[EDIT]
Die schon erwähnte Zeile ist immer noch falsch.
[/EDIT]
sorry heut s erste mal hier. wie bekomm ich die zeilennummerierung hin?
Siehe dieses Posting.
so jetzt hab ich solangsam die grundregeln drauf ;) blöde hektik...
Vielen Dank! Hektik ist ein schlechter Partner in der IT.
Hast Du Zeile 69
im Listing des Installers verbessert oder sind die führenden Tiefstriche vor
Gruß
Friemler
Hast Du Zeile 69
Set objFilterClass = objWMIService.Get("__EventFilter")
EventFilter erst durch die Codeformatierung aufgetaucht? So sollte es richtig sein.Gruß
Friemler
so steht es bei mir im code
Set objFilterClass = objWMIService.Get("__EventFilter") (so rauskopiert)
Gruß
Set objFilterClass = objWMIService.Get("__EventFilter") (so rauskopiert)
Gruß
Hallo lordofremixes,
ich habe gerade die Listings aus Deinen letzten (endlich mit Codeformatierung versehenen ) Postings genommen, die von Dir angegebene Verzeichnisstruktur erstellt und den Installer aus
[EDIT]
Test auf einer VM mit XP SP3 wiederholt. Funktioniert auch.
[/EDIT]
Gruß
Friemler
ich habe gerade die Listings aus Deinen letzten (endlich mit Codeformatierung versehenen
) Postings genommen, die von Dir angegebene Verzeichnisstruktur erstellt und den Installer aus C:\CNC Programme DNC (hattest Du zwar anders angegeben, aber das schiebe ich mal auf Deine Hektik) laufen lassen. Testsystem: Windows 7 Ultimate SP1. Nachdem ich eine fehlerhafte DNC-Datei mit dem Inhalt aus Deinem Eröffnungsposting in das überwachte Verzeichnis C:\CNC Programme DNC\M1 kopiert habe, wurde diese korrigiert.[EDIT]
Test auf einer VM mit XP SP3 wiederholt. Funktioniert auch.
[/EDIT]
Gruß
Friemler
Hallo Friemler,
habe es ja auch an meinem PC ausprobiert und es ging.
So habe jetzt folgendes ausprobiert : Habe die Installer.vbs so angepasst , dass sie nicht auf "C:\CNC Programme DNC\M1\*.dnc" zugreift, sondern nur auf "C:\CNC Programme DNC\*.dnc" , fehlerhafte dnc Datei reinkopiert und eine Sekunde später war die DNC Datei genauso wie gewünscht.
Das finde ich echt merkwürdig. Liegt es vielleicht daran, dass der Ordner zu voll ist (sind ca. 9800 dnc Dateien) ?
Gruß
Anmerkung: Die Ausführung der installer.vbs war in wenigen Sekunden erledigt, gibt man noch ...\M1\ an, dauert es ca. 1 Minute bis das Installer Programm fertig ausgeführt st.
habe es ja auch an meinem PC ausprobiert und es ging.
So habe jetzt folgendes ausprobiert : Habe die Installer.vbs so angepasst , dass sie nicht auf "C:\CNC Programme DNC\M1\*.dnc" zugreift, sondern nur auf "C:\CNC Programme DNC\*.dnc" , fehlerhafte dnc Datei reinkopiert und eine Sekunde später war die DNC Datei genauso wie gewünscht.
Das finde ich echt merkwürdig. Liegt es vielleicht daran, dass der Ordner zu voll ist (sind ca. 9800 dnc Dateien) ?
Gruß
Anmerkung: Die Ausführung der installer.vbs war in wenigen Sekunden erledigt, gibt man noch ...\M1\ an, dauert es ca. 1 Minute bis das Installer Programm fertig ausgeführt st.
Hallo lordofremixes,
evtl. muss der Rechner nach Deinen vielen Versuchen erst mal "gesäubert" werden (fehlerhafte Event Consumer, Event Filter, FilterToConsumerBindings). Die folgende Anleitung ist auch für Deinen Testrechner im Büro anwendbar.
Danach kannst Du ja noch mal testen (nimm als zu überwachendes Verzeichnis das mit den 9800 Dateien) und erhöhe das Pollingintervall, z.B. auf 10 (Sekunden).
[EDIT]
Anleitung aktualisiert, weil die Forensoftware unbeabsichtigte Formatierungen erzeugt hat, sodass führende Tiefstriche verloren gingen.
[/EDIT]
Gruß
Friemler
evtl. muss der Rechner nach Deinen vielen Versuchen erst mal "gesäubert" werden (fehlerhafte Event Consumer, Event Filter, FilterToConsumerBindings). Die folgende Anleitung ist auch für Deinen Testrechner im Büro anwendbar.
- Unter einem Konto anmelden, das zur Gruppe der Administratoren gehört.
- Starte über
Rechtsklick -> Als Administrator ausführenein Konsolenfenster mit Adminrechten (für XP nicht erforderlich). - Gib dort den Befehl
wbemtestein. - Klicke im Fenster dieses Programms rechts oben auf
Verbinden.... - Ändere den Inhalt des Eingabefeldes unter
Namespace(ganz oben) aufroot\subscriptionund klicke rechts oben aufVerbinden. - Klicke jetzt im Hauptfenster auf
Instanzen aufzählen.... - Trage unter
Name der übergeordneten Klasseden Begriff __FilterToConsumerBinding ein (genau so, mit den zwei führenden Tiefstrichen!) und klicke aufOK. - In der erscheinenden Liste ist unter Windows 7 und XP (evtl. auch Vista) ein Eintrag __FilterToConsumerBinding.Consumer="NTEventLogEventConsumer.Name=\"SCM Event Log Consumer\"", Filter="__EventFilter.Name=\"SCM Event Log Filter\"" zu sehen. Dieser MUSS erhalten bleiben. Die anderen Einträge überprüfen, ob sie von Deinen Tests stammen könnten (unter XP gibt es noch einen Standardeintrag), wenn ja, durch anklicken markieren und dann auf den Button
Löschenklicken. Zum Schluss rechts oben aufSchließenklicken. - Wiederum im Hauptfenster auf
Instanzen aufzählen...klicken. - Trage unter
Name der übergeordneten Klasseden Begriff __EventFilter ein (genau so, mit den zwei führenden Tiefstrichen!) und klicke aufOK. - In der erscheinenden Liste ist unter Windows 7 und XP (evtl. auch Vista) ein Eintrag __EventFilter.Name="SCM Event Log Filter" zu sehen. Dieser MUSS erhalten bleiben. Die anderen Einträge überprüfen, ob sie von Deinen Tests stammen könnten (unter XP gibt es noch einen Standardeintrag), wenn ja, durch anklicken markieren und dann auf den Button
Löschenklicken. Zum Schluss rechts oben aufSchließenklicken. - Wiederum im Hauptfenster auf
Instanzen aufzählen...klicken. - Trage unter
Name der übergeordneten Klasseden BegriffCommandLineEventConsumerein und klicke aufOK. - Die erscheinende Liste ist unter Windows 7 und XP (evtl. auch Vista) normalerweise leer. Überprüfe die vorhandenen Einträge, ob sie von Deinen Tests stammen könnten, wenn ja, durch anklicken markieren und dann auf den Button
Löschenklicken. Zum Schluss rechts oben aufSchließenklicken. - Jetzt ist alles deinstalliert. Im Hauptfenster rechts oben auf
Beendenklicken.
Danach kannst Du ja noch mal testen (nimm als zu überwachendes Verzeichnis das mit den 9800 Dateien) und erhöhe das Pollingintervall, z.B. auf 10 (Sekunden).
[EDIT]
Anleitung aktualisiert, weil die Forensoftware unbeabsichtigte Formatierungen erzeugt hat, sodass führende Tiefstriche verloren gingen.
[/EDIT]
Gruß
Friemler
@Skyemugen
"Hochgeschätzt" macht mich ja wirklich fast verlegen (Biber würde mich übrigens eher "breit" schätzen ) ...
... aber die Lorbeeren hätten eigentlich an den noch mehr zu schätzenden hier) - darauf, dass ich in diesem Fall nix dafür kann, deutet übrigens "
Grüße
bastla
P.S.: Ich wollte auch noch mit in den Bereich, in dem Mann nicht fett rüberkommt ...
"Hochgeschätzt" macht mich ja wirklich fast verlegen
(Biber würde mich übrigens eher "breit" schätzen ) ...... aber die Lorbeeren hätten eigentlich an den noch mehr zu schätzenden hier) - darauf, dass ich in diesem Fall nix dafür kann, deutet übrigens "
move /y" (den in einem Batch unnötigen Schalter verwende ich seit mindestens 4 Jahren nicht mehr) hin ...Grüße
bastla
P.S.: Ich wollte auch noch mit in den Bereich, in dem Mann nicht fett rüberkommt ...
@bastla
Grüße
Biber
Zitat von @bastla:
@Skyemugen
"Hochgeschätzt" macht mich ja wirklich fast verlegen (Biber würde mich übrigens eher "breit" schätzen ) ...
Biber würde sagen: Nicht nur grosse Ereignisse werfen ihre Schatten voraus @Skyemugen
"Hochgeschätzt" macht mich ja wirklich fast verlegen
(Biber würde mich übrigens eher "breit" schätzen ) ...P.S.: Ich wollte auch noch mit in den Bereich, in dem Mann nicht fett rüberkommt ...
Na ja, oft kommt ja das dicke Ende erst am Schluss - im diesem Beitrag aber du .... *gg jezz' aber weeeeeeech hier... - ich mach mich mal dünn... ..Grüße
Biber
Hallo Friemler,
genauso gemacht (habe sogar jede Zeile zweimal gelesen). Hat alles wunderbar funktioniert. Danach Verzeichnis angepasst (M1) und neu installiert. Installation ging deutlich schneller.
Im Ordner M1 werden die DNC Dateien trotzdem nicht angepasst. Habe das Intervall auf 30 Sekunden gesetzt.
Denke mal mit dem Ordner M1 kann ichs vergessen oder hast du noch ne Idee , warum es ausgerechnet bei diesem Ordner scheitert?
Gruß
lordofremixes
genauso gemacht (habe sogar jede Zeile zweimal gelesen). Hat alles wunderbar funktioniert. Danach Verzeichnis angepasst (M1) und neu installiert. Installation ging deutlich schneller.
Im Ordner M1 werden die DNC Dateien trotzdem nicht angepasst. Habe das Intervall auf 30 Sekunden gesetzt.
Denke mal mit dem Ordner M1 kann ichs vergessen oder hast du noch ne Idee , warum es ausgerechnet bei diesem Ordner scheitert?
Gruß
lordofremixes
@Biber
) ...
Grüße
bastla
jezz' aber weeeeeeech hier...
Nur keine Eile - Du bist ja sicher ohnehin schneller (öfters sogar beim Batchen ) ...Grüße
bastla
Hallo lordofremixes,
hmm, das muss dann wohl an der großen Anzahl Dateien liegen. Werden denn wirklich alle davon benötigt/kannst Du einen Teil auslagern?
Gruß
Friemler
hmm, das muss dann wohl an der großen Anzahl Dateien liegen. Werden denn wirklich alle davon benötigt/kannst Du einen Teil auslagern?
Gruß
Friemler
Hallo Friemler,
leider nicht, wollte ich auch schon probieren, das Problem ist nur, dass die Arbeiter an der Maschine irgendwann so gut wie jedes Programm brauchen können bzw. man auch garnicht wissen kann, was man von den 9800 auslagern kann. Hab da noch ne Idee kann man hier nen Screenshot hochladen?
Gruß
leider nicht, wollte ich auch schon probieren, das Problem ist nur, dass die Arbeiter an der Maschine irgendwann so gut wie jedes Programm brauchen können bzw. man auch garnicht wissen kann, was man von den 9800 auslagern kann. Hab da noch ne Idee kann man hier nen Screenshot hochladen?
Gruß
Hallo lordofremixes,
um ein Bild in einem Kommentar zu posten musst Du zuerst einen neuen Beitrag anlegen, den Du dann aber nicht veröffentlichst/als Entwurf kennzeichnest. Er muss aber eine gewisse Mindestanzahl von Zeichen enthalten. Bei einem Beitrag besteht die Möglichkeit Bilder anzufügen (unter der Box, in der Du den Beitrag schreibst, ist ein entsprechender Button). Die URLs, die Du nach dem hochladen erhälst, kannst Du dann auch in einem Kommentar benutzen. Nimm PNG oder JPG als Bildformat.
Gruß
Friemler
um ein Bild in einem Kommentar zu posten musst Du zuerst einen neuen Beitrag anlegen, den Du dann aber nicht veröffentlichst/als Entwurf kennzeichnest. Er muss aber eine gewisse Mindestanzahl von Zeichen enthalten. Bei einem Beitrag besteht die Möglichkeit Bilder anzufügen (unter der Box, in der Du den Beitrag schreibst, ist ein entsprechender Button). Die URLs, die Du nach dem hochladen erhälst, kannst Du dann auch in einem Kommentar benutzen. Nimm PNG oder JPG als Bildformat.
Gruß
Friemler
ok hab ich gemacht.
das ist das ftp verwaltungsprogramm, welches auch auf den ordner m1 zugreift.
fällt dir da vielleicht etwas auf?
das ist das ftp verwaltungsprogramm, welches auch auf den ordner m1 zugreift.
fällt dir da vielleicht etwas auf?
Du hast irgendetwas mit dem Link falsch gemacht. Wenn ich ihn anklicke kommt eine Fehlermeldung, dass ich mich anmelden soll. Außerdem sollte garkein Link erscheinen sondern das Bild.
Übernehme den Link aus der Bilder-Uploadbox genau so, wie er dort steht. Und ändere einfach Dein vorheriges Posting statt ein neues zu erstellen.
Übernehme den Link aus der Bilder-Uploadbox genau so, wie er dort steht. Und ändere einfach Dein vorheriges Posting statt ein neues zu erstellen.
habe ich genauso gemacht, bild wird bei mir angezeigt, hab aber noch nicht freigegeben oder soll ich das jetzt, wenn ich fertig bin?
das ist das ftp programm . vielleicht fällt dir da was auf , was eine änderung sperrt?
das ist das ftp programm . vielleicht fällt dir da was auf , was eine änderung sperrt?
Nein, nicht freigeben. Du hast wahrscheinlich den Link zu Deinem neu erstellten Beitrag gepostet. Der Link aus der Uploadbox sieht z.B. so aus:
[EDIT]
Aha, hat sich ja erledigt.
[/EDIT]
[[image bad3baa36aa3ddf481dbd44fb82d2e5a]]
[EDIT]
Aha, hat sich ja erledigt.
[/EDIT]
Werden die DNC-Dateien vom FTP-Programm etwa nach
C:\cnc programme dnc (das Home-Verzeichnis) geschrieben?
nein, in C:\cnc programme dnc\m1
(der ordner, in dem die ganzen dnc dateien von der maschine landen oder ausgelesen werden + der ordner, in dem dein programm dann nicht will)
Gruß
(der ordner, in dem die ganzen dnc dateien von der maschine landen oder ausgelesen werden + der ordner, in dem dein programm dann nicht will)
Gruß
Tut mir leid, aber ich kann Deinem Gedankengang nicht folgen. Was soll der FTP-Server damit zu tun haben, dass der Event Consumer das Erstellen einer neuen Datei nicht bemerkt?
Teste das ganze doch nochmal, wenn in
Da das hier mittlerweile das 101 Posting ist und in Anbetracht der Uhrzeit werde ich jetzt auch Schluss machen. Evtl. kriege ich ja noch das Ergebnis des eben genannten Tests mit, aber ich lasse mich erst morgen wieder hier blicken.
N8
Friemler
Teste das ganze doch nochmal, wenn in
C:\cnc programme dnc\m1 keine oder nur 5 Dateien vorhanden sind.Da das hier mittlerweile das 101 Posting ist und in Anbetracht der Uhrzeit werde ich jetzt auch Schluss machen. Evtl. kriege ich ja noch das Ergebnis des eben genannten Tests mit, aber ich lasse mich erst morgen wieder hier blicken.
N8
Friemler
Friemer,
ich bin grad auch nicht mehr fitt. muss jetzt mal abschalten. Du hast mir heute sehr viel geholfen, ich probiere das morgen früh gleich aus.
N8, too und danke nochmals.
Bis morgen, Lordofremixes
ich bin grad auch nicht mehr fitt. muss jetzt mal abschalten. Du hast mir heute sehr viel geholfen, ich probiere das morgen früh gleich aus.
N8, too und danke nochmals.
Bis morgen, Lordofremixes
Moin,
gratuliere... 100 Kommentare innerhalb von ca. 12 Stunden. Das ist neuer Rekord!
Grüße,
Dani
gratuliere... 100 Kommentare innerhalb von ca. 12 Stunden. Das ist neuer Rekord!
Grüße,
Dani
Hallo Friemler,
habe grad noch mal getestet, und zwar wenn ich den ...\M1 Ordner leere und manuell 5 fehlerhafte dnc Dateien einfüge, korrigiert er sofort.
Also keine Sperre vom ftp Programm, oder was auch immer, es liegt wahrscheinlich an den 9800 Dateien, sobald diese wieder drin sind, wird garnichtrs mehr gemacht.
weiß da vielleicht noch jemand ne lösung?
Gruß
habe grad noch mal getestet, und zwar wenn ich den ...\M1 Ordner leere und manuell 5 fehlerhafte dnc Dateien einfüge, korrigiert er sofort.
Also keine Sperre vom ftp Programm, oder was auch immer, es liegt wahrscheinlich an den 9800 Dateien, sobald diese wieder drin sind, wird garnichtrs mehr gemacht.
weiß da vielleicht noch jemand ne lösung?
Gruß
Halo Skyemugen,
Deine Batch Datei beim Testen prima funktioniert, aber im richtigen Verzeichnis mit 9800 Dateien macht die Batch Datei garnichts bzw.bleibt hängen.
Gruß
Deine Batch Datei beim Testen prima funktioniert, aber im richtigen Verzeichnis mit 9800 Dateien macht die Batch Datei garnichts bzw.bleibt hängen.
Gruß
Aloha,
ehrlich ja? Die arbeitet schon noch *gg* aber ich glaube auch nicht, dass du etliche Stunden abgewartet hast, denn ich schätze 9800 Dateien abzuarbeiten mit diesem Vorgang wird wohl nunja ... 3-12 Stunden dauern ...
greetz André
erstmal frühstücken
ehrlich ja? Die arbeitet schon noch *gg* aber ich glaube auch nicht, dass du etliche Stunden abgewartet hast, denn ich schätze 9800 Dateien abzuarbeiten mit diesem Vorgang wird wohl nunja ... 3-12 Stunden dauern ...
greetz André
erstmal frühstücken
Hallo lordofremixes,
Dann bleibt Dir wohl nichts anderes übrig als einen geplanten Task einzurichten, der folgendes VBScript startet. Das Script prüft die Archivbits der im überwachten Verzeichis enthaltenen Dateien. Dateien mit gesetztem Archivbit werden korrigiert und danach das Archivbit gelöscht.
Als auszuführenden Befehl musst Du
eintragen.
Wie man im Taskplaner einen Task einrichtet, der z.B. alle 2 Minuten ausgeführt wird, finde bitte selbst heraus. Du bist im 3. Ausbildungsjahr, nicht wahr? Stichwort ist "Mehrfache Zeitpläne anzeigen" auf der Registerkarte "Zeitplan" des Taskplaners.
Falls z.Z. nur korrekte DNC-Dateien im Verzeichnis liegen, wäre es noch geschickt, vor der Einrichtung des Tasks mit
Gruß
Friemler
Dann bleibt Dir wohl nichts anderes übrig als einen geplanten Task einzurichten, der folgendes VBScript startet. Das Script prüft die Archivbits der im überwachten Verzeichis enthaltenen Dateien. Dateien mit gesetztem Archivbit werden korrigiert und danach das Archivbit gelöscht.
Als auszuführenden Befehl musst Du
cscript /nologo "PfadUndNameDesFolgendenScripts.vbs"
Wie man im Taskplaner einen Task einrichtet, der z.B. alle 2 Minuten ausgeführt wird, finde bitte selbst heraus. Du bist im 3. Ausbildungsjahr, nicht wahr? Stichwort ist "Mehrfache Zeitpläne anzeigen" auf der Registerkarte "Zeitplan" des Taskplaners.
Falls z.Z. nur korrekte DNC-Dateien im Verzeichnis liegen, wäre es noch geschickt, vor der Einrichtung des Tasks mit
ATTRIB die Archivbits der Dateien im Verzeichnis zu löschen. Sonst werden beim ersten Start des geplanten Tasks erstmal alle Dateien geöffnet und geändert. Könnte etwas dauern.'Zu überwachendes Verzeichnis
strMonitoredPath = "C:\CNC Programme DNC\M1"
'Konstanten definieren
Const ForReading = 1
Const ForWriting = 2
'Dateisystem-Objekt erzeugen
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Alle Dateien im Verzeichnis betrachten
For Each objFile In objFSO.GetFolder(strMonitoredPath).Files
'Ist es eine DNC-Datei?
If LCase(objFSO.GetExtensionName(objFile.Name)) = "dnc" Then
'Ist das Archivbit gesetzt?
If objFile.Attributes And &H20 Then
'Dateiinhalt komplett in einen String einlesen
Set objInFile = objFile.OpenAsTextStream(ForReading)
strContent = objInFile.ReadAll
objInFile.Close
'Den String anhand des Zeilenumbruchs in ein Array zerlegen,
'dessen Elemente die einzelnen Zeilen enthalten.
arrContent = Split(strContent, vbCrLf)
'Objekt für Reguläre Ausdrücke erzeugen
Set objRegExp = New RegExp
'Nur den ersten Treffer zurückliefern
objRegExp.Global = False
'Suchmuster für die Maschinen-Nummer in Zeile 1 der Eingabedatei
objRegExp.Pattern = "\(([0-9]*)\)"
'Die Maschinen-Nummer extrahieren
strNewMachineNo = objRegExp.Execute(arrContent(0))(0).SubMatches(0)
'Suchmuster für den Aufbau der kompletten Zeile 3
objRegExp.Pattern = "(N)([0-9]*)( .*)"
'Maschinen-Nummer austauschen
arrContent(2) = objRegExp.Replace(arrContent(2), "$1" & strNewMachineNo & "$3")
'Aus dem Array wieder einen String machen, die einzelnen
'Arrayelemente durch Zeilenumbrüche voneinander trennen
'und den String in die ursprüngliche Datei schreiben.
'Der alte Inhalt wird dabei überschrieben.
Set objOutFile = objFile.OpenAsTextStream(ForWriting)
objOutFile.Write Join(arrContent, vbCrLf)
objOutFile.Close
'Archivbit löschen
objFile.Attributes = objFileAttributes And &hFFDF
End If
End If
NextGruß
Friemler
Aloha Friemler,
was meinst du bei 9800 Dateien, wie lange wird das ackern? Ein Durchgang alleine wird ja schon länger benötigen als die Zeitspanne bis zum nächsten Task *gg*
Eventuell sollte man einen Counter / Limiter einsetzen, der nur bis Anzahl X arbeitet, dann schließt und beim nächsten Aufruf werden eben auch wieder nur Anzahl X abgearbeitet (zumindest würde ich das im batch jetzt so optimieren ...)
Eigentlich gibt es also zwei Anwendungsfälle:
Letzteres geht reibungslos, ersteres braucht viiiieeeel Kaffee
greetz André
was meinst du bei 9800 Dateien, wie lange wird das ackern? Ein Durchgang alleine wird ja schon länger benötigen als die Zeitspanne bis zum nächsten Task *gg*
Eventuell sollte man einen Counter / Limiter einsetzen, der nur bis Anzahl X arbeitet, dann schließt und beim nächsten Aufruf werden eben auch wieder nur Anzahl X abgearbeitet (zumindest würde ich das im batch jetzt so optimieren ...)
Eigentlich gibt es also zwei Anwendungsfälle:
- 9800 vorhandene Dateien ändern
- immer wieder neue Dateien ändern
Letzteres geht reibungslos, ersteres braucht viiiieeeel Kaffee
greetz André
Moin André,
von den 9800 Dateien wird ja nur das Archivbit abgefragt, nur bei gesetztem Archivbit wird geändert und dann das Archivbit gelöscht. Ich kann es jetzt nicht testen, sollte aber ausreichend schnell ablaufen.
Ein Limit einführen geht auch nicht. Die Dateien werden von der [EDIT] Zu schnell gelesen. [/EDIT]
Gruß
Friemler
von den 9800 Dateien wird ja nur das Archivbit abgefragt, nur bei gesetztem Archivbit wird geändert und dann das Archivbit gelöscht. Ich kann es jetzt nicht testen, sollte aber ausreichend schnell ablaufen.
FILES-Methode ja nicht sortiert sondern in der Reihenfolge geliefert, in der die Einträge im Verzeichnis abgelegt sind. Neue Dateien landen also meistens am Ende der Liste. Dann würden sie nicht verarbeitet.Gruß
Friemler
Aloha Friemler,
bei 9800 Dateien mit gesetztem Archivbit sind 9800 Dateien zur Verarbeitung vorhanden
Der TE meinte ja bereits, dass die Batch beim Loslassen auf 9800 Dateien (die erstmal alle ein A-bit haben und darum auch erst einmal völlig egal ist, ob man das filtert oder nicht) hängen bleibt (ich vermute eher: noch mehrere Stunden ackern will)
Denn mit
greetz André
bei 9800 Dateien mit gesetztem Archivbit sind 9800 Dateien zur Verarbeitung vorhanden
Der TE meinte ja bereits, dass die Batch beim Loslassen auf 9800 Dateien (die erstmal alle ein A-bit haben und darum auch erst einmal völlig egal ist, ob man das filtert oder nicht) hängen bleibt (ich vermute eher: noch mehrere Stunden ackern will)
Denn mit
dir /b /AA und attrib -A %1 habe ich ja auch bereits rumgespielt greetz André
Hallo André,
stimmt, deshalb habe ich gerade noch einen Hinweis in mein Posting eingebaut, dass er die Archivbits vor Einrichtung des Tasks erstmal mit
Gruß
Friemler
stimmt, deshalb habe ich gerade noch einen Hinweis in mein Posting eingebaut, dass er die Archivbits vor Einrichtung des Tasks erstmal mit
ATTRIB löschen soll.Gruß
Friemler
Hallo Friemler,
so bin jetzt wieder am Steuerungs PC.
Das mit dem Task bekomme ich auf jeden Fall hin.
Vorgehensweise, damit nichts schief geht:
Ich lass den SteuerungsPC so wie er ist . Deine Programme sind installiert. Der Pfad ist richtig angepasst (...\M1) und das Intervall steht auf 10 sec.
Ich erstelle eine neue VBS Datei mit deinem neuen Code und führe sie wie oben beschrieben aus.
Stimmt das soweit?
Was mir unklar ist bzw. nicht ganz genau verstanden: Es liegen nur korrekte DNC Dateien im Verzeichnis, wie soll ich genau vorgehen. Mit der Eingabeaufforderung in das M1 verzeichnis wechseln und dann ATTRIB eingeben?
Gruß
lordofremixes
so bin jetzt wieder am Steuerungs PC.
Das mit dem Task bekomme ich auf jeden Fall hin.
Vorgehensweise, damit nichts schief geht:
Ich lass den SteuerungsPC so wie er ist . Deine Programme sind installiert. Der Pfad ist richtig angepasst (...\M1) und das Intervall steht auf 10 sec.
Ich erstelle eine neue VBS Datei mit deinem neuen Code und führe sie wie oben beschrieben aus.
Stimmt das soweit?
Was mir unklar ist bzw. nicht ganz genau verstanden: Es liegen nur korrekte DNC Dateien im Verzeichnis, wie soll ich genau vorgehen. Mit der Eingabeaufforderung in das M1 verzeichnis wechseln und dann ATTRIB eingeben?
Gruß
lordofremixes
Moin lordofremixes,
zunächst mal: Die ganze Ackererei von gestern war umsonst . Die Lösung mit dem Event Consumer ist für Dich nicht brauchbar. Gehe nach der schon geposteten Anleitung vor und entferne die Hinterlassenschaften dieses Versuchs.
Dann speicherst Du meinen neuen Code in einem beliebigen Pfad als VBS-Datei.
Dann öffnest Du eine Konsole und löschst mit
Dann legst Du den geplanten Task an und gibst dabei wie beschrieben die Datei mit dem neuen Code an.
Ich könnte hier jetzt noch was zu "Hellen Momenten" sagen, verkneife ich mir aber...
Gruß
Friemler
zunächst mal: Die ganze Ackererei von gestern war umsonst
. Die Lösung mit dem Event Consumer ist für Dich nicht brauchbar. Gehe nach der schon geposteten Anleitung vor und entferne die Hinterlassenschaften dieses Versuchs.Dann speicherst Du meinen neuen Code in einem beliebigen Pfad als VBS-Datei.
Dann öffnest Du eine Konsole und löschst mit
ATTRIB die Archivbits der Dateien im M1-Verzeichnis. Wie das geht, verrät Dir die Hilfe von ATTRIB, erreichbar über die Eingabe von ATTRIB /? in der Konsole.Dann legst Du den geplanten Task an und gibst dabei wie beschrieben die Datei mit dem neuen Code an.
Ich könnte hier jetzt noch was zu "Hellen Momenten" sagen, verkneife ich mir aber...
Gruß
Friemler
Du Genie !!
Es funktioniert einwandfrei!!
kleinigkeit noch die ich nicht hinbekomme (wahrscheinlich liegts an der schreibweise)
wollt für dein programm eine batch anlegen, und diese dann in den taskmanager.
Beim Anlegen der Batch Datei habe ich folgendes reingeschrieben, aber es kommt ein Fehler (wahrscheinlich liegt an der Schreibwei"C:\CNC Programme DNC\Script" -cscript /nologo "DNC.vbs"se)
"C:\CNC Programme DNC\Script" -cscript /nologo "DNC.vbs" diese habe ich dann als .bat angelegt da kommt aber immer ein fehler
was mach ich da falsch?
UND
Gilt der Taskplaner eigentlich für alle User(wenn ich ihn als Admin anlege) oder muss ich es einmal für jeden einzelnen definieren?
bald ist der beitrag glaub ich echt gelöst
Danke und Gruß,
Lordofremixes
Es funktioniert einwandfrei!!
kleinigkeit noch die ich nicht hinbekomme (wahrscheinlich liegts an der schreibweise)
wollt für dein programm eine batch anlegen, und diese dann in den taskmanager.
Beim Anlegen der Batch Datei habe ich folgendes reingeschrieben, aber es kommt ein Fehler (wahrscheinlich liegt an der Schreibwei"C:\CNC Programme DNC\Script" -cscript /nologo "DNC.vbs"se)
"C:\CNC Programme DNC\Script" -cscript /nologo "DNC.vbs" diese habe ich dann als .bat angelegt da kommt aber immer ein fehler
was mach ich da falsch?
UND
Gilt der Taskplaner eigentlich für alle User(wenn ich ihn als Admin anlege) oder muss ich es einmal für jeden einzelnen definieren?
bald ist der beitrag glaub ich echt gelöst
Danke und Gruß,
Lordofremixes
Wie wäre es mit
Beim Erstellen des Tasks muss Benutzername und Passwort angegeben werden, nicht wahr? Unter diesem Konto wird der Task ausgeführt.
Gruß
Friemler
cscript /nologo "C:\CNC Programme DNC\Script\DNC.vbs"
Beim Erstellen des Tasks muss Benutzername und Passwort angegeben werden, nicht wahr? Unter diesem Konto wird der Task ausgeführt.
Gruß
Friemler
Hallo Friemler,
alles eingerichtet um 13. 45 finden dann Test s an der Maschine statt. Hab ein wirklich gutes Gefühl dabei!!
Danke für alles ! Wenn es klappt, wo soll ich den Kasten Bier hinschicken? ;)
Gruß
LordofRemixes
alles eingerichtet um 13. 45 finden dann Test s an der Maschine statt. Hab ein wirklich gutes Gefühl dabei!!
Danke für alles ! Wenn es klappt, wo soll ich den Kasten Bier hinschicken? ;)
Gruß
LordofRemixes
Spende ihn der örtlichen Obdachloseneinrichtung
.Ciao
Friemler
Hallo Friemler,
nach ausgiebigen Tests muss ich eins sagen:
ES LÄUFT HERVORRAGEND !! (nach gestern abend hatte ich die hoffnung eigentlich schon aufgegeben;)) Aber du hast es echt drauf !!!
DANKE VIELMALS NOCHMAL!!
mein chef war übrigens überglücklich !!
Gruß
Lordofremixes
nach ausgiebigen Tests muss ich eins sagen:
ES LÄUFT HERVORRAGEND !! (nach gestern abend hatte ich die hoffnung eigentlich schon aufgegeben;)) Aber du hast es echt drauf !!!
DANKE VIELMALS NOCHMAL!!
mein chef war übrigens überglücklich !!
Gruß
Lordofremixes
Hallo lordofremixes,
freut mich, dann kannst Du den Beitrag ja noch als gelöst markieren. 118 Kommentare und kein grüner Haken macht sich schlecht .
Gruß
Friemler
freut mich, dann kannst Du den Beitrag ja noch als gelöst markieren. 118 Kommentare und kein grüner Haken macht sich schlecht
.Gruß
Friemler
Hallo Friemler,
Deine Lösung läuft im Produktiv Betrieb echt gut. Ein Problem gibt es aber noch:
Kann es sein, dass wenn jemand ein richtiges DNC Programm einlädt und da Änderungen vornimmt z.B. 877251.dnc :
$$ (877251)
%PM
N877251 (LAGERGEHAUSE 315UPZ)
N10 M59
N20 G54
N30 G199 X131 Z215 C1 A1
Der Arbeiter an der Maschine ändert nur z.B. Zeile 4 in :
$$ (877251)
%PM
N877251 (LAGERGEHAUSE 315UPZ)
N10 M65
N20 G54
N30 G199 X131 Z215 C1 A1
und schickt dies zurück an den Server. Die 4. Zeile wird nicht überschrieben, nicht verändert. Das ist unvorteilhaft, wenn er kleine Korrekturen an einer Datei vornimmt
und diese dann korrigiert ablegen will.
Woran kann das liegen?
Gruß
LordofRemixes
Deine Lösung läuft im Produktiv Betrieb echt gut. Ein Problem gibt es aber noch:
Kann es sein, dass wenn jemand ein richtiges DNC Programm einlädt und da Änderungen vornimmt z.B. 877251.dnc :
$$ (877251)
%PM
N877251 (LAGERGEHAUSE 315UPZ)
N10 M59
N20 G54
N30 G199 X131 Z215 C1 A1
Der Arbeiter an der Maschine ändert nur z.B. Zeile 4 in :
$$ (877251)
%PM
N877251 (LAGERGEHAUSE 315UPZ)
N10 M65
N20 G54
N30 G199 X131 Z215 C1 A1
und schickt dies zurück an den Server. Die 4. Zeile wird nicht überschrieben, nicht verändert. Das ist unvorteilhaft, wenn er kleine Korrekturen an einer Datei vornimmt
und diese dann korrigiert ablegen will.
Woran kann das liegen?
Gruß
LordofRemixes
Hallo lordofremixes,
an meinem Script jedenfalls nicht. Wenn der Arbeiter seine geänderte Datei abschickt, landet sie erstmal auf der Platte des Servers. Durch das neu schreiben wird das Archivbit gesetzt. Beim nächsten Lauf des geplanten Tasks wird die Nummer aus Zeile 1 in Zeile 3 eingesetzt (ist in dem Fall sowieso gleich), der Rest der Datei wird unverändert übernommen (die geänderte Zeile sollte ja schon enthalten sein) und danach das Archivbit gelöscht.
Evtl. hat der FTP-Server ein Problem damit, eine existierende Datei zu überschreiben oder die geänderte Datei kommt aus irgendeinem Grund garnicht beim Server an. Du solltest mal in dieser Richtung forschen (Änderungsdatum der Datei; übernimmt die DNC-Box die geänderte Zeile, wenn das Programm unter dem gleichen Namen gespeichert werden soll?).
Du kannst ja probehalber den geplanten Task deaktivieren. Das von Dir beschriebene Fehlverhalten sollte dann immer noch auftreten.
Gruß
Friemler
an meinem Script jedenfalls nicht. Wenn der Arbeiter seine geänderte Datei abschickt, landet sie erstmal auf der Platte des Servers. Durch das neu schreiben wird das Archivbit gesetzt. Beim nächsten Lauf des geplanten Tasks wird die Nummer aus Zeile 1 in Zeile 3 eingesetzt (ist in dem Fall sowieso gleich), der Rest der Datei wird unverändert übernommen (die geänderte Zeile sollte ja schon enthalten sein) und danach das Archivbit gelöscht.
Evtl. hat der FTP-Server ein Problem damit, eine existierende Datei zu überschreiben oder die geänderte Datei kommt aus irgendeinem Grund garnicht beim Server an. Du solltest mal in dieser Richtung forschen (Änderungsdatum der Datei; übernimmt die DNC-Box die geänderte Zeile, wenn das Programm unter dem gleichen Namen gespeichert werden soll?).
Du kannst ja probehalber den geplanten Task deaktivieren. Das von Dir beschriebene Fehlverhalten sollte dann immer noch auftreten.
Gruß
Friemler
Hallo Friemler,
ich werde sobald ich wieder an diesen PC kann weiter testen und berichten.
Eine andere Frage: gibt es die Möglichkeit, den Aufruf der Dosbox minimiert darzustellen?
Weil jede Minute, wenn die Batch startet, sind die Arbeiter total verwirrt weil diese DOS Box im Vordergrund aufgeht
Hast du da ne Idee?
Gruß
lordofremixes
ich werde sobald ich wieder an diesen PC kann weiter testen und berichten.
Eine andere Frage: gibt es die Möglichkeit, den Aufruf der Dosbox minimiert darzustellen?
Weil jede Minute, wenn die Batch startet, sind die Arbeiter total verwirrt weil diese DOS Box im Vordergrund aufgeht
Hast du da ne Idee?
Gruß
lordofremixes
Hallo lordofremixes,
dafür gibt es mehrere Tools im Netz. Das nach meinem Geschmack beste ist HStart. Weitere Möglichkeiten: RunH, HideThis.
Du könntest aber auch versuchen, statt
[EDIT]
Mit
[/EDIT]
Gruß
Friemler
Du könntest aber auch versuchen, statt
cscript das Programm wscript in den geplanten Task zum Ausführen des VBScripts einzutragen.[EDIT]
Mit
wscript.exe statt cscript.exe funktioniert das ganz sicher.[/EDIT]
Gruß
Friemler
Moin,
[OT]
Ich will mich ja nicht unnötig einmischen....
ganz oben schrub ich was von Nebenwirkungen...
Dein Chef ist Glücklich, du hast das Lob abbekommen und gemacht hat es der Friemler - Schön und Gut aber du kommst mit den mikriksten Banalfragen und was passiert - wenn der Friemler nicht mehr kann oder will?
Nehm dir "deinen" Rechner - baue "deine" Umgebung nach - bilde dir selbst ein Urteil, was wie und warum weshalb funktioniert oder eben nicht.
Das ist doch der Sinn des Forums - Leuten zu zeigen wie es geht, aber doch nicht jeden Schritt vorkaspern...
Und komm mir bloss nicht mit Keine Zeit....
[/OT]
Ich würde ja banal hergehen und den Task unter einem "User" laufen lassen, der nur dafür gedacht ist und der keine Interaktion mit dem angemeldeten Userdesktop hat. Aber ich habs ja auch gelernt.....
Bin draussen
[OT]
Ich will mich ja nicht unnötig einmischen....
Zitat von @lordofremixes:
Hallo Friemler,
ich werde sobald ich wieder an diesen PC kann weiter testen und berichten.
Eine andere Frage: gibt es die Möglichkeit, den Aufruf der Dosbox minimiert darzustellen?
Weil jede Minute, wenn die Batch startet, sind die Arbeiter total verwirrt weil diese DOS Box im Vordergrund aufgeht
Hast du da ne Idee?
Hallo Friemler,
ich werde sobald ich wieder an diesen PC kann weiter testen und berichten.
Eine andere Frage: gibt es die Möglichkeit, den Aufruf der Dosbox minimiert darzustellen?
Weil jede Minute, wenn die Batch startet, sind die Arbeiter total verwirrt weil diese DOS Box im Vordergrund aufgeht
Hast du da ne Idee?
ganz oben schrub ich was von Nebenwirkungen...
Dein Chef ist Glücklich, du hast das Lob abbekommen und gemacht hat es der Friemler - Schön und Gut aber du kommst mit den mikriksten Banalfragen und was passiert - wenn der Friemler nicht mehr kann oder will?
Nehm dir "deinen" Rechner - baue "deine" Umgebung nach - bilde dir selbst ein Urteil, was wie und warum weshalb funktioniert oder eben nicht.
Das ist doch der Sinn des Forums - Leuten zu zeigen wie es geht, aber doch nicht jeden Schritt vorkaspern...
Und komm mir bloss nicht mit Keine Zeit....
[/OT]
Ich würde ja banal hergehen und den Task unter einem "User" laufen lassen, der nur dafür gedacht ist und der keine Interaktion mit dem angemeldeten Userdesktop hat. Aber ich habs ja auch gelernt.....
Bin draussen
Moin Timo,
noch banaler ist doch der Austausch von
In Bezug auf den TO muss ich Dir Recht geben.
@lordofremixes: Ich wünsche Dir wirklich viel Glück für die Abschlussprüfung.
Gruß
Friemler
Zitat von @60730:
Ich würde ja banal hergehen und den Task unter einem "User" laufen lassen, der nur dafür gedacht ist und der
keine Interaktion mit dem angemeldeten Userdesktop hat. Aber ich habs ja auch gelernt.....
Ich würde ja banal hergehen und den Task unter einem "User" laufen lassen, der nur dafür gedacht ist und der
keine Interaktion mit dem angemeldeten Userdesktop hat. Aber ich habs ja auch gelernt.....
noch banaler ist doch der Austausch von
cscript.exe gegen wscript.exe. Wie war das mit den blinden (ungelernten) Hühnern? In Bezug auf den TO muss ich Dir Recht geben.
@lordofremixes: Ich wünsche Dir wirklich viel Glück für die Abschlussprüfung.
Gruß
Friemler
Hallo TimoBeil,
ich finde es eine Frechheit, dass du sagst, ich hätte das ganze Lob abbekommen. Woher willst du das denn wissen?
Ich hab meinem Chef genau gesagt, dass ich zum ersten Mal etwas in ein Forum geschrieben hab und mir jemand das Problem ausführlich gelöst hat.
Außerdem, bevor du geantwortet hast, hab ich auch schon rausgefunden wie man die Batch Datei minimiert öffnet , von daher gucke ich schon immer dass ich so viel wie möglich selbst löse. und das mit dem vb script davon hab ich keine ahnung und hab hier nur gefragt ob jemand eine fertige lösung präsentieren kann.
das ist doch nicht verboten??
Gruß
LordofRemixes
ich finde es eine Frechheit, dass du sagst, ich hätte das ganze Lob abbekommen. Woher willst du das denn wissen?
Ich hab meinem Chef genau gesagt, dass ich zum ersten Mal etwas in ein Forum geschrieben hab und mir jemand das Problem ausführlich gelöst hat.
Außerdem, bevor du geantwortet hast, hab ich auch schon rausgefunden wie man die Batch Datei minimiert öffnet , von daher gucke ich schon immer dass ich so viel wie möglich selbst löse. und das mit dem vb script davon hab ich keine ahnung und hab hier nur gefragt ob jemand eine fertige lösung präsentieren kann.
das ist doch nicht verboten??
Gruß
LordofRemixes
Danke ^^,
also das 2. lehrjahr ist vorbei seit 31. august. hatte einen schnitt von 1,8 im zeugnis, denke mal schon dass da was geht.
hab es mit start /MIN cscript /nologo "C:\CNC Programme DNC\Script\DNC.vbs" probiert, das ging einwandfrei.
oder hat die lösung mit wscript gegenüber start /MIN einen Vorteil?
Gruß
Lordofremixes
also das 2. lehrjahr ist vorbei seit 31. august. hatte einen schnitt von 1,8 im zeugnis, denke mal schon dass da was geht.
hab es mit start /MIN cscript /nologo "C:\CNC Programme DNC\Script\DNC.vbs" probiert, das ging einwandfrei.
oder hat die lösung mit wscript gegenüber start /MIN einen Vorteil?
Gruß
Lordofremixes
Hallo lordofremixes,
aus der Verwendung des
auch direkt in den Taskplaner eintragen.
Gruß
Friemler
aus der Verwendung des
START-Befehls schließe ich, dass Du den Befehl cscript /nologo "C:\CNC Programme DNC\Script\DNC.vbs" in einem Batchfile stehen hast. Das wäre aber garnicht nötig, Du könntestwscript "C:\CNC Programme DNC\Script\DNC.vbs"
Gruß
Friemler
Servus und [OT]
.. entspann dich mal und nimm dir eine Tüte Kaffee - das hab ich nicht gesagt, sondern geschrieben und das war etwas überspitzt.
Du wärst nicht der erste, der keine große Ahnung hat, was man Ihm da gebaut hat und das kann ich durchaus beurteilen.
Und dann schauste dir mal den Kommenar vom Dani an..
Und wir hatten hier schon wirklich "richtige" Probleme gelöst.
[/OT]
Gruß
.. entspann dich mal und nimm dir eine Tüte Kaffee - das hab ich nicht gesagt, sondern geschrieben und das war etwas überspitzt.
Du wärst nicht der erste, der keine große Ahnung hat, was man Ihm da gebaut hat und das kann ich durchaus beurteilen.
Und dann schauste dir mal den Kommenar vom Dani an..
gratuliere... 100 Kommentare innerhalb von ca. 12 Stunden. Das ist neuer Rekord!
Und wir hatten hier schon wirklich "richtige" Probleme gelöst.
[/OT]
Gruß
Hallo Friemler,
seit einigen Tagen funktioniert das Script nicht mehr. Habe fehlerhafte dnc Dateien eingefügt. Eine davon sieht so aus:
$$ (9999990)
%PM
N3859961 (SIEBKORB)
N5 M59
N10 G54
N20 G199 X510 Z128 C1 A1
usw...
Der Dateiname ist 9999990.dnc. Das Archivbit ist gesetzt (müsste ja gesetzt sein, wenn ich die Datei frisch in den Ordner reinsetze). Es passiert einfach nichts, das Änderungsdatum bleibt auch gleich. Die Batchdatei startet jede Minute. Weißt du zufällig warum das so ist.
Manchmal kommt auch folgendes vor. Man will eine DNC Datei speichern, und es passiert folgendes:
Er speichert dann 2. DNC Dateien:
1. %PM
N1313605 (SCHNECKE)
N10 M59
N20 G54
N30 G199 X70 Z672 C1 A1
N40 G198 X0 Z672
N50 G1 X174
N60 G1 Z652
N70 G1 X90
N80 G1 X70 Z642
N90 G1 Z0
N100 G1 X0
N110 G1 Z672
N120 G196
N130 T2203 M4
N140 G96 D500 S180 M38
N150 G0 X178 Z0.2 M8
N160 G39 X12 Z0 C0.5 F0.25
N170 G0 X450 Z50
N180 T1013 M4
N190 G96 S180 M38
N200 G0 X175 Z2 M8
N210 G38 X170.5 Z-21 C3 F0.35
N220 G0 X450 Z50
N230 T2203 M4
N240 G96 S250 M38
N250 G0 X165 Z4
N260 G1 Z0.05 F0.5 T2 M8
N270 G15 X168.5 K0.7 F0.16
N280 G1 Z-21
N290 G1 X175 F0.5 T3 M9
N300 G0 X450 Z50
N310 T4373 M4
N320 G96 S160 M38
N330 G0 X175 Z2
N340 G1 X77 F2
N350 G1 Z-1 F0.16 M8
N360 G1 X20
N370 G1 Z1 M9
N380 G0 X200
N390 G0 X420 Z50
N400 T5073 M4
N410 G96 D400 S160 M38
N420 G0 X175 Z-15
N430 G1 X170.2 F0.2 T2 M8
N440 G15 Z-18 K0.6
N450 G15 X70 K8
N460 G1 Z-32 T3 M9
N470 G0 X200
N480 G0 X390 Z100
N490 M5
N500 M58
N510 M30
und dann noch zusätzlich die zweite Datei.
$$ (1313605)
%PM
N1313605 (SCHNECKE)
N10 M59
N20 G54
N30 G199 X70 Z672 C1 A1
N40 G198 X0 Z672
N50 G1 X174
N60 G1 Z652
N70 G1 X90
N80 G1 X70 Z642
N90 G1 Z0
N100 G1 X0
N110 G1 Z672
N120 G196
N130 T2203 M4
N140 G96 D500 S180 M38
N150 G0 X178 Z0.2 M8
N160 G39 X12 Z0 C0.5 F0.25
N170 G0 X450 Z50
N180 T1013 M4
N190 G96 S180 M38
N200 G0 X175 Z2 M8
N210 G38 X170.5 Z-21 C3 F0.35
N220 G0 X450 Z50
N230 T2203 M4
N240 G96 S250 M38
N250 G0 X165 Z4
N260 G1 Z0.05 F0.5 T2 M8
N270 G15 X168.5 K0.7 F0.16
N280 G1 Z-21
N290 G1 X175 F0.5 T3 M9
N300 G0 X450 Z50
N310 T4373 M4
N320 G96 S160 M38
N330 G0 X175 Z2
N340 G1 X77 F2
N350 G1 Z-1 F0.16 M8
N360 G1 X20
N370 G1 Z1 M9
N380 G0 X200
N390 G0 X420 Z50
N400 T5073 M4
N410 G96 D400 S160 M38
N420 G0 X175 Z-15
N430 G1 X170.2 F0.2 T2 M8
N440 G15 Z-18 K0.6
N450 G15 X70 K8
N460 G1 Z-32 T3 M9
N470 G0 X200
N480 G0 X390 Z100
N490 M5
N500 M58
N510 M30
Weißt du da weiter? Bin heut schon wieder den ganzen Tag dabei das hinzubekommen, aber es will einfach nciht !
seit einigen Tagen funktioniert das Script nicht mehr. Habe fehlerhafte dnc Dateien eingefügt. Eine davon sieht so aus:
$$ (9999990)
%PM
N3859961 (SIEBKORB)
N5 M59
N10 G54
N20 G199 X510 Z128 C1 A1
usw...
Der Dateiname ist 9999990.dnc. Das Archivbit ist gesetzt (müsste ja gesetzt sein, wenn ich die Datei frisch in den Ordner reinsetze). Es passiert einfach nichts, das Änderungsdatum bleibt auch gleich. Die Batchdatei startet jede Minute. Weißt du zufällig warum das so ist.
Manchmal kommt auch folgendes vor. Man will eine DNC Datei speichern, und es passiert folgendes:
Er speichert dann 2. DNC Dateien:
1. %PM
N1313605 (SCHNECKE)
N10 M59
N20 G54
N30 G199 X70 Z672 C1 A1
N40 G198 X0 Z672
N50 G1 X174
N60 G1 Z652
N70 G1 X90
N80 G1 X70 Z642
N90 G1 Z0
N100 G1 X0
N110 G1 Z672
N120 G196
N130 T2203 M4
N140 G96 D500 S180 M38
N150 G0 X178 Z0.2 M8
N160 G39 X12 Z0 C0.5 F0.25
N170 G0 X450 Z50
N180 T1013 M4
N190 G96 S180 M38
N200 G0 X175 Z2 M8
N210 G38 X170.5 Z-21 C3 F0.35
N220 G0 X450 Z50
N230 T2203 M4
N240 G96 S250 M38
N250 G0 X165 Z4
N260 G1 Z0.05 F0.5 T2 M8
N270 G15 X168.5 K0.7 F0.16
N280 G1 Z-21
N290 G1 X175 F0.5 T3 M9
N300 G0 X450 Z50
N310 T4373 M4
N320 G96 S160 M38
N330 G0 X175 Z2
N340 G1 X77 F2
N350 G1 Z-1 F0.16 M8
N360 G1 X20
N370 G1 Z1 M9
N380 G0 X200
N390 G0 X420 Z50
N400 T5073 M4
N410 G96 D400 S160 M38
N420 G0 X175 Z-15
N430 G1 X170.2 F0.2 T2 M8
N440 G15 Z-18 K0.6
N450 G15 X70 K8
N460 G1 Z-32 T3 M9
N470 G0 X200
N480 G0 X390 Z100
N490 M5
N500 M58
N510 M30
und dann noch zusätzlich die zweite Datei.
$$ (1313605)
%PM
N1313605 (SCHNECKE)
N10 M59
N20 G54
N30 G199 X70 Z672 C1 A1
N40 G198 X0 Z672
N50 G1 X174
N60 G1 Z652
N70 G1 X90
N80 G1 X70 Z642
N90 G1 Z0
N100 G1 X0
N110 G1 Z672
N120 G196
N130 T2203 M4
N140 G96 D500 S180 M38
N150 G0 X178 Z0.2 M8
N160 G39 X12 Z0 C0.5 F0.25
N170 G0 X450 Z50
N180 T1013 M4
N190 G96 S180 M38
N200 G0 X175 Z2 M8
N210 G38 X170.5 Z-21 C3 F0.35
N220 G0 X450 Z50
N230 T2203 M4
N240 G96 S250 M38
N250 G0 X165 Z4
N260 G1 Z0.05 F0.5 T2 M8
N270 G15 X168.5 K0.7 F0.16
N280 G1 Z-21
N290 G1 X175 F0.5 T3 M9
N300 G0 X450 Z50
N310 T4373 M4
N320 G96 S160 M38
N330 G0 X175 Z2
N340 G1 X77 F2
N350 G1 Z-1 F0.16 M8
N360 G1 X20
N370 G1 Z1 M9
N380 G0 X200
N390 G0 X420 Z50
N400 T5073 M4
N410 G96 D400 S160 M38
N420 G0 X175 Z-15
N430 G1 X170.2 F0.2 T2 M8
N440 G15 Z-18 K0.6
N450 G15 X70 K8
N460 G1 Z-32 T3 M9
N470 G0 X200
N480 G0 X390 Z100
N490 M5
N500 M58
N510 M30
Weißt du da weiter? Bin heut schon wieder den ganzen Tag dabei das hinzubekommen, aber es will einfach nciht !
Hallo lordofremixes,
ich poste hier mal eine erweiterte Version meines Scriptes, die Einträge in ein Logfile schreibt, wann es gestartet und beendet wurde und wann welche Datei wie geändert wurde. Evtl. hilft dir das bei der Fehlersuche. Pfad und Name des Logfiles bitte in Zeile 5 eintragen.
Deine 2. Frage deutet darauf hin, dass das Zeitfenster von 1 Minute für den Lauf des Scripts zu kurz sein könnte, du hast ja ca. 10000 Dateien im Verzeichnis. Wahrscheinlich wird während dem Lauf einer Instanz des Scripts über den Taskplaner eine zweite Instanz gestartet, die ebenfalls die zu diesem Zeitpunkt noch nicht geänderte DNC-Datei ändert und neu schreibt (Race Condition). Verlängere das Intervall im Taskplaner mal um 1 Minute.
Viel Erfolg
Friemler
ich poste hier mal eine erweiterte Version meines Scriptes, die Einträge in ein Logfile schreibt, wann es gestartet und beendet wurde und wann welche Datei wie geändert wurde. Evtl. hilft dir das bei der Fehlersuche. Pfad und Name des Logfiles bitte in Zeile 5 eintragen.
'Zu überwachendes Verzeichnis
strMonitoredPath = "C:\CNC Programme DNC\M1"
'Protokolldatei
strLogFile = "C:\CNC Programme DNC\Logfile.txt"
'Konstanten definieren
Const ForReading = 1
Const ForWriting = 2
'Dateisystem-Objekt erzeugen
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Protokolldatei im APPEND-Modus öffnen
Set objLogFile = objFSO.OpenTextFile(strLogFile, 8, True)
'Protokollzeile schreiben
objLogFile.WriteLine "------------------------------------------------------------------------"
objLogFile.WriteLine Now & " :: Automatische Reparatur von DNC-Dateien gestartet"
'Protokolldatei schließen
objLogFile.Close
'Alle Dateien im Verzeichnis betrachten
For Each objFile In objFSO.GetFolder(strMonitoredPath).Files
'Ist es eine DNC-Datei?
If LCase(objFSO.GetExtensionName(objFile.Name)) = "dnc" Then
'Ist das Archivbit gesetzt?
If objFile.Attributes And &H20 Then
'Dateiinhalt komplett in einen String einlesen
Set objInFile = objFile.OpenAsTextStream(ForReading)
strContent = objInFile.ReadAll
objInFile.Close
'Den String anhand des Zeilenumbruchs in ein Array zerlegen,
'dessen Elemente die einzelnen Zeilen enthalten.
arrContent = Split(strContent, vbCrLf)
'Objekt für Reguläre Ausdrücke erzeugen
Set objRegExp = New RegExp
'Nur den ersten Treffer zurückliefern
objRegExp.Global = False
'Suchmuster für die Maschinen-Nummer in Zeile 1 der Eingabedatei
objRegExp.Pattern = "\(([0-9]*)\)"
'Die Maschinen-Nummer extrahieren
strNewMachineNo = objRegExp.Execute(arrContent(0))(0).SubMatches(0)
'Suchmuster für den Aufbau der kompletten Zeile 3
objRegExp.Pattern = "(N)([0-9]*)( .*)"
'Alten Zeileninhalt merken
strOldLine3 = arrContent(2)
'Maschinen-Nummer austauschen
arrContent(2) = objRegExp.Replace(arrContent(2), "$1" & strNewMachineNo & "$3")
'Aus dem Array wieder einen String machen, die einzelnen
'Arrayelemente durch Zeilenumbrüche voneinander trennen
'und den String in die ursprüngliche Datei schreiben.
'Der alte Inhalt wird dabei überschrieben.
Set objOutFile = objFile.OpenAsTextStream(ForWriting)
objOutFile.Write Join(arrContent, vbCrLf)
objOutFile.Close
'Archivbit löschen
objFile.Attributes = objFileAttributes And &hFFDF
'Protokolldatei im APPEND-Modus öffnen
Set objLogFile = objFSO.OpenTextFile(strLogFile, 8, True)
'Protokollzeile schreiben
objLogFile.WriteLine Now & " :: Datei " & objFile.Path & " geändert: In Zeile 3 '" & strOldLine3 & "' die Satznummer gegen " & strNewMachineNo & " getauscht"
'Protokolldatei schließen
objLogFile.Close
End If
End If
Next
'Protokolldatei im APPEND-Modus öffnen
Set objLogFile = objFSO.OpenTextFile(strLogFile, 8, True)
'Protokollzeile schreiben
objLogFile.WriteLine Now & " :: Automatische Reparatur von DNC-Dateien beendet"
objLogFile.WriteLine "------------------------------------------------------------------------"
'Protokolldatei schließen
objLogFile.CloseDeine 2. Frage deutet darauf hin, dass das Zeitfenster von 1 Minute für den Lauf des Scripts zu kurz sein könnte, du hast ja ca. 10000 Dateien im Verzeichnis. Wahrscheinlich wird während dem Lauf einer Instanz des Scripts über den Taskplaner eine zweite Instanz gestartet, die ebenfalls die zu diesem Zeitpunkt noch nicht geänderte DNC-Datei ändert und neu schreibt (Race Condition). Verlängere das Intervall im Taskplaner mal um 1 Minute.
Viel Erfolg
Friemler
Hallo Friemler,
den Taskplaner habe ich umgestellt auf zwei Minuten.
Wieso das mit der Änderung nicht mehr geklappt hat, lag daran:
Wieso auch immer war bei sehr , sehr vielen Programmen das Archivbit gesetzt. Habe mit attrib /-a das Archivbit aller Dateien gelöscht,
dann eine fehlerhafte DNC Datein in den Ordner rein geschrieben und es ging sofort wieder.. Auch das mit dem Überschreiben einer gleichen Datei klappt einwandfrei (der cnc User hatte keinen Vollzugriff auf den Ordner).
Wegen deinem neuen Script: In deinem neuen Script muss irgendwo der Wurm drin sein, habe es eingefügt und es tut sich nichts mehr...Habe jetzt sicherheitshalber wieder das alte eingefügt.
2. (was noch viel wichtiger ist)
Ich habe noch einen gravierenden Fehler entdeckt. Ich versuche es dir mit einem Beispiel zu erklären:
Und zwar läuft ja jetzt alles gut, aber bei Programmen in denen der Artikel nicht in Klammern dabei steht, ändert das Script auch nichts.
Folgende Datei kommt an:
$$ (9999990)
%PM
N3859961 (SIEBKORB)
N5 M59
N10 G54
Das Script ändert die Datei nach 2 Minuten ab in
$$ (9999990)
%PM
N9999990 (SIEBKORB)
N5 M59
N10 G54
So wie es sein sollte.
Kommt aber folgende Datei an:
$$ (8888888)
%PM
N3974533 (HIER IM UNTERSCHIED ZUR ANDEREN DATEI FEHLT DIE KLAMMER MIT DER ARTIKELBESCHREIBUNG)
N10 G54
Wird dann nichts geändert und nachdem das Script durchgeloffen ist, sieht die Datei dann immer noch so aus.
$$ (8888888)
%PM
N3974533
N10 G54
...
Es gibt halt einige Programme in denen nichts in der Klammer steht, die Arbeiter speichern sie dann unter einer neuen Nummer und wenn sie es wieder laden, haben sie wieder das alte falsche Programm.
Weißt du wieso das so ist und gibt es da eine Lösung für?
Gruß und danke für die Mühe
lordofremixes
den Taskplaner habe ich umgestellt auf zwei Minuten.
Wieso das mit der Änderung nicht mehr geklappt hat, lag daran:
Wieso auch immer war bei sehr , sehr vielen Programmen das Archivbit gesetzt. Habe mit attrib /-a das Archivbit aller Dateien gelöscht,
dann eine fehlerhafte DNC Datein in den Ordner rein geschrieben und es ging sofort wieder.. Auch das mit dem Überschreiben einer gleichen Datei klappt einwandfrei (der cnc User hatte keinen Vollzugriff auf den Ordner).
Wegen deinem neuen Script: In deinem neuen Script muss irgendwo der Wurm drin sein, habe es eingefügt und es tut sich nichts mehr...Habe jetzt sicherheitshalber wieder das alte eingefügt.
2. (was noch viel wichtiger ist)
Ich habe noch einen gravierenden Fehler entdeckt. Ich versuche es dir mit einem Beispiel zu erklären:
Und zwar läuft ja jetzt alles gut, aber bei Programmen in denen der Artikel nicht in Klammern dabei steht, ändert das Script auch nichts.
Folgende Datei kommt an:
$$ (9999990)
%PM
N3859961 (SIEBKORB)
N5 M59
N10 G54
Das Script ändert die Datei nach 2 Minuten ab in
$$ (9999990)
%PM
N9999990 (SIEBKORB)
N5 M59
N10 G54
So wie es sein sollte.
Kommt aber folgende Datei an:
$$ (8888888)
%PM
N3974533 (HIER IM UNTERSCHIED ZUR ANDEREN DATEI FEHLT DIE KLAMMER MIT DER ARTIKELBESCHREIBUNG)
N10 G54
Wird dann nichts geändert und nachdem das Script durchgeloffen ist, sieht die Datei dann immer noch so aus.
$$ (8888888)
%PM
N3974533
N10 G54
...
Es gibt halt einige Programme in denen nichts in der Klammer steht, die Arbeiter speichern sie dann unter einer neuen Nummer und wenn sie es wieder laden, haben sie wieder das alte falsche Programm.
Weißt du wieso das so ist und gibt es da eine Lösung für?
Gruß und danke für die Mühe
lordofremixes
Hallo lordofremixes,
warum das neue Script nicht funktioniert kann ich nicht nachvollziehen, bei mir läuft es. Hast du dir den Quellcode über die Kopieren-Funktion des Forums (der Link "Quelltext" rechts oberhalb der Codebox) besorgt? Hast du die Pfade in den Zeilen 2 und 5 angepasst? Wurde eine Logdatei erstellt? Wenn ja, was stand drin?
Zur Problematik der Dateien ohne Artikelbeschreibung: Tausche Zeile 37 im alten Script aus diesem Posting aus.
Alter Inhalt:
Neuer Inhalt:
Das ist ein regulärer Ausdruck, der den Aufbau von Zeile 3 beschreibt. Der alte Ausdruck enthält in der letzten Klammer ein Leerzeichen. Da dieses Leerzeichen bei Dateien ohne Artikelbeschreibung nicht vorkommt (nach der Satznummer ist die Zeile zu Ende), funktioniert dieser Ausdruck nicht. Die Zeichen
Du solltest versuchen, die neue Scriptversion ans Laufen zu bekommen. Auch hier muss natürlich obige Zeile geändert werden, dort handelt es sich um Zeile 48. Im Logfile kannst du dann auch sehen, wie lange das Script braucht um alle Dateien abzuarbeiten und dann das Zeitintervall im Taskplaner optimal einstellen. Vergiss nicht zu berücksichtigen, dass die Laufzeit zunimmt, wenn Dateien mit gesetztem Archivbit geändert werden müssen. Teste das Script doch zuerst mal durch einen Direktaufruf von der Konsole aus. Dann siehst Du auch evtl. erscheinende Fehlermeldungen.
Gruß
Friemler
warum das neue Script nicht funktioniert kann ich nicht nachvollziehen, bei mir läuft es. Hast du dir den Quellcode über die Kopieren-Funktion des Forums (der Link "Quelltext" rechts oberhalb der Codebox) besorgt? Hast du die Pfade in den Zeilen 2 und 5 angepasst? Wurde eine Logdatei erstellt? Wenn ja, was stand drin?
Zur Problematik der Dateien ohne Artikelbeschreibung: Tausche Zeile 37 im alten Script aus diesem Posting aus.
Alter Inhalt:
objRegExp.Pattern = "(N)([0-9]*)( .*)"
Neuer Inhalt:
objRegExp.Pattern = "(N)([0-9]*)(.*)"
Das ist ein regulärer Ausdruck, der den Aufbau von Zeile 3 beschreibt. Der alte Ausdruck enthält in der letzten Klammer ein Leerzeichen. Da dieses Leerzeichen bei Dateien ohne Artikelbeschreibung nicht vorkommt (nach der Satznummer ist die Zeile zu Ende), funktioniert dieser Ausdruck nicht. Die Zeichen
.* im neuen Ausdruck bedeuten: Beliebige Zeichen (der Punkt) beliebig oft (der Stern). "Beliebig oft" schließt das 0-malige Auftreten (also garnicht) ein.Du solltest versuchen, die neue Scriptversion ans Laufen zu bekommen. Auch hier muss natürlich obige Zeile geändert werden, dort handelt es sich um Zeile 48. Im Logfile kannst du dann auch sehen, wie lange das Script braucht um alle Dateien abzuarbeiten und dann das Zeitintervall im Taskplaner optimal einstellen. Vergiss nicht zu berücksichtigen, dass die Laufzeit zunimmt, wenn Dateien mit gesetztem Archivbit geändert werden müssen. Teste das Script doch zuerst mal durch einen Direktaufruf von der Konsole aus. Dann siehst Du auch evtl. erscheinende Fehlermeldungen.
Gruß
Friemler
Hallo Friemler,
danke für die guten Erklärungen.
Das Script läuft jetzt durch, nachdem ich es kopiert habe. Musste ja nicht einmal mehr die 2 Zeilen mit den Pfaden anpassen, weil sie genau so richtig waren.
Und es läuft richtig gut!!! Das Script benötigt ca. 13 sekunden, eine wirklich sehr gute Zeit!
Nachdem ich von objRegExp.Pattern = "(N)([0-9]*)( .*)" in objRegExp.Pattern = "(N)([0-9]*)(.*)" geändert habe, funktioniert sogar alles bei DNC Dateien ohne Artikel in Klammern, genauso wie du beschrieben hast.
Glaube nicht. dass jetzt noch irgendwas falsch sein kann bzw. nicht funktioert.
Fetten DANK!!!
lordofremixes
danke für die guten Erklärungen.
Das Script läuft jetzt durch, nachdem ich es kopiert habe. Musste ja nicht einmal mehr die 2 Zeilen mit den Pfaden anpassen, weil sie genau so richtig waren.
Und es läuft richtig gut!!! Das Script benötigt ca. 13 sekunden, eine wirklich sehr gute Zeit!
Nachdem ich von objRegExp.Pattern = "(N)([0-9]*)( .*)" in objRegExp.Pattern = "(N)([0-9]*)(.*)" geändert habe, funktioniert sogar alles bei DNC Dateien ohne Artikel in Klammern, genauso wie du beschrieben hast.
Glaube nicht. dass jetzt noch irgendwas falsch sein kann bzw. nicht funktioert.
Fetten DANK!!!
lordofremixes
Hallo lordofremixes,
Optimismus ist gut, Kontrolle ist besser. Du hattest erwähnt, dass du sehr viele DNC-Dateien mit gesetztem Archivbit gefunden hättest. Sollte ja eigentlich nicht vorkommen. Ich würde das lieber noch im Auge behalten. Das Log kann dich dabei unterstützen.
Gruß
Friemler
Zitat von @lordofremixes:
Glaube nicht. dass jetzt noch irgendwas falsch sein kann bzw. nicht funktioert.
Glaube nicht. dass jetzt noch irgendwas falsch sein kann bzw. nicht funktioert.
Optimismus ist gut, Kontrolle ist besser. Du hattest erwähnt, dass du sehr viele DNC-Dateien mit gesetztem Archivbit gefunden hättest. Sollte ja eigentlich nicht vorkommen. Ich würde das lieber noch im Auge behalten. Das Log kann dich dabei unterstützen.
Gruß
Friemler
1
Heilger Bimbam, war das eine heftige Unterstützung
War damals mein erster Beitrag....
Halleluja und danke nochmal
War damals mein erster Beitrag....
Halleluja und danke nochmal
