Soweit bin ich mit StringregExp noch nicht
Kann man das auch irgendwie mit StringRegExp machen, dassGroßbuchstaben zu Kelinbuchstaben konvertiert werden, oder einfach dann auch mit Stringlower machen?
Soweit bin ich mit StringregExp noch nicht
Kann man das auch irgendwie mit StringRegExp machen, dassGroßbuchstaben zu Kelinbuchstaben konvertiert werden, oder einfach dann auch mit Stringlower machen?
Hi,
irgendwie verstehe ich jetzt nicht mit was du arbeiten willst?
Mit GUI oder mit Inputboxen, irgendwie wirfst du alles durcheinander.
Meinst du in etwa so?
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Login", 255, 146, 522, 437)
$Label1 = GUICtrlCreateLabel("Vorname", 16, 16, 46, 17)
$vorname = GUICtrlCreateInput("", 40, 40, 121, 21)
$Label2 = GUICtrlCreateLabel("Nachname", 16, 72, 56, 17)
$nachname = GUICtrlCreateInput("", 40, 96, 121, 21)
$OK = GUICtrlCreateButton("OK", 176, 24, 57, 97, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $OK
InputBox("Passwort", "Bitte geben sie ihr Passwort ein:", StringLower(Stringleft(GUICtrlRead($vorname),1) & GUICtrlRead($nachname)))
Exit
EndSwitch
WEnd
$zahl = InputBox("Zahl", "Zahl eingeben")
$test = Round(InputBox("Zahl2", "Zahl bidde eingeben"), 0)
HotKeySet("{F1}", "_start")
While 1
Sleep(150)
WEnd
Func _start()
BlockInput(1)
If $test > 0 Then
For $lNum = 1 To $test
MouseClick("left")
Sleep(150)
Sleep(150)
Send("{DOWN}")
Send("{right}")
Sleep(150)
Send("{Enter}")
Sleep(150)
Send("{right}")
Sleep(150)
Send("{space}")
Sleep(150)
Send("(" & $zahl & "ms)")
Sleep(150)
Send("{Enter}")
Send("{UP}")
Next
BlockInput(0)
If MsgBox(68, "Fertig", "Fertig" & @LF & "Möchten Sie das Programm schliessen?") = 6 Then Exit 0
EndIf
EndFunc ;==>_start
/Edit: hat sich dann wohl doch erledigt
Hi,
mit dem Window Info TOol wirst du nicht viel (eig. gar nix) anfangen können.
Du musst wie gesagt alles mit den _IE Funktionen Regeln
Z.B _IEFormSubmit submit benutzen um Sachen in Input-Boxen zu senden.Die Namen bekommst du aus dem Seitenquelltext.
Welches Fenster?
Den Internet Explorer?
#include <IE.au3>
_IECreate ( [$s_Url = "about:blank" [, $f_tryAttach = 0 [, $f_visible = 1 [, $f_wait = 1 [, $f_takeFocus = 1]]]]] )
Auf 0 Stellen. Und zum schliessen einfach:
#include <IE.au3>
_IEQuit ( ByRef $o_object )
(Hilfe Benutzen is schon schwer )
Du musst das ByRef natürlich weglassen, das habe ich nur aus der Hilfe übernommen, weil das natürlich noch angepasst werden muss...
In deinem Fall wäre das einfach:
_IEAction($oIE, "refresh")
[/autoit]#include <IE.au3>
_IEAction ( ByRef $o_object, "refresh")
Hi,
Success: Returns the position of the substring.
--> StringInStr
/Edit: So?
[autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]$test = StringInStr($htmlcode, "Art")
If $test = 0 Then
MsgBox(0, "Ausgabe von substring", "Wort nicht gefunden")
Else
MsgBox(0, "Ausgabe von substring", "Wort gefunden")
EndIf
Hi,
noch en kleiner leiser Tipp, nenn deine Dateien die du hochlädts nicht nach dem Liednamen .
Hihi,
ich habs glaub ich
TLC - No Scrubs
/Edit: Sry, hab mich vertutet, will nich so wie ich das will, auf den ersten blik hats so ausgesehn als hätte es funktioniert :(, er nimmt nih t alle tasten.
Hi,
movie thumbnailer kann das per Kommandozeilen Parameter.
http://sourceforge.net/project/showfiles.php?group_id=201133
Hi,
Ja wie gesagt, schau dir mal die ganzen _IE Befehle an. Du musst dann halt mit den Befehlen "klicken".
Bei _IECreate kannst du $f_visible = 1 auf 0 ändern, dann ist das Fenster "unsichtbar" im Hintergrund.
Hi,
dir fehlt ein Endif und in Zeile 60 die ""
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <String.au3>
$url = String("http://www.test.de/")
$url1 = String("http://www.test.de")
$url2 = String("/")
$go = Int(0)
$start = Int(0)
$limit = Int(0)
$found = Int(0)
$i = $start
$source = String("")
Dim $result[5]
_IEErrorHandlerRegister()
[/autoit] [autoit][/autoit] [autoit]$oIE = _IECreateEmbedded()
GUICreate("Test", 800, 600, _
(@DesktopWidth - 800) / 2, (@DesktopHeight - 600) / 2, _
$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 780, 510)
$GUI_Progress = GUICtrlCreateProgress(10, 10, 780, 20, $PBS_SMOOTH)
$GUI_Button_Start = GUICtrlCreateButton("Start", 10, 560, 100, 30)
$GUI_Label_Start = GUICtrlCreateLabel("Start:", 120, 562, 100, 30)
$GUI_Label_Limit = GUICtrlCreateLabel("Limit:", 120, 582, 100, 30)
$GUI_Label_Aktuell = GUICtrlCreateLabel("Aktuell:", 280, 562, 100, 30)
$GUI_Label_Fund = GUICtrlCreateLabel("Letzter Fund:", 280, 582, 100, 30)
$GUI_Label_Aktuell2 = GUICtrlCreateLabel("-", 350, 562, 100, 30)
$GUI_Label_Fund2 = GUICtrlCreateLabel("-", 350, 582, 100, 30)
$GUI_Label_Gefunden = GUICtrlCreateLabel("Gefunden:", 400, 562, 100, 30)
$GUI_Label_Ratio = GUICtrlCreateLabel("Ratio:", 400, 582, 100, 30)
$GUI_Label_Gefunden2 = GUICtrlCreateLabel("-", 470, 562, 100, 30)
$GUI_Label_Ratio2 = GUICtrlCreateLabel("-", 470, 582, 100, 30)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$GUI_Input_Start = GUICtrlCreateInput($start, 150, 560, 100, 20)
$GUI_Input_Limit = GUICtrlCreateInput($limit, 150, 580, 100, 20)
GUISetState() ;Show GUI
[/autoit] [autoit][/autoit] [autoit]_IENavigate($oIE, $url)
[/autoit] [autoit][/autoit] [autoit]; Waiting for user to close the window
While 1
$msg = GUIGetMsg()
Select
Case $msg = 0 ;Dumpen
If $go = 1 And $i < $limit Then ;Dabei
GUICtrlSetData($GUI_Label_Aktuell2, $i) ;Aktuell updaten
If $found > 0 Then GUICtrlSetData($GUI_Label_Ratio2, (($found / ($i - $start)) * 100) & "%") ;Ratio updaten
_IENavigate($oIE, ($url1 & $i & $url2))
$source = _IEDocReadHTML($oIE)
If Not $source = 0 Then
$result = _StringBetween($source, '.@[@.', "@.''] '.@]@.'")
If Not @error Then ;Gefunden?
$file = FileOpen("result.txt", 1)
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
FileWriteLine($file, $result[0])
FileClose($file)
$found = $found + 1
GUICtrlSetData($GUI_Label_Fund2, $i) ;Letzter Fund updaten
GUICtrlSetData($GUI_Label_Gefunden2, $found) ;Gefunden updaten
EndIf
GUICtrlSetData($GUI_Progress, Floor(($i / ($limit - $start)) * 100))
$i = $i + 1
EndIf
EndIf
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $GUI_Button_Start
If $go = 1 Then
$go = 0
GUICtrlSetData($GUI_Button_Start, "Start")
Else
$go = 1
;Start und Limit setzen
$start = GUICtrlRead($GUI_Input_Start)
$limit = GUICtrlRead($GUI_Input_Limit) ;Felder neu setzen? -> Ja
$i = $start
$found = 0
GUICtrlSetData($GUI_Progress, 0)
GUICtrlSetData($GUI_Button_Start, "Stop")
EndIf
EndSelect
WEnd
GUIDelete()
[/autoit] [autoit][/autoit] [autoit]Exit
[/autoit]Hi,
warum postest du dann nicht das gesamte Script. Der Fehler liegt wohl nicht and er Funktion.
EIngentlich ist der AutoIT Macro Recorder genau das was du suchst (im Scite Paket enthalten).
Hi,
[autoit]InetGet ( "URL" [,"filename" [, reload [, background]]] )
[/autoit]Bei Filename kannst du den Pfad mit angeben.
Bsp:
[autoit]InetGet("http://www.mozilla.org", "C:\foo.html")
[/autoit]Hi,
wie gesagt 2 Schleifen können in AutoIt nicht nebeneinander laufen.
Das einzigset was du dir mal anschauen könntest wäre AdlibEnable. Mit Adlibenable wird (z.B. alle 50 ms) eine Funktion aufgerufen wobei die andere Pausiert. Das müsste eigetnloich funktinieren ...
#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]GUICreate("Test", 358, 183, 193, 125)
$ok = GUICtrlCreateButton("OK", 80, 56, 161, 81, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ok
_funktion()
EndSwitch
WEnd
Func _funktion()
AdlibEnable("_exit", 50)
For $i = 1 To 1000
Beep(500, 50)
Next
EndFunc ;==>_funktion
Func _exit()
If GUIGetMsg() = $GUI_EVENT_CLOSE Then Exit
EndFunc ;==>_exit
Hi,
wenn du die Exe-Dateien für die unbeaufsichtigte Installation schon hast, dann musst du einfach nur noch ein neues Script erstellen, dass die EXE-Dateien wie Peethebee schon gesagt hat mit RunWait/ShellExecuteWait aufruft.
ShellExecuteWait("script1.exe")
;jetzt wird gewartet bis die exe die aufgerufen wird "fertig" ist, d.h. bis sie durchlaufen ist.
ShellExecuteWait("script2.exe")
;jetzt wird wieder gewartet bis die exe die aufgerufen wird "fertig" ist, d.h. bis sie durchlaufen ist.
ShellExecuteWait("script3.exe")
;usw...