Beiträge von Lottich

hey $var

mit "< 6" hab ich mich auf @error bezogen, geht bis 4, ich weiss, wollte eigentlich auch die 5 anstatt 6 nehmen

Allerdings klappt das von dir gepostete leider auch nicht.

Ich will, dass mir, sobald die Verbindung wieder besteht, die MsgBox mit der Timerdifferenz angezeigt wird.

Hey all

Ich werd es wohl nie begreifen

Ich hab seit längerem Probleme mit meiner Internetverbindung. Deshalb will ich mir einen Timer basteln, der die Ausfälle protokolliert.
Ich pinge zu diesem Zweck google an und wenn die Verbindung nicht zustande kommt, soll der Timer gestartet werden und wieder beendet werden,
sobald die Verbindung wieder da ist.

Zu Testzwecken hab ich das folgende Script gestartet, die Verbindung selber getrennt und nach ner Weile wieder hergestellt.
Doch nix passiert. Warum klappt das nicht??

#region Funktionen für den Nicht-Online-Checker
Func onlinecheck()
If Ping("http://www.google.de/") Then
$timer = 0
Sleep(2000)
Else
$timer = TimerInit()
While Ping("http://www.google.de/") < 6
Sleep(1000)
WEnd
$timestring = TimerDiff($timer)
MsgBox(0,"",$timestring)
EndIf
EndFunc
#endregion

While 1
onlinecheck()
Sleep(200)
WEnd

das hab ich jetzt zu spät gelesen, habs grad NICHT drübergebügelt, sondern neu installiert...

Dann heisst es jetzt abwarten und beobachten :wacko:

aber dieses Script her funktioniert jetzt

Hallo UEZ

bei mir treten folgende Fehler auf:

Auszug von Au3Check errors

mein OS: Win7 x64
AutoIT: last stable

Wie lässt sich das fixen

Wie wär es denn mit einer Lösung über die Registry? Diese ist schliesslich auf jedem Win-OS vorhanden und die Umstellung von IniRead zu RegRead ist wohl das simpelste.
Sollten sich dann irgendwann mal Pfade ändern oder neue hinzukommen, muss auch in diesem Fall die .exe nicht neu geschrieben werden.

hey

wie genau meinst du das? Sprichst du von einem AutoIt-fremden Fenster oder von einer AutoIt-GUI ?

wenn das letztere der Fall ist, dann gibt es mehrere Möglichkeiten.

1. Eine GUI im Popup-Stil

Global $hGUI = GUICreate("Userinterface",100,50,-1,-1,$WS_POPUPWINDOW,$WS_EX_CONTROLPARENT)

2. im OnEventMode=1 einfach die Deklaration fürs Beenden weglassen

3. im GuiGetMsg-Modus gilt das selbe wie für 2.

Wenn es sich allerdings um ein AutoIt-fremdes Fenster handelt bin ich leider überfragt.

Aber welchen Sinn soll das haben?

MfG Lottich

Hey,

die Hauptgui mit dem Eingabefeld erstelen und in deren Whileschleife baust du eine select-case schleife ein.
Je nach eingegebenen Wert wird eine andere Funktion gestartet, die dann eine weitere GUI erstellt.

Nachtrag:
Schnapp dir die Hilfedatei, die AutoIt mit sich bringt. Schlagwörter für die Suche sollten sein:
- guicreate
- select case

Raupi :
Jetzt, wo ich mir deine letzten Beispiele so ansehe muss ich dir absolut recht geben, dass der Code, wie ich ihn mir zurecht gelegt hab,
umständlich und kompliziert ist. Aber er funtkioniert tatsächlich. Sselbst wenn ich mit der Maus (bei gedrücktem Button) von diesem Button
vorzeitig weggehe, läuft die Zeit nicht weiter und GUIGetMsg funktioniert wieder, denn unmitelbar danach hab ich auf den 2. Button geklickt
und schwupps kam die Messagebox.

Was mir erst jetzt klar geworden ist, beim Blick auf deinem letzten Post:

Case $nmsg = $GUI_EVENT_PRIMARYDOWN

