Beiträge von misterspeed

Dann hast du entweder keine Schreibrechte im Zielverzeichnis oder die Quelldatei ist exklusiv gesperrt (z.B. weil sie noch in einem anderen Programm im Schreibmodus geöffnet ist). Alternativ könnte es natürlich auch sein, dass die Quelldatei nicht existiert (schreibweise prüfen?)

Der Zielpfad muss mit einem "\" enden, außerdem sollte das Flag 8 verwendet werden wenn der Zielordner noch nicht existiert, sofern ein Überschreiben einer bereits vorhandenen Kopie erwünscht ist verwende Flag 1 oder eine Kombination aus beiden Falgs. (8+1, also 9)

Und warum willste das so umständlich über den fileopendialog von libreoffice machen? Ich habe zwar nur ms office, aber so ziemlich jedes Programm unterstützt den Aufruf mit Parametern um Dateien zu öffnen. Das hier sollte also genauso und vorallem zuverlässiger funktionieren:

Tjo scheinbar hast du in diesem Fall wirklich ein Problem. Tkchild windows können anscheinend nicht wie die meisten Fenster über die genannten Funktionen automatisiert werden, zumindestens findet man über google jedemenge Beiträge und gescheiterte Versuche dazu. Also sofern niemand eine Idee hat wie man es doch hinbekommt bleibt meiner Meinung nach dann nur noch die unzuverlässigere Variante mit send / click, so wie du es ursprünglich hattest.

Zu deinem Sonderzeichenproblem solltest du dir die Hilfe des send() Befehls anschauen, dort ist dokumentiert, welche Zeichen maskiert werden müssen. Das gespeicherte PW muss also zunächst von dir geparsed und in einen kompatiblen String formatiert werden.

So funktioniert es mit dem Sonderzeichen "#"

run("notepad.exe")
Sleep(500)
send("meinPWmitSonderzeichen{#}")

Automatisiert könntest du den String so erzeugen:

$meinPW = "meinPWmitSonderzeichen#"
$meinPW = StringReplace($meinPW,"#","{#}")
ConsoleWrite($meinPW & @CRLF)

run("notepad.exe")
Sleep(500)
send($meinPW)

Da mehr als nur ein Zeichen davon betroffen ist solltest du das PW grundsätzlich durch eine Funktion zur Ersetzung aller problematischen Zeichen jagen.

Beispiel:

$meinPW = "meinPWmitSonderzeichen#"
ConsoleWrite($meinPW & @CRLF)
$meinPW = replaceSendChars($meinPW)
ConsoleWrite($meinPW & @CRLF)

run("notepad.exe")
Sleep(500)
send($meinPW)

Func replaceSendChars($string)
; unvollständig, siehe Hilfe von send()
Local $aReplaceRules[3][2] = [ ["!","{!}"], _
["#","{#}"], _
["+","{+}"] _
]
For $i=0 To UBound($aReplaceRules)-1
$string = StringReplace($string,$aReplaceRules[$i][0],$aReplaceRules[$i][1])
Next

Return $string
EndFunc

Und wenn es eine Excel Tabelle ist gibt es auch noch die Excel UDF, siehe google oder Forensuche.

Hier mal ein Beispiel. Allerdings ist das so natürlich noch fehlerhaft, es macht aber auch keinen Sinn da weiter dran zu basteln solange du keine Angaben dazu machst wie die Filter voneinander abhängig und kombinierbar sind und vorallem wären Beispieldaten notwendig um das ganze zu optimieren. Grundsätzlich funktioniert das Script so wie es ist nur wenn man zuerst das Dropdown nutzt und danach dieses vorgefilterte Array über die Inputfelder durchsucht. In meinem eigentlichen Script verwende ich ausschließlich voneinander abhängige Dropdowns zum Filtern, da ist es sehr viel leichter das so wie unten gezeigt zu realisieren. Bei freien Eingabefeldern dürfte es kaum möglich sein effektiv mit vorgefilterten Arrays weiterzuarbeiten. Man müsste auf jedenfall noch einiges ändern, damit die Suche korrekte Ergebnisse liefert, das habe ich z.B. durch den Wechsel aufs ungefilterte Array angedeutet, wenn etwas im Dropdown geändert wird. Besonders schnell ist es bei 50k Zeilen allerdings auch nicht, den Geschwindigkeitsvorteil bemerkt man erst wenn man das ganze durch das Dropdown massivst dezimiert hat. Nunja vielleicht hilfts dir trotzdem und vielleicht ist es ja schneller als das was du derzeit verwendest. Ich habe gottseidank nur an die 3k Zeilen und 8 Spalten, da ist die Performance noch ausreichend.

