automatisch felder ausfüllen und links oder buttons klicken geht am besten mit der FF.au3
hier ne kleine Einführung: [Tut] FF.au3 – AutoIt-Funktionen im Browser
In den browser integrieren würde prinzipjell schon gehen. Mit der Anygui.au3
ich würde an deiner stelle aber eher eine gui machen.
oder du machst abfragen des browsers. und wenn der browser gerade auf der seite ist dann lässt du alles automatisch machen.
Herzlich willkommen im forum.
Chip.de hört sich echt an als wärst du der besitzer 
Gut dass du nich Computerbild heißt, da steht soviel müll drin
hast du die aktuellste autoit version?
wenn nein:
was hat sich seit dem zeitpunkt geändert als das script noch ging?
anderes os? oder ähnliches?
Wonach genau muss ich bei dem Prozessen gucken?
schau halt einfach die durch die du nicht kennst. bzw die die dir komisch erscheinen....
soviele werden das ja wohl nich sein
geht auch immer noch du brauchst nur das http:// davor
(eben wegem dem InetRead. da _InetGetSource mit der version 3.3.2.0 geändert wurde)
#include <INet.au3>
$Source = _INetGetSource("http://www.google.de")
MsgBox(64, "test", $Source)
gibt den quelltext aus
(normalerweise )
du hast deine autoitversion upgedatet oder?
Changed: _InetGetSource() now uses InetRead().
d.h. einfach InetRead statt InetGetSource verwenden 
AdlibRegister(_blinken,250)
das bedeutet die funktion wird nur alle 250 millisekunden aufgerufen.
--> nein damit ist es nicht cpu-lastig
ähm man könnte das ganze radiobutton erstellen deutlich verkürzen
und was willst du egtl mit dem array befehle? da steht überall der gleiche drin. bleibt das so oder war das nur zur vereinfachung?
hier verkürzt:
#include <GuiConstantsEx.au3>
Opt("MustDeclareVars", 1)
HotKeySet ( "{Esc}", "close")
Func close()
Exit 0
EndFunc
Global $Msg1, $Msg2, $Button1, $Radio
[/autoit] [autoit][/autoit] [autoit]Global $Befehle[45] = ['MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")','MsgBox(0,"","Kräh!")', _
'MsgBox(0,"","Kräh!")']
;Dimension
Dim $Box[4]
; GUI
GuiCreate("Arbeit", 500, 550)
; BUTTON
$Button1 = GuiCtrlCreateButton("Go", 200, 510, 100, 30)
;Checkbox 1
$Box[0] = GUICtrlCreateCheckbox("&Erster", 70, 480, 80, 20)
;Checkbox 2
$Box[1] = GuiCtrlCreateCheckbox("&Zweiter", 160, 480, 80, 20)
;Checkbox 3
$Box[2] = GuiCtrlCreateCheckbox("&Dritter", 255, 480, 80, 20)
;Checkbox 4
$Box[3] = GUICtrlCreateCheckbox("&Vierter", 340, 480, 130, 20)
$Radio = StringSplit("Ka Ge Gu Ma Er Ra To Sp Zw Kl Ra Bl Fu Kr Kar Ka Ge Gu Ma Er Ra To Sp Zw Kl Ra Bl Fu Kr Kar Ka Ge Gu Ma Er Ra To Sp Zw Kl Ra Bl Fu Kr Kar", " ", 2)
For $i = 0 To 2
GUICtrlCreateGroup("Feld " & $i+1, 35 + $i * 170, 10, 100, 460)
For $k = 0 To 14
$Radio[$k + $i * 15] = GUICtrlCreateRadio($Radio[$k + $i * 15], 40 + $i * 170, 35 + $k * 25, 80, 20)
Next
GUICtrlCreateGroup("", -99, -99 , 1, 1)
Next
GUISetState()
While 1
$Msg1 = GUIGetMsg()
Switch $Msg1
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
If BitAND(GUICtrlRead($Box[0]), $GUI_CHECKED) Then RunWait("calc.exe")
For $i = 0 to 44
If BitAND(GUICtrlRead($Radio[$i]), $GUI_CHECKED) Then Execute($Befehle[$i])
Next
If BitAND(GUICtrlRead($Box[1]), $GUI_CHECKED) Then RunWait("C:\Users\Maximilian\Desktop\Farm\Programm\Box2.exe")
If BitAND(GUICtrlRead($Box[2]), $GUI_CHECKED) Then RunWait("C:\Users\Maximilian\Desktop\Farm\Programm\Box3.exe")
If BitAND(GUICtrlRead($Box[3]), $GUI_CHECKED) Then RunWait("C:\Users\Maximilian\Desktop\Farm\Programm\Box4.exe")
EndSwitch
WEnd
sry dass es so lange gedauert hat.
habs dir per pm geschickt, da so ein script mit arbeitsspeicher auslesen auch einige andere interessieren dürfte die ich hier aber nicht unterstützen will
(bot kiddies 
)
Leider hört er bei mir nicht mehr auf und führt alles unendlich mal hintereinander aus
Warum?! Was kann ich dagegen machen?
Er führts genausooft aus wie du es ihm gesagt hast
nämlich genau 45 mal
du hast den befehl in der for schleife, derwegen wird er bei jedem $i einmal ausgeführt. und da du runwait benützt wartet er an der stelle bis das programm wieder beendet wurde und macht dann erst weiter.
ich glaub du willst es so:
While 1
$Msg1 = GUIGetMsg()
Switch $Msg1
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
If BitAND(GUICtrlRead($Box[0]), $GUI_CHECKED) Then RunWait("C:\Users\...\Desktop\Programm\Box1.exe")
For $i = 0 to 44
If BitAND(GUICtrlRead($Radio[$i]), $GUI_CHECKED) Then Execute($Befehle[$i])
Next
If BitAND(GUICtrlRead($Box[1]), $GUI_CHECKED) Then RunWait("C:\Users\Maximilian\Desktop\Farm\Programm\Box2.exe")
If BitAND(GUICtrlRead($Box[2]), $GUI_CHECKED) Then RunWait("C:\Users\Maximilian\Desktop\Farm\Programm\Box3.exe")
If BitAND(GUICtrlRead($Box[3]), $GUI_CHECKED) Then RunWait("C:\Users\Maximilian\Desktop\Farm\Programm\Box4.exe")
EndSwitch
WEnd
PS: an den script könnte man einiges verkürzen
natürlich geht sowas
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 380, 335, 193, 125)
$Edit1 = GUICtrlCreateEdit("", 8, 8, 361, 313)
GUICtrlSetFont(-1, 15, 400, 0, "Times New Roman"); schriftart und schriftgröße
GUICtrlSetColor(-1, 0xFFFFFF) ; Schriftfarbe
GUICtrlSetBkColor(-1, 0xFF0000); Hintergrundfarbe
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
wenn du die zeilen einzeln einfärben willst wirds etwas schwieriger aber ich glaube da gabs auch mal ne recht gute lösung
Ne, das gibt ja auch nicht den Text zurück.
also bitte. n bisschen kombinieren musst dir die funktionen schon
für jede kleine sache gibts halt keine funktion. weils durch kombinationen viel mehr anwendungsmöglichkeiten gib. is ja auch sinnvoll so
ich denke du suchst nach: _GUICtrlListView_GetSelectedIndices()
Hier im Forum hat schon mal jemand fast exakt den selben Script hoch geladen. Link
der war gut
siehe post #1
ich erwähne mal vorsichtshalber das das script nicht von mir ist , is aus unserem forum
genau das überarbeitet er ja weils nich richtig funktioniert
Habs jetzt so gemacht. Leider hört er bei mir nicht mehr auf und führt alles unendlich mal hintereinander aus
Warum?! Was kann ich dagegen machen?
ui das is interessant.
Poste doch mal bitte dein ganzes script. wird wahrscheinlich nicht an den kleinen auszug liegen.
dann anscheinend "Hallo"
[autoit]$read = GUICtrlRead ($input)
If $read = "Hallo" Then
aber an deiner stelle würde ich keine scripte ausführen die du nicht verstehst. und schon garnicht wenn die leute im autoit forum sagen das das script probleme macht
was versprichst du dir von dem script überhaupt? was willst du machen?
normalerweise macht man das so
GUISetState()
While 1
$Msg1 = GUIGetMsg()
Switch $Msg1
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
If BitAND(GUICtrlRead($Box1), $GUI_CHECKED) Then RunWait("C:\Users\...\Desktop\Programm\Box1.exe")
If BitAND(GUICtrlRead($Box2), $GUI_CHECKED) Then RunWait("C:\Users\...\DesktopProgramm\Box2.exe")
If BitAND(GUICtrlRead($Box2), $GUI_CHECKED) Then RunWait("C:\Users\...\DesktopProgramm\Box3.exe")
If BitAND(GUICtrlRead($Box2), $GUI_CHECKED) Then RunWait("C:\Users\...\DesktopProgramm\Box4.exe")
EndSwitch
WEnd
sowas ginge mit
[autoit]GUICtrlSetData($listviewitem, " textinersterspalte | textinzweiterspalte")
[/autoit]argh, wie ich solche Fehler hasse
Vielen Dank!
hab ich auch nur auf den ersten blick gesehn weil ichs selber schon x-mal hatte
der fehler is echt so unauffällig
probiers mal so:
[autoit]For $i = 1 To Ubound($array) - 1
$array[$i] = GUICtrlCreateListViewItem($array[$i], $mylist)
Next