Warum ich nicht drauf gekommen bin?! Weil ich in dem Script, wo der Button zum Einsatz kommen soll, ja bereits mit

Case $nmsg = $GUI_EVENT_CLOSE

arbeite...
Manchmal sieht man eben den Wald vor Bäume nicht.

Fazit:
Ich muss noch ne ganze Menge lernen. Dabei schien es mir eine gute Idee zu sein, den OnEventMode zu aktivieren und wieder zu deaktivieren.

Hey all,

Ich habe jetzt alle Funktionen getestet. Sie funktionieren alle gut.
Vielen Dank nochmals, dass ihr euch für dieses Problem begeistern konntet.

Letztendlich hab ich mich für die 2. Variante von K4z entschieden, denn diese ließ sich für mich am besten bearbeiten.
Denn das Programm, wo dieser Button eingesetzt werden soll, läuft nicht im "OnEventMode".
Von diesem Mode hab ich mich schon vor langer Zeit losgelöst, denn ich arbeite fast nur noch mit Funktionen (die ich selber anlege), die mit Parametern gestartet werden.
Und ihr wisst ja, dass sich "OnEventMode" nicht mit "GUIGetMsg" verträgt.

Über Trick 17 hab ich es nun hinbekommen, dass der Button auch für "GUIGetMsg" funktioniert, allerdings nur mit nem Doppelklick, wobei dann der 2. Klick gehalten werden muss.

Jetzt meine Frage:
Ist der Code so okay und/oder kann man den noch verschönern?

MfG Lottich

Zitat von misterspeed

Naja was sagt dir an solch einer Lösung denn nicht zu? Ging es nur darum dass dir nicht klar war wie man solch eine Abfrage realisiert (per msgbox oder zweiter eigener GUI...) oder gefiel dir das nur nicht? Ganz ehrlich ich als Benutzer eines Programmes bin eher eine msgbox Abfrage gewohnt, welche mich nochmals auf die Gefahren einer bestimmten Funktion hinweist, als irgendeinen Button 5 Sekunden gedrückt halten zu müssen. Diese Lösung mag zwar nett sein, ist aber letzten Endes wenig Anwenderfreundlich und dauert länger als einfach kurz ein zweites mal auf "ja ich will" zu klicken.

Eine Lösung ohne msgbox Abfrage könnte im übrigen auch so ausschauen:

Checkbox die man ankreuzen muss, vergleichbar mit dem bestätigen einer AGB in Onlineshops. Nur wenn die Checkbox angekreuzt ist wird der zugehörige Button aktiviert und kann angeklickt werden. Ist die Checkbox nicht angekreuzt bleibt der Button ausgegraut, also inaktiv und nicht klickbar.

Hi Misterspeed,

wie ich sowas mit einer 2. GUI oder einer Messagebox realisieren kann weiss ich durchaus. Aber auf Arbeit müssen wir in einem Programm arbeiten bei dem es solch einen Button gibt und ich finde diese Lösung hervorragend.
Das mit der Checkbox halte ich mir bereits in Reserve, falls das mit dem gedrückt halten nicht funktionieren wird.

Raupi
Hey,

danke für deinen Code. Den werd ich auch auf jeden Fall testen.

MfG Lottich

Zitat von K4z

Hier noch eine Variante mit dem OnEventMode:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1)

[/autoit] [autoit][/autoit] [autoit]

GUICreate("test")
GUISetOnEvent($GUI_EVENT_CLOSE, "_exit")
GUISetOnEvent($GUI_EVENT_PRIMARYDOWN, "_TestButton")
Global $btn = GUICtrlCreateButton("testbutton",10,10)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

While 1
Sleep(10)
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func _TestButton()
$timer = TimerInit()
While 1
Sleep(100)
$aCursorInfo = GUIGetCursorInfo()
If $aCursorInfo[2] And $aCursorInfo[4] = $btn Then
If TimerDiff($timer) > 5000 Then ExitLoop
Else
Return
EndIf
ConsoleWrite(TimerDiff($timer) & @CRLF) ; Nur zum Testen, dass es auch wirklich läuft
WEnd
MsgBox(0, "", "jetzt wird die funktion hoffentlich nur einmal gestartet")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _exit()
Exit
EndFunc

