
tsolrm
Active Members-
Posts
145 -
Joined
-
Last visited
Everything posted by tsolrm
-
Not an option
-
HotKeySet ("{b}", "BlastC") Func BlastC() Send ("qwerb") EndFunc Because the Send contains 'b' in it - this sends this into an endless loop of sending qwerbqwerbqwerbqwerbqwerb etc I've tried ispressed If _IsPressed("42", $hDLL) Then Send ("qwerb") Do Sleep (10) Until _IsPressed("42", $hDLL) = 0 EndIf This doesn't do the endless loop but outputs bqwerb instead of qwerb. Anyway around this problem please?
-
Great, thank you!
-
Also a quick question, i need to find out how many times a string repeats itself within a string. What i've done is - I used StringInStr and once an occurrence is found - it is replaced and the process is repeated until nothing is found. However the string is pretty big so it takes a long time. Any shortcuts?
-
thank you very much!
-
these have always confused me $friends = StringRegExp ($friends, "<steamid></steamid>", 1) this is all i have
-
i have a block of text where the numbers i need are between <steamid>number</steamid> is there a quick way to extract these into an array?
-
add an option to a rightclick menu of an image
tsolrm replied to tsolrm's topic in AutoIt General Help and Support
I don't think u understood me. This function is for GUI controls -
Trying to upload a screenshot to http://fastpic.ru/ So far there is no error but nothing gets returned from the site ($sRead = "") Help please? $sURL = "fastpic.ru" $hOpen = _WinHttpOpen() $hConnect = _WinHttpConnect($hOpen, $sURL) $sRead = _WinHttpSimpleFormFill($hConnect, Default, Default, _ "name:uploading", "1", _ "name:file[]", @ScriptDir&"\screens\"&$picture, _ "name:submit", "Загрузить") ConsoleWrite (@error) ConsoleWrite ($sRead) _WinHttpCloseHandle($hConnect) _WinHttpCloseHandle($hOpen) FileWrite ("text.txt",$sRead) exit
-
I don't know what to do. after the input box is created i've added this code GUICtrlSetData ($Offender [$tabs], "test") $texttest = GUICtrlRead($Offender[$tabs]) ConsoleWrite (@CRLF&$Offender [$tabs]&@CRLF&$texttest) In the console it shows 12 test Now without touching anything else $texttest = GUICtrlRead($Offender[$index]) ConsoleWrite (@CRLF&$Offender[$index]) ConsoleWrite (@CRLF&$texttest&@CRLF&$texttest2) this gives 12 0 I must be missing something. This is driving me nuts
-
Well I am sorry for the attitude but this is not the first time people send me to read forum rules. I've read them believe me. Can some one help me on the subject?
-
I've tried creating 3-4 tabs. $Offender[$index] and $ScreenName[$index] returns 0 for all. Even though the actual array $Offender exists and holds the numbers of the controls and $index returns a valid index for the tab
-
My god people, why are u so paranoid. This has nothing to do with game automation, in fact i don't see how u could possibly automate Warcraft 3. How exactly capturing a screen shot automates the game?
-
Hi, I just can't see why GUICtrlRead doesn't read the input text from $texttest = GUICtrlRead($Offender[$index]) _ArrayDisplay ($Offender) - this displays the array with all the controls Help please? #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <ScreenCapture.au3> #include <array.au3> #include <GuiTab.au3> #NoTrayIcon #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Ban Poster", 912, 641, 192, 132) $Tab1 = GUICtrlCreateTab(0, 0, 921, 33) $Room = GUICtrlCreateCombo("RHLR 1", 736, 208, 169, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "RHLR 2|RHLR 3|RHLR 4|RHLR 5|RHLR 6|RHLR 7") $Label1 = GUICtrlCreateLabel("Ник нарушителя:", 8, 42, 170, 30) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x000000) $Label2 = GUICtrlCreateLabel("Комната:", 736, 176, 63, 20) $OpenScreen = GUICtrlCreateButton("Открыть", 592, 60, 137, 25) $Pic1 = GUICtrlCreatePic(@ScriptDir & 'banned.jpg', 736, 253, 169, 100) Opt("TrayMenuMode", "1") HotKeySet("{PRINTSCREEN}", "PRINTSCREEN") $exit = TrayCreateItem("Выход") TraySetState() $tabs = 0 Global $tabA[1], $Screen[1], $ScreenName[1], $Offender[1] While 1 $msg = TrayGetMsg () If $msg = $exit Then Exit $guimsg = GUIGetMsg() Select Case $guimsg = $pic1 $current=GUICtrlRead ($Tab1,1 ) $index = _GUICtrlTab_GetCurSel($Tab1) $index+=1 MsgBox (0,"test", $index) GUICtrlDelete ($current) $tabs -=1 If $tabs=0 Then GUISetState(@SW_HIDE) EndIf ConsoleWrite (@CRLF&$index) _ArrayDisplay ($Offender) $texttest = GUICtrlRead($Offender[$index]) $texttest2 = GUICtrlRead($screenname[$index]) ConsoleWrite (@CRLF&$texttest&@CRLF&$texttest2) _ArrayDelete ($tabA, $index+1) _ArrayDelete ($screen, $index+1) _ArrayDelete ($screenname, $index+1) _ArrayDelete ($offender, $index+1) ; Remove the tab AND the edit from the arrays ; Remove the tab Case $guimsg = $GUI_EVENT_CLOSE Exit EndSelect Wend Func PrintScreen () ;If WinActive ("Warcraft III") Then $name = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC _ScreenCapture_Capture(@ScriptDir&"screens"&$name&".jpg") $tabs +=1 ReDim $tabA [$tabs+1] ReDim $Screen [$tabs+1] ReDim $ScreenName [$tabs+1] ReDim $Offender [$tabs+1] $tabA[$tabs]=GUICtrlCreateTabItem("Реквест") $Screen [$tabs] = GUICtrlCreatePic(@ScriptDir&"screens"&$name&".jpg", 8, 88, 721, 545) $ScreenName [$tabs] = GUICtrlCreateLabel($name&".jpg", 610, 40, 150, 20) $Offender [$tabs] = GUICtrlCreateInput("", 180, 45, 177, 24) GUICtrlCreateTabItem("") ;$Button1 = GUICtrlCreateButton("Button1", 736, 533, 169, 100) GUISetState(@SW_SHOW) ;EndIf #EndRegion ### END Koda GUI section ### EndFunc
-
Job? Does he get paid for it?
-
Hi, I am trying to do the following <------- BLOCK OF TEXT ----------> somewhere in the middle of the text there is a var VARIABLE = "somenumber"; <------- BLOCK OF TEXT ----------> I need to find a way to get the value of the VARIABLE. Help me please
-
i found this post 7 But i don't understand this bit, can someone explain please? Global $sRead = _WinHttpSimpleFormFill($hConnect, "api/test-api.html", Default, _ "apiKey", $sAPIKey, _ "xmlOutput", 1, _ "testMode", 1, _ "name:userfile", $sFile)
-
i don't think this has anything to do with ftp
-
Hi guys I've sorted out a script that saves screenshots automatically when PrintScreen key is pressed. Is there any way to make it so that when a button is clicked - the screen shot is uploaded to an image hosting website and the user recieves the link to the picture. Could u point me in the right direction please.
-
Hi not, the script is nowhere near the windows folder. no error - it's not added to the list
-
bump
-
So i have two lines of code _RunDos("netsh firewall set allowedprogram "&@ScriptFullPath&" "&@ScriptName&" ENABLE") _RunDos("netsh firewall set allowedprogram "&@WindowsDir&"\Script.exe Script.exe ENABLE") The name of the script is Script.exe The weird thing is - if it is located in the windows folder - it adds to the firewall exceptions okey. If i'm using ScriptPath or ScriptFullPath then it's not doing anything. Has anyone got any idea why?
-
I've got a tcp server that communicates to a client. The packets are in plain english at the moment, so they can be read using wireshack or else. Is there anything in autoit that allows me to encrypt the text so that the client script can decrypt it when it recieves the message?