dass das problem die sleep funktion ist, die ich aber brauche!!
der rechner würde sonst unnötig viel belastet...
Wenn du mit "GUIGetMsg()" arbeitest, brauchst du das Sleep nicht. Wenn du es verwendest reicht ein Sleep(100), CPU-Last dann bei 8 - 12 %.
Probier mal so:
#include <GUIConstants.au3>
AutoItSetOption("WinTitleMatchMode", 2)
GUICreate ( "programm" , 300 , 450)
$create = GUICtrlCreateButton("Create", 125, 265, 60)
GUICtrlCreateLabel( "Crashes:" , 100 , 100)
$i = 0
$number = GUICtrlCreateLabel( $i , 150 , 100)
GUISetState (@SW_SHOW)
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
if not WinExists("titel") or WinExists("teiltitel") then
if FileExists("programm.exe") Then run("programm.exe")
$i = $i + 1
GUICtrlSetData($number, $i)
EndIf
Wend
Edit:
Ist das gewollt:
if not WinExists("titel") or WinExists("teiltitel") then
[/autoit]
= Wenn "titel" nicht existiert ODER "teiltitel" existiert dann
Ich hab mal in meinen Spam-Ordner geschaut und folgendes entdeckt:
Wollte ich nur nochmal erwähnen. Das passiert bei mir vollautomatisch. Alles was 'Bank', 'Geld', 'Anwalt', 'Rechnung' u.v.a.m. enthält, wird von meinem Spamordner sofort geschluckt. 
Daran hab ich mich auch schon mal versucht. Ich hab dann aber aufgehört,weil schon "GUICtrlSetGraphic($gra, $GUI_GR_LINE, $x, $y)" völlig unerwartet arbeitet. (Line beginnt immer bei 0,0 des Grafikbereiches mit Länge $x bis $y als senkrechter Parameter.
rasdial [connectionname] /disconnect
connectionname : Specifies an entry in the current .pbk file, located in the systemroot\System32\Ras folder. If the connection name contains spaces or special characters, enclose the connection name in quotation marks (").
Da findest du den Verbindungsnamen.
Da liegt der Hund begraben:
[autoit]Dim $A_CLUSTERSTATUS[1] ; muß auch als Array deklariert werden, sonst funzt _ArrayAdd nicht
[/autoit]Es ist allerdings eine gute Idee (von BugFix?), dass man ein Passwort mit sich selbst verschlüsselt
Ich weiß nicht, ob ich der Urheber der Idee war , gut ist sie trotzdem. Hier mal ein Bsp.
Das PW ist innerhalb des Skriptes immer codiert. Nur bei der Interaktion mit dem User wird es im Klartext verwendet.
#include <guiconstants.au3>
#include <String.au3>
$gui = GUICreate('')
$iUserPasswort = GUICtrlCreateInput('',20,10,-1,-1,$ES_PASSWORD)
$btn1 = GUICtrlCreateButton("Encrypt",20,40)
$btn2 = GUICtrlCreateButton("Decrypt",175,40)
GUISetState()
While 1
$msg = GUIGetMsg()
Switch $msg
Case $btn1
$encrypt = _StringEncrypt(1, GUICtrlRead($iUserPasswort), GUICtrlRead($iUserPasswort) )
MsgBox(0, '', $encrypt)
Case $btn2
$original = _StringEncrypt(0, $encrypt, GUICtrlRead($iUserPasswort) )
MsgBox(0, '', $original)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Schick mal dein File.
Kann man das ergebnis direkt ohne fileübergabe in ein array einlesen ??
Wenn die Ausgabe im DOS-Fenster erscheint, kannst du mit StdoutRead( ) arbeiten
Bei mir zeigt er es an, aktuelle AutoIt-Version vorhanden?
Deine Auswertung funktioniert, 'online' wird gefunden. Was also ist das Problem?
Und so liest du das Paßwort auch gar nicht erst im Klartext in eine Variable, sondern verschlüsselt.
[autoit]$pwkey = "vzf$/[hj+l"
$iUserPasswort = GUICtrlCreateInput("", 338, 267, 140, 21,$ES_PASSWORD)
$pwEncrypt = _StringEncrypt(1, GUICtrlRead($iUserPasswort), $pwkey )
Auch von mir:
:D..........:D...........:D...............:D:D.........:D:D........:D.......:D
:D..........:D.........:D:D............:D.....:D....:D.....:D.....:D....:D
:D..........:D........:D...:D..........:D.....:D....:D.....:D.......:D:D
:D:D:D:D........:D:D:D.........:D.:D........:D.:D.............:D
:D..........:D......:D........:D.......:D..............:D...................:D
:D..........:D.....:D..........:D......:D..............:D...................:D
:D..........:D....:D.............:D....:D..............:D...................:D
2000
[Blockierte Grafik: http://home.arcor.de/bugfix/icon_bugfix1.gif]
Immer wenn ich den Speicher Wert gesetzt habe hat der Simulator den wieder sofort zurückgestellt.
Prüfe mal, ob der Wert evtl. noch auf einem Referenzspeicherplatz mitgespeichert wird. Das hatte ich mal bei einem Spiel, da mußten immer beide Speicher überschrieben werden.
Ist es nicht einfacher den Speicherwert direkt auszulesen bzw. zu schreiben?
UDF dafür im EN-Forum:
http://www.autoitscript.com/forum/index.php?showtopic=19329&hl=memory++read
Hier mal ein konkretes Musterbeispiel, wie du jeden Mausklick im Fenster abfängst:
[autoit]#include <GUIConstants.au3>
AutoItSetOption('MouseCoordMode',0)
$gui = GUICreate('Test')
GUISetState()
While 1
$msg = GUIGetMsg(1)
If $msg[1] = $gui Then
Switch $msg[0]
Case $GUI_EVENT_PRIMARYDOWN
MouseMove(0,0,1)
Case $GUI_EVENT_SECONDARYDOWN
MouseMove(0,0,1)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
EndIf
WEnd
1. Ist wirklich sicher, dass der IE nicht doch dahin navigiert ?
2. Müsste ich verdammt viele Links angeben.....
zu 1.
Hab es mehrfach im Einsatz ( harter Dauertest bei meinen Kindern als Schutz vor falschen Klicks ). Funktioniert tadellos.
zu 2.
Wenn du alles sperren willst:
Wenn Link Element von _IELinkGetCollection( ), dann skip.
Edit:
Ganz andere Idee. Gar keine Mausaktionen in diesem Fenster zulassen.
Etwa so:
While 1
If $GUI_EVENT_PRIMARYDOWN Or _
$GUI_EVENT_SECONDARYDOWN Then MouseMove(0,0,1)
;...
Wend
Schau mal hier:
Links auf IE - Site sperren
ob dir das evtl. hilft.
Hiermit kannst du zumindest die Verbindungseinstellungen für den MS IE anzeigen lassen:
$strComputer = "."
$objWMIService = ObjGet("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & $strComputer & _
"\root\cimv2\Applications\MicrosoftIE")
$colIESettings = $objWMIService.ExecQuery _
("Select * from MicrosoftIE_ConnectionSettings")
$str = ''
For $strIESetting in $colIESettings
$str &= "Allow Internet programs: " & _
$strIESetting.AllowInternetPrograms & @LF & _
"Autoconfiguration URL: " & $strIESetting.AutoConfigURL & @LF & _
"Auto disconnect: " & $strIESetting.AutoDisconnect & @LF & _
"Autoconfiguration proxy detection mode: " & _
$strIESetting.AutoProxyDetectMode & @LF & _
"Data encryption: " & $strIESetting.DataEncryption & @LF & _
"Default: " & $strIESetting.Default & @LF & _
"Default gateway: " & $strIESetting.DefaultGateway & @LF & _
"Dialup server: " & $strIESetting.DialUpServer & @LF & _
"Disconnect idle time: " & $strIESetting.DisconnectIdleTime & @LF & _
"Encrypted password: " & $strIESetting.EncryptedPassword & @LF & _
"IP address: " & $strIESetting.IPAddress & @LF & _
"IP header compression: " & _
$strIESetting.IPHeaderCompression & @LF & _
"Modem: " & $strIESetting.Modem & @LF & _
"Name: " & $strIESetting.Name & @LF & _
"Network logon: " & $strIESetting.NetworkLogon & @LF & _
"Network protocols: " & $strIESetting.NetworkProtocols & @LF & _
"Primary DNS server: " & $strIESetting.PrimaryDNS & @LF & _
"Primary WINS server: " & $strIESetting.PrimaryWINS & @LF & _
"Proxy: " & $strIESetting.Proxy & @LF & _
"Proxy override: " & $strIESetting.ProxyOverride & @LF & _
"Proxy server: " & $strIESetting.ProxyServer & @LF & _
"Redial attempts: " & $strIESetting.RedialAttempts & @LF & _
"Redial wait: " & $strIESetting.RedialWait & @LF & _
"Script fileame: " & $strIESetting.ScriptFileName & @LF & _
"Secondary DNS server: " & $strIESetting.SecondaryDNS & @LF & _
"Secondary WINS server: " & $strIESetting.SecondaryWINS & @LF & _
"Server assigned IP address: " & _
$strIESetting.ServerAssignedIPAddress & @LF & _
"Server assigned name server: " & _
$strIESetting.ServerAssignedNameServer & @LF & _
"Software compression: " & $strIESetting.SoftwareCompression
MsgBox(0, '', $str)
$str = ''
Next
'_' am Ende bedeutet Befehsfortsetzung in Folgezeile.
