Neuling sucht Mentor

[Kreki]

Guten Morgen,

ich bin nun an einen Punkt angekommen wo mir das ewige geklicke bei zahlreichen Browser Games einfach nur noch auf die Nerven geht und möchte nun lernen wie ich mir ein paar Kleinigkeiten einfach Sparen kann.

Lange Rede kurzer Sinn, ich hab mich nun mal an ein kleines Toll gesetzt und bin prommt an meine Grenzen gestossen

Ziel des Tools soll es sein eine Url in ein Feld einzutragen und dann auf den Start Button zu hämmern. (sollte das Funktionieren soll der Bot das mit mehreren Url's gleichzeitig machen)

Klingt einfach aber weiter als das mein Firefox die benötigte Seite öffnet bin ich noch nicht gekommen.

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $Button1
			MsgBox(0,"Starting...", "Das Spenden startet...")
			Run("C:\Program Files (x86)\Mozilla Firefox\firefox.exe http://spenden.hitfaker.net/")

der nächste schritt wäre eigentlich die seite auszulesen um zu sehen wie das feld heisst wo mein link eingetragen gehört



Bis dahin gings noch, will ich meinem TrollTool aber mit einem Befehl erklären das er da gefälligst reinklickt und da ne url reinschreibt hab ich jedesmal ne syntax fehler meldung. Hab ich da nen Denkfehler oder was mach ich falsch?

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $Button1
			MsgBox(0,"Starting...", "Das Spenden startet...")
			Run("C:\Program Files (x86)\Mozilla Firefox\firefox.exe http://spenden.hitfaker.net/")
			_FFLinkClick($vSearch[, $sMode = "input#url"])

[Requi]

Poste mal bitte den kompletten Code.

[Kreki]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Schulterlterglatze Spenden Bot", 334, 421, 347, 211)
GUISetBkColor(0x3A6EA5)
$Button1 = GUICtrlCreateButton("Start", 64, 200, 115, 25)
GUICtrlSetBkColor(-1, 0xD4D0C8)
$Button2 = GUICtrlCreateButton("Optionen", 64, 240, 115, 25)
GUICtrlSetBkColor(-1, 0xD4D0C8)
$Button3 = GUICtrlCreateButton("Exit", 64, 280, 115, 25)
GUICtrlSetBkColor(-1, 0xD4D0C8)
$Fontlogo = GUICtrlCreatePic("C:\Users\Wulfen\Desktop\Projekt\Recources\Pics\Wolf.jpg", 8, 8, 233, 177)
$Save = GUICtrlCreateButton("", 264, 392, 59, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $Button1
			MsgBox(0,"Starting...", "Das Spenden startet...")
			Run("C:\Program Files (x86)\Mozilla Firefox\firefox.exe http://spenden.hitfaker.net/")
			Exit

		Case $Button3
			Exit
		Case $Button2

Exit
EndSwitch
WEnd

So sieht das Grundgerüst aus.


Ich probier das jetzt einfach mal mit nem Mausklick Befehl. Das muss doch hinhaun

[Requi]

Mach es doch lieber mit WinHttp. Läuft im Hintergrund und ist schneller.
Adde mich mal auf Skype. Dann geb ich dir nachh mal paar Tutorials mit

[Kreki]

Ok, mit Mousclick funktioniert die ganze Sache... Jetzt bin ich schon irgendwie stolz auf mich

"Ich habe Leben erschaffen"

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $Button1
			MsgBox(0,"Starting...", "Das Spenden startet...")
			Run("C:\Program Files (x86)\Mozilla Firefox\firefox.exe http://spenden.hitfaker.net/")
			Sleep (5000)
		    MouseClick("left", 334,239,1)
			Sleep (5000)
			Send ("http://usarmy.schulterglatze.de/donate/62646")
			Sleep (2000)
			Send("{Enter 1}")

Wäre aber trotzdem um einen Rat dankbar wie man das mit Autoit auf nen anderen Weg lösen könnte. Man will ja schließlich dazulernen

[Achat]

Mit Pakets:

#include <Winhttp.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>

$hGUI = GUICreate('Progress', 100, 20, -1, -1, $WS_POPUP)
$hProgress = GUICtrlCreateProgress(0, 0, 100, 20)
$hLabel = GUICtrlCreateLabel('1 - 111', 50, 0, 100, 20)
GUICtrlSetBkColor(-1, -2)
GUISetState()
GUISetState($GUI_DISABLE)
WinSetOnTop('Progress', '', 1)
For $i = 0 To 867
	_InetReadWinHttp('POST', 'spenden.hitfaker.net', '/proxy.php', 'http://spenden.hitfaker.net', 'url=http%3A%2F%2Fusarmy.schulterglatze.de%2Fdonate%2F62646&i=' & $i & '&count=867')
	GUICtrlSetData($hProgress, $i / 867 * 100)
	GUICtrlSetData($hLabel, $i & ' - ' & 867)
Next
GUIDelete($hGUI)

Func _InetReadWinHttp($sType, $sServerName, $sPath, $sReferrer = Default, $sData = Default, $sHeader = Default, $fGetHeaders = Default, $iMode = Default)
	Local $sUserAgent = 'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:17.0) Gecko/20100101 Firefox/17.0'
	Local $hSession = _WinHttpOpen($sUserAgent)
	Local $hConnect = _WinHttpConnect($hSession, $sServerName)
	Local $vReturn = _WinHttpSimpleRequest($hConnect, $sType, $sPath, $sReferrer, $sData, $sHeader, $fGetHeaders, $iMode)
	_WinHttpCloseHandle($hConnect)
	_WinHttpCloseHandle($hSession)
	Return $vReturn
EndFunc   ;==>_InetReadWinHttp

(yawn)

MfG

€dit:

[Kreki]

Danke Achat, könntest du mir vieleicht noch ein wenig erklären was die einzelnen Kommandos deines Codes beudeten/bewirken. Dann hät das auch neben den Erfolgserlebniss auch noch einen Lerneffekt

[Croco™]

@Kreki
Schau dir mal das an, dass sollte dir ebenfalls weiterhelfen:

Fragen einfach drunter posten.

[Chezo]

ShellExecute("www.whatever.de")
Benutze ich immer.
Dann wird direkt die Internet-Seite geöffnet.