[/autoit]

Alles anzeigen

Das scheint die Lösung! Die GUI hängt sich nicht auf und selbst wenn ich den Button nur kurz klicke kann ich noch andere Buttons klicken. Danke für diesen Post.

hey Leviathan

Auf den ersten Blick funktioniert das. Leider hat sich herausgestellt, dass diese Methode verbuggt ist.
Klickt man nur kurz auf den Button hängt sich die GUI auf. Man kann dann zwar immer noch den Button geklickt halten und die Testmessage (als funktionsersatz) erscheint,
aber es funzt dann nix anderes mehr. GUI kann nicht normal geschlossen werden und andere Buttons funktionieren auch nicht mehr.

Hey.

Ich habe einen Button, der eine ziemlich "sensible" Funktion ausführt. Wenn ich nun aus versehen diesen Button klicke, kann das "unangenehme" Folgen nach sich ziehen.
Jetzt könnte man sagen: "Bau doch eine zusätzliche Abfrage als Sicherheit rein, ob du das wirklich machen willst..."

Ja, daran hab ich schon gedacht. Aber dem fehlt jegliche "Rafinesse". Wie löse ich das denn ab besten?

Hab diese Schleifen auch schon mit "Do ... until" und "For ... Next" versucht, aber nix klappt.

Kann mir jemand weiterhelfen?
MfG Lottich

Leider stehen mir scheinbar nicht alle Serverrollen zur Verfügung, hab nur 2 zur Auswahl und das mit dem "Remote-Kram" ist leider nicht dabei
Also mach ich das über TCP. Das muss ich aber erst üben, damit ich in meinem "Serverprogramm", was ich für TCP verändern muss, auch weiss, was ich mache. Deshalb mach ich das erstmal mit nem neuen Script.

Habe den TCP-Server und die Client-GUI erstellt und es funktioniert auch. Aber habe bereits jetzt schon 2 Fehler (eher Fehlverhalten) im Client-GUI gefunden, wo ich nicht weiss, wie ich diese fixen kann/soll.

Fehler 1:
Will ich einen empfangenen Text us dem Editfeld markieren, dann verschwindet der einfach während ich mit gedrücktem Mausbutton über den Text fahre, obwohl ich das Feld auf readonly gesetzt hab!

Fehler 2:
In der Funktion _eingabe_senden() krieg ich es nicht gebacken, dass wenn der String keine Werte enthält, die Message nicht gesendet wird. z.B 4x Leerzeichen wird gesendet. Dachte mir, dass ich das am besten mit
StringToBinary() lösen kann, aber hab grad kein Plan wie es weiter gehen soll... Die Binärdaten eines Leerzeichens sind glaub ich "0x20" und viele Leerzeichen "0x2020202020 ..."
Wie kann ich sicherstellen, dass die Message NUR DANN gesendet wird, wenn im Inputfeld auch tatsächlich was geschrieben wurde?

Werft doch bitte mal nen Blick drauf.

Grüsse, Lottich

Zitat von Zattoo

Spoiler anzeigen

unter autoit3script (wenn du das meinst) steht

Zitat

Code

Windows Registry Editor Version 5.00


[HKEY_CLASSES_ROOT\AutoIt3Script]
@="AutoIt v3 Script"


[HKEY_CLASSES_ROOT\AutoIt3Script\DefaultIcon]
@="E:\\AutoIt3\\Icons\\au3script_v10.ico"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell]
@="Open"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Compile]
@="Compile Script"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Compile\Command]
@="\"E:\\AutoIt3\\Aut2Exe\\Aut2Exe.exe\" /in \"%l\""


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\CompileX64]
@="Compile Script (x64)"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\CompileX64\Command]
@="\"E:\\AutoIt3\\Aut2Exe\\Aut2Exe_x64.exe\" /in \"%l\""


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\CompileX86]
@="Compile Script (x86)"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\CompileX86\Command]
@="\"E:\\AutoIt3\\Aut2Exe\\Aut2Exe.exe\" /in \"%l\""


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Edit]
@="Edit Script"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Edit\Command]
@="\"E:\\AutoIt3\\SciTE\\SciTE.exe\" \"%1\""


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Open]
@="Open"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Open\Command]
@="\"E:\\AutoIt3\\SciTE\\SciTE.exe\" \"%1\""


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Run]
@="Run Script"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\Run\Command]
@="\"E:\\AutoIt3\\AutoIt3.exe\" \"%1\" %*"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\RunX64]
@="Run Script (x64)"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\RunX64\Command]
@="\"E:\\AutoIt3\\AutoIt3_x64.exe\" \"%1\" %*"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\RunX86]
@="Run Script (x86)"


