Sign in to follow this  
Followers 0
tommeke228

send

10 posts in this topic

#1 ·  Posted (edited)

i want

If button is clicked Then

launch program

he clicks the revbot compat checkbox

hits start

and thats it

here is pic

Posted Image

Edited by tommeke228

Share this post


Link to post
Share on other sites



use au3info.exe in -->C:\Program Files\AutoIt3

get the ControlClickID then write codes like this..

Run("Filename", "working directory")
WinWaitActive("SrProxy")
ControlClick("SrProxy", RevBot compatibility", "ControlClickID") ->each button or box has its own controlclickid..
ControlClick("SrProxy", Start", "ControlClickID")
WinSetState("SrProxy", "", @SW_MINIMIZE)

Share this post


Link to post
Share on other sites

You would have to use the window info tool to map out the control ID's of the checkboxes buttons etc to make it work


----------------------------------90% of teens today would die if Myspace,Bebo + FaceBook had a system failure and was completely destroyed. If you are one of the 10% that would be laughing, copy and paste this to your signature.----------------------------------Code to win, 'till you die, 'till the compiler dies from your linesCode to win, take it all, just keep coding till you fallDay by day, codin' all the way, I'm not cavin' inLet another App begin, code to win

Share this post


Link to post
Share on other sites

thx gona try these xD xD if its not working i gona reply xD

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.2.10.0
 Author:         myName

 Script Function:
    Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 144, 62, 193, 125)
$Button1 = GUICtrlCreateButton("Button1", 8, 8, 113, 33, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Form1
        Case $Form1
        Case $Form1
        Case $Form1
        Case $Button1
            if $nmsg = $button1 Then    
                lol()
            endif
    EndSwitch
WEnd

func lol
ShellExecute($Text11, "", $Text1)
WinWaitActive("SrProxy")
ControlClick("SrProxy", RevBot compatibility", "1008") ->each button or box has its own controlclickid..
ControlClick("SrProxy", Start", "1000")
WinSetState("SrProxy", "", @SW_MINIMIZE)
endfunc

now i have this (it gives an error

==> Unterminated string.:

ControlClick("SrProxy", RevBot compatibility", "1008")

revbot checkbox is 1008

start if 1000

or must i enter something else ?

>>>> Window <<<<

Title: SrProxy

Class: #32770

Position: 669, 205

Size: 288, 327

Style: 0x94CA00C4

ExStyle: 0x00050101

Handle: 0x0007063E

>>>> Control <<<<

Class: Button

Instance: 6

ClassnameNN: Button6

ID: 1008

Text: RevBot compatibility

Position: 156, 218

Size: 116, 16

ControlClick Coords: 30, 6

Style: 0x50010003

ExStyle: 0x00000004

Handle: 0x0005060C

///////////////////////////////////////////

>>>> Window <<<<

Title: SrProxy

Class: #32770

Position: 669, 205

Size: 288, 327

Style: 0x94CA00C4

ExStyle: 0x00050101

Handle: 0x0007063E

>>>> Control <<<<

Class: Button

Instance: 3

ClassnameNN: Button3

ID: 1000

Text: Start

Position: 11, 268

Size: 75, 23

ControlClick Coords: 32, 12

Style: 0x50010000

ExStyle: 0x00000004

Handle: 0x0008064E

Edited by tommeke228

Share this post


Link to post
Share on other sites

#7 ·  Posted (edited)

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 144, 62, 193, 125)
$Button1 = GUICtrlCreateButton("Button1", 8, 8, 113, 33, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
                lol()
    EndSwitch
WEnd

func lol()
run(@scriptdir & "\text.exe", @scriptdir);-->> put the text.exe together with your script.
WinWaitActive("SrProxy")
ControlClick("SrProxy", "RevBot compatibility", "1008") ->each button or box has its own controlclickid..
ControlClick("SrProxy", "Start", "1000")
WinSetState("SrProxy", "", @SW_MINIMIZE)
endfunc

Edited by LiLShinta

Share this post


Link to post
Share on other sites

now its opening the prog but clicks nothing and then minimiz

Share this post


Link to post
Share on other sites

Got it lol

it must be 1008 not "1008" xD

thx people

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 144, 62, 193, 125)
$Button1 = GUICtrlCreateButton("Button1", 8, 8, 113, 33, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
                lol()
    EndSwitch
WEnd

func lol()
run(@scriptdir & "\SrProxy.exe", @scriptdir);-->> put the text.exe together with your script.
WinWaitActive("SrProxy")
ControlClick("SrProxy", "RevBot compatibility", 1008)
ControlClick("SrProxy", "Start", 1000)
WinSetState("SrProxy", "", @SW_MINIMIZE)
endfunc

Share this post


Link to post
Share on other sites

.:D.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0