Anmerkung:

Die csv-datei muss so aufgebaut sein:

überschrift1,....,überschrift6
datenspalte1zeile1,.....,datenspalte6zeile1
...

Alternativ wird ein 2D Array mit den Test Daten benötigt.

Dann arbeite eben mit einem externen "WorkerScript". Das Hauptprogramm startet mehrere Instanzen dieses Scripts und prüft z.B. in seiner GUI Schleife ob die derzeit laufenden "WorkerScripte" fertig sind, wenn ja wird deren Ergebnis ins Listview eingetragen. Dadurch blockiert nichts mehr und du kannst sogar mehrere oder alle (würde ich bei 300 Rechnern vermeiden) Pings zeigleich laufen lassen.

Das "WorkerScript" könnte dann recht simpel sein und würde mit wenigen Zeilen Code auskommen.

meinePing.exe

#notrayicon
; prüfe Parameter
if $cmdline[0] < 1 then exit msgbox(0,"Fehler","Bitte gib die IP-Adresse als Parameter an")
$ip = $cmdline[1]

; pinge rechner
$ergebnis = ping($ip)
$errorcode = @error

; gebe Ergebnis an Hauptprogramm weiter
if $ergebnis = 0 then
$rueckgabe = "Error: " & $errorcode
else
$rueckgabe = $ergebnis
endif
; hier gibt es nun tausende möglichkeiten den Wert von $rueckgabe ans Hauptprogramm zu übergeben, siehe dazu die Suche des Forums zum Thema Kommunikation zweier Scripte

Aufgerufen wird das ganze dann vom Hauptprogramm z.B. so oder so ähnlich:

for $i = 0 to ubound($aIP)-1
$laufendeProzesse[$i]=run(@scriptdir & "\meinePing.exe " & $aIP[$i])
next

Und ja wenn man das sinnvoll lösen will wird es durch die Aufteilung in 2 Programme etwas komplexer, aber letztlich ist es so deutlich performanter.

Deine Screenshots sind von ein und demselben Control. Auf gut Glück die Instance Nummer zu ändern bringt dich nicht weiter. Du musst wirklich mit au3info die einzelnen Elemente im Authentifizierungsfenster markieren. Wenn au3info nur ein großes Element erkennt ist das Fenster eventuell nicht aus Standardcontrols zusammengestellt. Im Anhang findest du nochmals 2 Screenshots wie das ganze ausschaun sollte.

Wenn dich au3info hier nicht weiterbringen sollte wäre es vielleicht sinnvoll das Programm zu benennen, damit wir selbst testen können oder du versuchst die notwendigen Informationen hiermit zu ermitteln: https://autoit.de/index.php?page=Thread&amp;threadID=32511

Was deinen Quelltext anbelangt noch ein paar Anmerkungen:

1. Wenn du eine Endlosschleife verwendest die niemals verlassen wird, dann wird nachfolgender Code, also alles nach "Wend" niemals ausgeführt. Meine Prüfung die ich dir oben gepostet habe gehört also an den Scriptanfang vor die Endlosschleife.
2. die send() Befehle am Ende brauchst du nicht mehr wenn du mit den controlsettext und controlclick Funktionen arbeitest

Hier mal ein bereinigtes Script:

$sFile = @ScriptDir & "\passwort.txt" ;// Optional Pfad + Name anpassen
if not fileexists($sFile) then
$sText = InputBox("Passwort-Box", "Bitte gibt Ihr Passwort für ein und bestätigen Sie dieses mit 'OK'") ;// InputBox erstellen
FileWrite($sFile, $sText) ;// Text in Datei schreiben
else
$sText = fileread($sFile) ; oder meinetwegen auch filereadline, aber wenn die Datei eh nur eine Zeile hat funktioniert fileread genauso
endif

while 1
if winexists("Authentifizierung") then
ControlSetText("Authentifizierung","","[CLASS:TkChild; INSTANCE:5]",$sText) ; pw ins edit feld schreiben , infos zum edit falsch????
controlclick("Authentifizierung","","[????????????????????????]") ; ok drücken , infos zum button fehlen !!!
endif
sleep(100)
wend

Das Phänomen, dass es bei der Nutzung von filewrite in sehr seltenen Fällen vorkommt, dass die Datei verschwindet hatte ich auch schon. Daher erstelle ich vor dem filewrite eine Sicherungskopie und vergleiche anschließend die Dateigrößen. Bei Bedarf wird das Backup dann wiederhergestellt oder eben gelöscht. Aus Performancesicht ist es aber eine Katastrophe permanent in die Logdatei zu schreiben, gerade in einer Schleife würde ich das nicht tun.

