Bei mir geht's ganz normal IE öffnet sich, GUI schließt sich. wenn ich das Exit wegnehme, dann kann ich auch mehrmals den IE öffnen. (WinXP SP2, IE7)
Beiträge von funkey
-
-
Ich kann leider nicht viel anfangen mit deiner Frage. Das hängt jetzt ganz davon ab wie der Stempel aussieht. Am leichtesten ist es wenn er Quadratisch ist und das darunterliegende Bild vollkommen überdeckt. Dann kannst du PixelChecksum verwenden und in einer Schleife das ganze Bild durchforsten. Sonst wird die Sache schwieriger, vllt kannst du ja mal ein Beispiel-Bild anhängen?
-
Ja Code wäre super. Ich kann nämlich so nichts entdecken. Code eines Buttons in einer Gui. Läuft auch nach mehrfachem Aufrufen einwandfrei.
[autoit]$url = "www.autoit.de"
[/autoit]
$oIE = _IECreate($url)
_IEQuit($oIE) -
???????
[autoit]If Not FileExists(@UserProfileDir&"\Exist.txt") Then
[/autoit]
Run(@ScriptDir & "files\a.exe")
WinWait("Titel")
WinActivate("Titel")
$Datei = FileOpen(@UserProfileDir&"\Exist.txt",10)
FileWrite($Datei, "")
EndIfSo??
-
Wie soll denn das gehen. Wenn der PC im Standby oder überhaupt aus ist, dann kann ihn auch kein Autoit wecken. Außer vllt übers Netzwerk.
-
Mit $WM_WINDOWPOSCHANGED funktioniewrt es jetzt ja. Ich denke (hab's jetzt auch getestet
) das hat damit zu tun, dass ich die Option 'Fensterinhalt bein Ziehen anzeigen' abgeschaltet habe. Als ich es eingeschaltet hatte, funktionierte auch $WM_MOVING. Also danke für diese tolle GUI und den Support. 
-
Kein Erfolg, leider. Die Funktion wird also beim MouseDown ausgeführt und nicht beim MouseUp, bei mir

Edit: Besser gesagt, wenn das Fenster beginnt sich zu bewegen und dann nur einmal!
EDIT: Damit funktioniert's!
[autoit]Global Const $WM_WINDOWPOSCHANGED = 0x0047
[/autoit] -
Natürlich 3.2.12.1, hab jetzt die Beta und die Stable deinstalliert, danach wieder die Stable installiert. Ohne Erfolg
-
Bei mir nicht. Er ist immer nur an der vorherigen Position des Fensters? Das ist also nicht so geplant?

Translate.ZIP -
Dieses Teil ist hammermäßig!!! Sieht einfach super aus! Nur der Schatten, das ist nicht so mein Fall wenn er immer an der letzten Position des Fensters zu sehen ist. Auf alle Fälle toller Code Oscar!
-
Oscar hat die beste Lösung, du hast sie nur nicht genommen weil kein Beispiel dabei war, stimmts?
-
So etwa?
Spoiler anzeigen
[autoit]#Include <Misc.au3>
[/autoit] [autoit][/autoit] [autoit]
AdlibEnable("Mouse")While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep(10)
WEndFunc Mouse()
[/autoit] [autoit][/autoit] [autoit]
If _IsPressed(01) Then Mouse_Links()
If _IsPressed(02) Then Mouse_Rechts()
EndFunc
Func Mouse_Links()
MsgBox(0,"","links")
EndFuncFunc Mouse_Rechts()
[/autoit]
MsgBox(0,"","rechts")
EndFuncWar wohl zu langsam

-
Schau dir den Befehl _FileReadToArray an. Damit hast du jede Zeile in einem Array. Geh dann in einer for-Schleife alle Einträge des Arrays durch und ersetze am besten ';' mit'|'. Dann erzeugst du in der Gui ein Listview(guicreatelistview) und mit jedem Eintrag ein ListViewItem (GuiCreateListViewItem).
Viel Glück.
-
Vllt lässt du dir nicht alle Erweiterungen anzeigen, z.B. heißt die Datei vllt 'xxx.ID.txt' oder so?
Oder die erweiterung ist .IDx, wobei x für ein unsichtbares Zeichen steht z.B. Asc[255].Ansonsten kA