[HKEY_CLASSES_ROOT\AutoIt3Script\Shell\RunX86\Command]
@="\"E:\\AutoIt3\\AutoIt3.exe\" \"%1\" %*"

Alles anzeigen

Also wenn ich mich nicht täusche, dann hat name22 folgendes geschrieben:

Zitat von name22

Was steht bei dir denn jetzt unter: HKCR\.au3? Mach mal nen Rechtsklick auf den Ordner -> Exportieren, speicher die Datei, Rechstklick auf die Datei -> Bearbeiten und poste hier mal den Inhalt.

Und wenn ich davon ausgehe, dass ich lesen kann, dann muss ich davon ausgehen, dass du es nicht kannst.

Windows Registry Editor Version 5.00


[HKEY_CLASSES_ROOT\.au3]
"PerceivedType"="text"
@="AutoIt3Script"


[HKEY_CLASSES_ROOT\.au3\PersistentHandler]
@="{5e941d80-bf96-11cd-b579-08002b30bfeb}"


[HKEY_CLASSES_ROOT\.au3\ShellNew]
"FileName"="Template.au3"

Erkennst du den Unterschied?
Ich hab keine Ahnung, ob dies des Rätsels Lösung ist, aber versuch doch mal dich etwas mehr zu konzentrieren. Denn dann ist auch die Chance grösser, dass wir dir helfen können. Nur mal so am Rande und nicht böse gemeint.

name22

kann es sein, dass es sich hierbei um nen Aprilscherz handelt?

Hey,

hier mal was bei mir unter "HKEY_CLASSES_ROOT\AutoIt3Script\Shell" zu finden ist.
OS: Win7 Ultimate x64

mit Standard-installationspfad, musst du also für dich noch abändern.

Hoffe, das hilft dir.

Grüsse vom Lottich

Vielen Dank für eure Tips.

Ich werd mir das morgen mal genauer unter die Lupe nehmen. Wenn ich das hinbekomme, wär das ein neuer Meilenstein für mich.

cya, Lottich

Zitat von guidok

Hi Marvin,
das wäre sicher die sauberste Lösung, da hast du recht, aber die NCP Primärverbindung liegt in einem outgesourcten Rechenzentrum und lässt keine WOL Pakete oder ähnliches in unser Netz durch. Das ist verboten! Rechenzentrumsparanoia!!
Ich muss da leider am Client ansetzen und den eben am Schlafen hindern.
Gruß
Guido

Was bitte hat das mit meinem Topic zu tun??

@Marvin
Danke für den Tip. Muss ich dafür das Programm vom Server umschreiben, damit TCP funktionieren kann?

Hey all,

ich habe Programm in AutoIt geschrieben, das auf meinen Rootserver läuft (permanent). Darauf muss ich in unregelmäßig häufigen Abständen zugreifen und hier und da mal einen Button klicken.
Das Programm läuft fehlerfrei. Um mir jedoch die ewige "Hin-und-her-tabberei" von meinem Desktop zum Root und wieder zurück zu ersparen, würd ich das gern so realisieren, dass ich mir ein Programm schreibe,
mitdem ich von meinem eigenen Rechner aus zumindest die wichtigsten Buttons klicken kann.

1. Hoffe ich, dass ihr versteht was ich meine (nicht sicher, ob ich mich deutlich genug ausgedrückt hab)
2. Ist das überhaupt möglich?

mfG Lottich