Eventuell wäre ein externer Debugger sinnvoller und ressourcensparender. Dieser könnte dann alle Nachrichten die er vom zu überwachenden Script erhält sammeln und dann in Intervallen von einigen Minuten in eine Datei schreiben. Was die if Abfrage angeht würde ich mir keinen Kopf machen, dieser simple Vergleich dürfte wirklich nicht viel Zeit kosten. Aber auch hier könntest du wie schon erwähnt ein sehr einfaches Script schreiben, das dir diese Debugzeilen aus bzw. einkommentiert bevor du das ganze dann kompilierst.

Vielleicht hilft dir ja das hier: http://www.mycsharp.de/wbb2/thread.ph…846#post3710846

Alternativ würde ich einfach mal das Event mitschneiden, das an die GUI gesendet wird. Wie du das im OnEvent Mode machst weiß ich nicht, verwende ich normalerweise nicht in meinen Scripten. Aber im msgloop mode dürfte dich evtl. das Resultat von guigetmsg() weiterbringen.

Indem du auf ein Verbindungsfenster und/oder Fehlerfenster wartest? Irgendeine Rückmeldung wird dir RealVNC ja geben wenn etwas nicht wie vorgesehen klappt. Normalerweise müsste ja ein Fenster erscheinen, welches den Remote Computer anzeigt und vermutlich auch dessen IP Adresse im Fenstertitel trägt. Du könntest also vermutlich in einer "do...until" Schleife auf dieses Fenster warten und evtl auch zeitgleich in der Schleife prüfen ob stattdessen eine Fehlermeldung erscheint. Im Fehlerfall dann eben die Schleife mit exitloop verlassen.

Davon aber mal abgesehen solltest du den Start der VNC Verbindung anderst lösen, da send() ziemlich unzuverlässig ist. Verwende lieber controlsettext() und controlclick(). Alternativ bietet RealVNC auch die Möglichkeit mit cmdline Parametern aufgerufen zu werden, was evtl am zuverlässigsten und einfachsten wäre.

http://www.realvnc.com/products/open/…ConnectionFiles

Korrekt wäre wohl eher:

stringreplace($string,"|","")

Stringsplit entfernt aber natürlich auch das (oder die) definierten Trennzeichen, allerdings hat man danach eben ein Array und keinen "bereinigten" String. Das ist immer dann sinnvoll, wenn man die Struktur erhalten, also einzelnen Stringteile weiterhin getrennt behandeln können möchte. Will man hingegen nur ein Zeichen ersetzen oder entfernen genügt stringreplace.

Das ist so murks. Anstatt send() solltest du eher controlsettext() verwenden. Damit das möglich ist verwendest du zunächst das Tool au3info im SciteEditor (Menü->Tools->au3info) um Details über das Passwortfeld des Authentifizierungsfensters zu erhalten.

Hier ein Beispiel wie man au3info nutzen kann:
https://www.youtube.com/watch?v=X2gYPw1itBg

Du benötigst zum einen die Daten des PW Feldes, als auch die Daten des Login/ok Buttons. Sobald du die notwendigen Informationen hast kannst du die Befehle erstellen:

z.B. so:

ControlSetText("Unbenannt - Editor","","[CLASS:Edit; INSTANCE:1]","meinPW")
;controlclick("Unbenannt - Editor","","[CLASS:Button; INSTANCE:1]") ; mein notepad Beispiel hat keinen Button, daher sinnlos das hier zu aktivieren

Willst du nun, dass dein Programm unendlich lange läuft und immerwieder darauf wartet, dass das Fenster erscheint benötigst du eine Endlosschleife.

while 1
if winexists("Unbenannt - Editor") then
ControlSetText("Unbenannt - Editor","","[CLASS:Edit; INSTANCE:1]","meinPW")
;controlclick("Unbenannt - Editor","","[CLASS:Button; INSTANCE:1]") ; mein notepad Beispiel hat keinen Button, daher sinnlos das hier zu aktivieren
endif
sleep(100)
wend

Das Passwort speicherst du in einer Datei, das ist soweit ok, aber wenn du das schon machst, dann wäre es doch unsinnig bei jedem Programmstart erneut den Benutzer danach zu fragen. Stattdessen solltest du so vorgehen:

if not fileexists(@scriptdir & "\passwort.txt") then
$sText = InputBox("Passwort-Box", "Bitte gibt Ihr Passwort für ein und bestätigen Sie dieses mit 'OK'") ;// InputBox erstellen
FileWrite(@scriptdir & "\passwort.txt", $sText) ;// Text in Datei schreiben
else
$sText = fileread(@scriptdir & "\passwort.txt") ; oder meinetwegen auch filereadline, aber wenn die Datei eh nur eine Zeile hat funktioniert fileread genauso
endif

Da du von mehreren Benuzeraccounts mit verschiedenen Passwörtern sprachst bietet es sich an statt @scriptdir ein Verzeichnis des jeweiligen Windowsbenutzers zu verwenden, also z.B

@AppDataDir & "\deinprogrammname\password.txt"

Das fertige Script sollte dann diesen Ablauf haben:

#cs
1. Passwort aus Datei lesen oder wenn Datei nicht vorhanden vom Benutzer erfragen und dann speichern
2. Endlos Schleife, welche prüft ob das fenster exisitert
3. Sobald es existiert pw Feld ausfüllen und ok button drücken
4. Endlosschleife läuft weiter bis Programm beendet wird, also spätestens beim abmelden des Windows Accounts
#ce

Kleine Bemerkung am Rande:

Es ist keine Gute Idee Passwörter in Klartext Dateien zu speichern. Ich würde also entweder grundsätzlich den Benutzer beim Programmstart danach fragen und nie speichern, oder wenn schon speichern dann wenigstens verschlüsselt. Dazu solltest du dir mal die Hilfe bezüglich den crypt Funktionen anschauen.

Ich mach dir mal 2 Vorschläge:

1. Bitte arbeite an deiner Ausdrucksweise bzw. an deinen Formulierungen, Satzbau und der Rechtschreibung. Es ist wirklich schwer deine Postings zu verstehen und grausam diese zu lesen. Wenn man schon selbst keine Lösung findet oder zu faul ist selbst danach zu suchen (google / Forensuche) sollte man wenigstens etwas mehr Arbeit in seine Postings stecken, damit auch jemand versteht was man eigentlich für ein Problem hat. (bezieht sich jetzt nicht nur auf diesen Thread)