-
FileCopy bzw. Windows interessiert bei Dateien die Groß- und Kleinschreibung überhaupt nicht. Wenn man das aber möchte muss man sich was basteln.
Kopiert nur Dateien deren Endung TXT groß geschrieben haben
[autoit]#include <File.au3>
[/autoit] [autoit][/autoit] [autoit]$Dateien = _FileListToArray(@ScriptDir,"*.txt")
[/autoit] [autoit][/autoit] [autoit]For $i = 1 To $Dateien[0]
[/autoit]
If StringInStr($Dateien[$i],".TXT", 1) Then FileCopy($Dateien[$i],@ScriptDir&"\tmp\", 9)
NextAlso ich verstehe dein Problem auch nicht

-
Dann will ich dir mal glauben. Gehe ich recht in der Annahme, dass wenn das Skript fertig ist, die Benutzerdaten dann direkt aus der 'daten.txt' kommen und die Inputboxen nicht mehr erscheinen sollen? Das hätte nämlich Sinn.

-
Eigentlich sollte ich dir nicht helfen, genau so wie es die anderen auch nicht tun. Aber ich hoffe du lieferst eine gute Erklärung ab, wieso du den Benutzernamen und das Passwort mitloggst
Ansonsten habe ich dir das letzte Mal geholfen.
Ich habe alle bedenklichen Stellen aus deinem Skript entfernt, und siehe da es war nur noch der Link vorhanden. 
Also dann mal aufgepasst:
Spoiler anzeigen
[autoit]#include <IE.au3>
[/autoit] [autoit][/autoit] [autoit]$id = InputBox ("https://webmail.htp.net/imp/login.php", "Benutzernamen eingeben")
[/autoit] [autoit][/autoit] [autoit]
If $id = "" Then Exit
$pw = InputBox ("https://webmail.htp.net/imp/login.php", "Passwort eingeben", "", "*")
If $pw = "" Then Exit$oIE = _IECreate(" https://webmail.htp.net/imp/login.php", 0, 1)
[/autoit] [autoit][/autoit] [autoit]$oform = _IEFormGetObjByName($oIE, "imp_login")
[/autoit]
$oname = _IEFormElementGetObjByName($oform , "imapuser")
$opasswd = _IEFormElementGetObjByName($oform , "pass")
$setname = _IEFormElementSetValue($oname, $id)
$setpasswd = _IEFormElementSetValue($opasswd, $pw)
_IEFormSubmit($oform)mfg funkey
-
Ich habe ein Thompson Speedtouch 546v6 und mit folgendem Skript reconnecte ich!
Der Html-Code, den du da gepostet hast ist identisch mit dem von meinem Modem, aber ohne IE wird dir mein Skript nicht helfen, vllt aber jemanden anderen.Nützt nur jemandem was mit IE
[autoit]#include <IE.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <INet.au3>
Opt("TrayMenuMode", 1)$alte_IP = _GetIP()
[/autoit] [autoit][/autoit] [autoit]
TrayTip("Beim reconnecten","Bitte warten"&@CRLF&"Alte IP: "&$alte_IP,10)$oIE = _IECreate("10.0.0.138",0,0)
[/autoit] [autoit][/autoit] [autoit]
$oform = _IEFormGetObjByName($oIE, "PPPConn0")
$oTrennen = _IEFormElementGetObjByName($oform, "13")
_IEAction($oTrennen, "click")
_IELoadWait ($oIE)
$oform = _IEFormGetObjByName($oIE, "PPPConn0")
$oVerbinden = _IEFormElementGetObjByName($oform, "12")
_IEAction($oVerbinden, "click")
Sleep(500)
_IELoadWait ($oIE)
_IEQuit($oIE)$neue_IP = _GetIP()
[/autoit]
TrayTip("TrayTip löschen","",10)
TrayTip("Reconnect","Fertig"&@CRLF&"Alte IP: "&$alte_IP&@CRLF&"Neue IP: "&$neue_IP,10)
Sleep(10000) -
Hallo und herzlich willkommen im Forum!
Der Sinn von Radioboxen ist ja, dass man nur eine auswählen kann, sonst solltest du Checkboxen verwenden.
-
Einfach oben im Skript includen. Damit wird eine Datei eingebunden, in der Funktionen und Variablen deklariert sind.
Erweitertes Beispiel
[autoit]#include <ListboxConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>$Links = IniReadSection("Links.ini","Links")
[/autoit] [autoit][/autoit] [autoit]GUICreate("Meine Link GUI")
[/autoit] [autoit][/autoit] [autoit]
$mylist = GUICtrlCreateList("", 10, 10, 380, 200, $LBS_DISABLENOSCROLL)
For $i = 1 To $Links[0][0]
GUICtrlSetData(-1, $Links[$i][1])
Next$close = GUICtrlCreateButton("Ende", 64, 260, 175, 25)
[/autoit] [autoit][/autoit] [autoit]GUISetState()
[/autoit] [autoit][/autoit] [autoit]$msg = 0
[/autoit]
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
If $msg = $close Then Exit
If $msg = $mylist Then ShellExecute(GUICtrlRead($mylist))
WEndWenn du gleiche Einträge brauchst, nimmst du am besten ListView anstelle von List
ListView-Beispiel
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]$Links = IniReadSection("Links.ini","Links")
[/autoit] [autoit][/autoit] [autoit]GUICreate("Meine Link GUI")
[/autoit] [autoit][/autoit] [autoit]
$mylist = GUICtrlCreateListView("Name|Link", 10, 10, 380, 200)
For $i = 1 To $Links[0][0]
MsgBox(0,"",$Links[$i][0]&"|"&$Links[$i][1])
GUICtrlCreateListViewItem($Links[$i][0]&"|"&$Links[$i][1], $mylist)
Next$close = GUICtrlCreateButton("Ende", 64, 260, 175, 25)
[/autoit] [autoit][/autoit] [autoit]GUISetState()
[/autoit] [autoit][/autoit] [autoit]$msg = 0
[/autoit]
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
If $msg = $close Then Exit
If $msg = $mylist Then ShellExecute(GUICtrlRead($mylist))
WEnd