2. Du scheinst absoluter Anfänger in Sachen Autoit zu sein. Daher rate ich dazu, dass du dich erstmal an leichteren Dingen versuchst und dir ein gewisses Grundwissen über die Sprache Autoit aneignest. Dazu bietet sich zum Beispiel das Buch von peethebee an ( https://autoit.de/index.php?page=Thread&amp;threadID=11898 ) und auch die deutsche Autoit Hilfe mit den zugehörigen Beispielscripten der einzelnen Funktionen.

Verstehe nicht was du nun willst. Es gibt genau zwei Fälle, entweder JA (Name identisch) oder NEIN (Name nicht identisch). Alles was im NEIN Fall gemacht werden soll muss demzufolge in den ELSE Zweig. Wenn da nichts gemacht werden soll kannst du das else auch komplett weglassen oder den Schleifendurchlauf mit continueloop überspringen. Wenn grundsätlich etwas gemacht werden soll unabhängig ob JA oder NEIN Fall, dann kannst du das vor Beginn oder nach Ende der IF Bedingung tun. Wenn du hingegen nur solange in deiner FOR Schleife vergleichen willst bis zum erstenmal der JA Fall eintritt, dann setze ein exitloop ans ende des JA Falles.

Naja da deine "pruef" Funktion in jedemfall etwas in die console schreiben würde, wenn sie aufgerufen wird dürfte wohl die if Bedingung in der Schleife deiner "_MAILGUCK()" Funktion niemals erfüllt sein.

Ich würde also hier mal sowohl vor als auch nach der If Bedingung debuggen:

For $n = 0 To UBound($virtual) - 1
;ConsoleWrite($virtual[$n]& @CRLF)
consolewrite("Stringcheck: " & $maillesen2[0] & " <--> " & $virtual[$n] & @crlf)
If StringInStr($maillesen2[0], $virtual[$n], 0) Then
consolewrite("Stringcheck ok!" & @crlf)
$item = $virtual[$n]

Habe sowas auch, allerdings nicht ganz soviele Daten. Ich habe das unter anderem dadurch beschleunigen können, dass ich grundsätzlich alle listview UDF Funktionen rausgeworfen habe, da diese massivst langsamer waren. Bei dir sehe ich z.B. noch

_GUICtrlListView_DeleteAllItems($ListView)

Ich lösche stattdessen das ganze Listview Control, baue mir ein neues gefiltertes Array und erzeuge das Listview dann komplett neu. Um die Stammdaten nicht neu einlesen zu müssen verbleibt grundsätzlich ein ungefiltertes Array im Speicher und die Listviews werden je nach Fall direkt aus dem ungefilterten oder eben aus dem ggf. aktualisierten gefilterten Array erstellt. Ich verwende deshalb ein zweites gefiltertes Array, damit das Zuschalten weiterer Filter nicht erfordert, dass man das ungefilterte Array durchlaufen muss, sondern das neue gefilterte Array auch aus einem bereits vorgefilterten Array erstellt werden kann. Du gehst soweit ich das sehe immer das gesamte ungefilterte Array, also alle 50000 Zeilen durch.

Wichtig sind auch Optimierungen in der Filterschleife, die das gefilterte Array aktualisiert/neu aufbaut. Hier lohnt es sich z.B. wenn man die Filter nach logischer (oder wahrscheinlichster Ausschluss-) Reihenfolge prüft und den Schleifendurchlauf mit continueloop überspringt, wenn bereits eines der x-Filterkriterien ein Ausschlusskriterium ist. Du prüfst derzeit alle Kriterien auf einmal wenn ich das recht sehe. (ist auch unübersichtlich alle Filter in einer einzigen if-Bedingung zu haben...)

Was du mit LiveSearch meinst müsstest du nochmal genauer beschreiben, ich vermute du möchtest bereits bei der Eingabe eines Suchbegegriffs mit dem Filtern anfangen, was dann wohl mächtig auf die Performance gehen wird. Sowas habe ich mal für ein Script mit mehreren tausend Checkboxen realisiert. (in Wahrheit gibts es nur 120 Checkboxen deren Text bei jeder Ergenisseite aktualisiert wird)

https://www.youtube.com/watch?v=t7Xbl0zu8GY

Um die Performance zu steigern solltest du da mit timern arbeiten, also eine kleine Latenz von einigen ms einbauen, bevor erneut geprüft wird ob der Anwender Daten eingegeben hat. So spart man sich unnötige Filterungen und kann gleich mit längeren Suchbegriffen filtern, bzw. nicht sofort für jeden getippten Buchstaben.

Wo ist das Problem den Unterschied zwischen einer exe/rar/zip Datei zu erkennen? Prüfe einfach in einem switch case die Dateiendung. Im Falle von Archiven bietet es sich an die 7zip.dll oder 7zip.exe beizulegen und zu benutzen. Findest du über die Forensuche zu genüge Beispiele, auch Lösungen die ohne 7zip auskommen. Da du aber auch rar Archive abdecken willst dürfte 7zip die sinnvollste Lösung sein. Mit Windows Boardmitteln kann man nur zip Archive entpacken. Das Wort Updater ignoriere ich einfachmal solange bis du den Begriff vernünftig definierst, siehe dein anderer Thread.

Aber dir muss schon klar sein, dass eine Individualprogrammierung bedeutend mehr Kohle kostet als ein Massenprodukt zu kaufen, zumindestens wenn man professionell kalkuliert.

Und bezüglich deiner Beschreibung kann ich den anderen hier nur beipflichten, daraus wird keiner wirklich schlau. Du fasselst nur igendwas von deiner Fritzbox, FTP, irgendwelchen Updates, rar und zip Archiven, md5 Summen usw.. Ein Programmierer braucht klare Aufgaben, eine möglichst detailierte Skizze was das Programm in welchem Fall tun soll, was das Ziel des ganzen ist... du definierst noch nichteinmal was du unter dem Begriff Updater verstehst. Was soll denn geupdated werden? Deine eigene Software, x-beliebige Software? Woher sollen die Updates stammen? Ich könnte die Liste bis ins unendliche weiterführen, da du einfach garnichts was relevant wäre in deinem Posting klärst.

Das einzige was der Programmierer leisten soll und muss ist das "WIE" zu realisieren, aber selbst da muss der Auftraggeber klare Grenzen setzen. Wenn du selbst nicht weißt "WAS" du genau willst oder es nicht verständlich und glasklar beschreiben kannst brauchst du erst garnicht davon ausgehen, dass irgendjemand den Umfang abschätzen und irgendwas kalkulieren kann. Vielleicht solltest du dich vorher erstmal mit den Themen Lasten und Pflichtenheft beschäftigen.

Und das Problem liegt nun wo? Funktioniert absolut einwandfrei, zumindestens bei sichtbarem Fenster, aber für die control Funktionen spielt es wie gesagt keine Rolle ob das Fenster sichtbar oder unsichtbar ist, siehe Beispiel oben.
Im Anhang findest du alle Au3Info Logs die man braucht, also zumindestens bis zu dem Schritt bei dem ich nun erstmal abgebrochen habe.