Send pause?

xShadowx · September 18, 2008

Ok, im using a Send command and im wondering if there is a way to pause it, so someone can type a user and passinto a box and hit the "ok" button, then it keeps going again. Whould this be possable?

send("User Pass""{enter}")

torels · September 18, 2008

use 2 send() commands with a sleep() in the middle (or whatever parameter you need to let the script pause...)

martin · September 18, 2008

Ok, im using a Send command and im wondering if there is a way to pause it, so someone can type a user and passinto a box and hit the "ok" button, then it keeps going again. Whould this be possable?
send("User Pass""{enter}")

When you want to pause you could have something like this

MsgBox(262144,"Password required","Please enter your user name and password," & @CR " then hit the Continue button")

You could create a little gui with just a button which covered the ok button on the form for the password, then when the button was pressed you would know they had entered the password and your script could remove the little gui and press the real button then continue.

You will need some way to know if they get their name or password wrong.

xShadowx · September 18, 2008

Well it isnt a specified password, they are just making a user/pass.

So it would be like.

send("{User} {Pass}""{enter}")

and it would be linked to a GUI with two type in boxes.

New User

-----------------

New pass

-----------------

|ok|

then it will keep going. If that is possable?

Edited September 18, 2008 by xShadowx

martin · September 18, 2008

Well it isnt a specified password, they are just making a user/pass.
So it would be like.
send("{User} {Pass}""{enter}")
and it would be linked to a GUI with two type in boxes.
New User
-----------------
-----------------
New pass
-----------------
-----------------
|ok|
then it will keep going. If that is possable?

I don't know because I don't understand.

Do you mean that at a certain stage you want to create a gui with 2 inputs and wait till the user has entered the data and hit the ok key?

Or is there already a gui which you didn't create and you want to know when the user has entered the data into the input boxes in that gui?

Or is it something else?

xShadowx · September 18, 2008

Something I came up with quickly.

Posted Image

So when you type in the name and comfirm name (and they match, same with password) and hit ok, it will unpause the script and have the input user/pass of what you put in.

send("{user type in box} {password type in box} ""{enter}")

-----------------------------------------------------------------------^ is the ok button, so the script keeps going after you press ok.

Does that make sence?

Edited September 18, 2008 by xShadowx

martin · September 18, 2008

Something I came up with quickly.
So when you type in the name and comfirm name (and they match, same with password) and hit ok, it will unpause the script and have the input user/pass of what you put in.
send("{user type in box} {password type in box} ""{enter}")
-----------------------------------------------------------------------^ is the ok button, so the script keeps going after you press ok.
Does that make sence?

I think so. What is the problem with doing that?

xShadowx · September 18, 2008

I have no idea how to do it. >=-P

martin · September 18, 2008

I have no idea how to do it. >=-P
Something like this maybe.

Send($firststring)
Send($secondstring)
;we've got to the bit where we need the gui
$name = ''
$pass = ''
While $name = '' Or $pass = ''
    GetUserName($name, $pass)
WEnd
;now we contiunue with the sends
Send($thirdstring)
.
.
.
Func GetUserName(ByRef $nn, ByRef $pp)

    $Gui1 = GUICreate(",....
    $Edit1 = GuiCtrlCreate(
;.
;.

    GUISetState()
    $done = False

    While Not $done
        Switch GUIGetMsg()
            Case $OKBtn
                $nn = GUICtrlRead($Input1)
                $pp = GUICtrlRead($Input2)
                $done = True
        EndSwitch
    WEnd

    GUIDelete($Gui1)
EndFunc  ;==>GetUserName

xShadowx · September 18, 2008

This is what I got so far.

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("TrayIconHide", 1)


; GUI
$Form1 = GuiCreate("",200,250,619,451)
GUICtrlCreateLabel("New User Name?", 5, 5, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
GUICtrlCreateLabel("Confirm Name.", 5, 46, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
GUICtrlCreateLabel("Password?", 5, 110, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
GUICtrlCreateLabel("Confirm Password.", 5, 150, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
GUISetState(@SW_SHOW)

;$
$Input1 = GUICtrlCreateInput("", 5, 22, 121, 21)
$Input2 = GUICtrlCreateInput("", 5, 62, 121, 21)
$check = GUICtrlCreateButton("Ok", 5, 90, 75, 17, 0)
$Input3 = GUICtrlCreateInput("", 5, 126, 121, 21)
$Input4 = GUICtrlCreateInput("", 5, 166, 121, 21)
$check1 = GUICtrlCreateButton("Ok", 5, 194, 75, 17, 0)
Global $popup
Global $popup1


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $check
            If GUICtrlRead($Input1) = GUICtrlRead($Input2) Then
                GUICtrlDelete($popup)
                $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                GUICtrlSetBkColor(-1, 0x00CC00)
            Else
                $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                GUICtrlSetBkColor(-1, 0xFF0000)
            EndIf
            Case $check1
            If GUICtrlRead($Input3) = GUICtrlRead($Input4) Then
                GUICtrlDelete($popup1)
                $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                GUICtrlSetBkColor(-1, 0x00CC00)
            Else
                $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                GUICtrlSetBkColor(-1, 0xFF0000)
            EndIf
    EndSwitch
WEnd

Its a little messy, now how would I implement that code you just posted?

P.S. my send code isnt in there yet.

martin · September 18, 2008

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("TrayIconHide", 1)

MsgBox(0, "step 1", "replace this with your sends")
$name = ''
$pass = ''
While $name = '' Or $pass = ''
    GetUserName($name, $pass)
WEnd
MsgBox(0, "step 2", "replace this with more sends")


Func GetUserName(ByRef $nn, ByRef $pp)
; GUI
    $Form1 = GUICreate("", 200, 250, 619, 451)
    GUICtrlCreateLabel("New User Name?", 5, 5, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Confirm Name.", 5, 46, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Password?", 5, 110, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Confirm Password.", 5, 150, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUISetState(@SW_SHOW)

    
    $Input1 = GUICtrlCreateInput("", 5, 22, 121, 21)
    $Input2 = GUICtrlCreateInput("", 5, 62, 121, 21)
    $check = GUICtrlCreateButton("Ok", 5, 90, 75, 17, 0)
    $Input3 = GUICtrlCreateInput("", 5, 126, 121, 21)
    $Input4 = GUICtrlCreateInput("", 5, 166, 121, 21)
    $check1 = GUICtrlCreateButton("Ok", 5, 194, 75, 17, 0)
    Local $popup
    Local $popup1


    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                ExitLoop
            Case $check
                
                If GUICtrlRead($Input1) = GUICtrlRead($Input2) Then
                    $nn = GUICtrlRead($Input1)
                    GUICtrlDelete($popup)
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $nn = ''
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf
                
            Case $check1
                If GUICtrlRead($Input3) = GUICtrlRead($Input4) Then
                    $pp = GUICtrlRead($Input3)
                    GUICtrlDelete($popup1)
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $pp = ''
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf
        EndSwitch
        
        If $nn <> '' And $pp <> '' Then ExitLoop
    WEnd
    
    GUIDelete($Form1)
    Return
EndFunc  ;==>GetUserName

xShadowx · September 18, 2008

Edit: Nevermind. Thank you mate you are the best.

Edit edit: One more question, is there a way to link

If $nn <> '' And $pp <> '' Then Exitloop

to a button? So when I click it it will exicute the send command(s)? Edited September 19, 2008 by xShadowx

martin · September 19, 2008

Edit: Nevermind. Thank you mate you are the best.
Edit edit: One more question, is there a way to link
If $nn <> '' And $pp <> '' Then Exitloop
to a button? So when I click it it will exicute the send command(s)?

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("TrayIconHide", 1)
opt("GUIResizeMode",$GUI_DOCKALL)
MsgBox(0, "step 1", "replace this with your sends")
$name = ''
$pass = ''
While $name = '' Or $pass = ''
    GetUserName($name, $pass)
WEnd
MsgBox(0, "step 1", "replace this with more sends")


Func GetUserName(ByRef $nn, ByRef $pp)
; GUI
    $Form1 = GUICreate("", 131, 220, 619, 451)
    GUICtrlCreateLabel("New User Name?", 5, 5, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Confirm Name.", 5, 46, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Password?", 5, 110, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Confirm Password.", 5, 150, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUISetState(@SW_SHOW)

;$
    $Input1 = GUICtrlCreateInput("", 5, 22, 121, 21)
    $Input2 = GUICtrlCreateInput("", 5, 62, 121, 21)
    $check = GUICtrlCreateButton("Ok", 5, 90, 75, 17, 0)
    $Input3 = GUICtrlCreateInput("", 5, 126, 121, 21)
    $Input4 = GUICtrlCreateInput("", 5, 166, 121, 21)
    $check1 = GUICtrlCreateButton("Ok", 5, 194, 75, 17, 0)
    GUICtrlCreateLabel("",0,225,131,1)
    GUICtrlSetBkColor(-1,0x666666)
    $alldone = GUICtrlCreateButton("Apply", 30, 230, 70, 22)
    Local $popup
    Local $popup1
 $expanded = false

    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                ExitLoop
            Case $check
                
                If GUICtrlRead($Input1) <> '' and GUICtrlRead($Input1) = GUICtrlRead($Input2) Then
                    $nn = GUICtrlRead($Input1)
                    GUICtrlDelete($popup)
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $nn = ''
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf
                
            Case $check1
                If GUICtrlRead($Input3) <> '' and GUICtrlRead($Input3) = GUICtrlRead($Input4) Then
                    $pp = GUICtrlRead($Input3)
                    GUICtrlDelete($popup1)
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $pp = ''
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf
            Case $alldone
                If $nn <> '' And $pp <> '' Then
                    ExitLoop
                Else
                    MsgBox(262144, "ERROR", "Please enter your User Name and Password")
                EndIf
        EndSwitch
        
        if not $expanded Then
            If $nn <> '' And $pp <> '' Then
                winmove($Form1,"", 619, 451,137, 290)
            EndIf
        EndIf
        
        
    WEnd
    
    GUIDelete($Form1)
    Return
EndFunc  ;==>GetUserName

martin · September 19, 2008

Edit: Nevermind. Thank you mate you are the best.
Edit edit: One more question, is there a way to link
If $nn <> '' And $pp <> '' Then Exitloop
to a button? So when I click it it will exicute the send command(s)?

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("TrayIconHide", 1)
opt("GUIResizeMode",$GUI_DOCKALL)
MsgBox(0, "step 1", "replace this with your sends")
$name = ''
$pass = ''
While $name = '' Or $pass = ''
    GetUserName($name, $pass)
WEnd
MsgBox(0, "step 1", "replace this with more sends")


Func GetUserName(ByRef $nn, ByRef $pp)
; GUI
    $Form1 = GUICreate("", 131, 220, 619, 451)
    GUICtrlCreateLabel("New User Name?", 5, 5, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Confirm Name.", 5, 46, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Password?", 5, 110, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreateLabel("Confirm Password.", 5, 150, 770, 20, -1, $GUI_WS_EX_PARENTDRAG)
    GUISetState(@SW_SHOW)

;$
    $Input1 = GUICtrlCreateInput("", 5, 22, 121, 21)
    $Input2 = GUICtrlCreateInput("", 5, 62, 121, 21)
    $check = GUICtrlCreateButton("Ok", 5, 90, 75, 17, 0)
    $Input3 = GUICtrlCreateInput("", 5, 126, 121, 21)
    $Input4 = GUICtrlCreateInput("", 5, 166, 121, 21)
    $check1 = GUICtrlCreateButton("Ok", 5, 194, 75, 17, 0)
    GUICtrlCreateLabel("",0,225,131,1)
    GUICtrlSetBkColor(-1,0x666666)
    $alldone = GUICtrlCreateButton("Apply", 30, 230, 70, 22)
    Local $popup
    Local $popup1
 $expanded = false

    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                ExitLoop
            Case $check
                
                If GUICtrlRead($Input1) <> '' and GUICtrlRead($Input1) = GUICtrlRead($Input2) Then
                    $nn = GUICtrlRead($Input1)
                    GUICtrlDelete($popup)
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $nn = ''
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf
                
            Case $check1
                If GUICtrlRead($Input3) <> '' and GUICtrlRead($Input3) = GUICtrlRead($Input4) Then
                    $pp = GUICtrlRead($Input3)
                    GUICtrlDelete($popup1)
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $pp = ''
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf
            Case $alldone
                If $nn <> '' And $pp <> '' Then
                    ExitLoop
                Else
                    MsgBox(262144, "ERROR", "Please enter your User Name and Password")
                EndIf
        EndSwitch
        
        if not $expanded Then
            If $nn <> '' And $pp <> '' Then
                winmove($Form1,"", 619, 451,137, 290)
            EndIf
        EndIf
        
        
    WEnd
    
    GUIDelete($Form1)
    Return
EndFunc  ;==>GetUserName

xShadowx · September 19, 2008

Thankyou very much mate, you are the greatest.

Edited September 20, 2008 by xShadowx

xShadowx · September 20, 2008

Ah sorry mate, one more thing (last thing), I cant get a new button linked to a msg box (click the button, box pops up) but it ether doesnt pop up or it pops up before I press the button and I cant quit the popup. Have any suggestions?

martin · September 20, 2008

Ah sorry mate, one more thing (last thing), I cant get a new button linked to a msg box (click the button, box pops up) but it ether doesnt pop up or it pops up before I press the button and I cant quit the popup. Have any suggestions?

I have no idea xShadowx. I would need to see some code that showed the problem.

xShadowx · September 20, 2008

Its pretty much the same code as before. Would there be a way to have a new GUI pop up after my send code(s)? The GUI would have buttons. Any ideas?

Shadow

Edited September 20, 2008 by xShadowx

xShadowx · September 21, 2008

Here is my code

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("TrayIconHide", 1)
Opt("GUIResizeMode", $GUI_DOCKALL)

$name = ''
$pass = ''


While $name = '' Or $pass = ''
    GetUserName($name, $pass)
WEnd

   ▲
   |
   |
   |
   |
My send codes
   |
   |
   |
   |
   ▼


Func OnAutoItExit ()
    FileDelete(@TempDir & "\Background.bmp")
EndFunc

Func GetUserName(ByRef $nn, ByRef $pp)
  ; GUI
    $Form1 = GUICreate("", 131, 220, 619, 451)
    GUICtrlCreatePic("Background.bmp", 0, 0, 131, 290)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $font = GUICtrlCreateLabel("New User Name?", 5, 5, 770, 20)
    GUICtrlSetColor( -1, 0xF7FF00)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 9, 700, $font) 
    $font = GUICtrlCreateLabel("Confirm Name.", 5, 46, 770, 20)
    GUICtrlSetColor( -1, 0xF7FF00)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 9, 700, $font) 
    $font = GUICtrlCreateLabel("Password?", 5, 110, 770, 20)
    GUICtrlSetColor( -1, 0xF7FF00)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 9, 700, $font) 
    $font = GUICtrlCreateLabel("Confirm Password.", 5, 150, 770, 20)
    GUICtrlSetColor( -1, 0xF7FF00)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 9, 700, $font) 
    GUISetState()

  ;$
    FileInstall("C:\Background.bmp", @TempDir & "\Background.bmp")  
    $Input1 = GUICtrlCreateInput("", 5, 22, 121, 21)
    $Input2 = GUICtrlCreateInput("", 5, 62, 121, 21)
    $check = GUICtrlCreateButton("Ok", 5, 90, 75, 17, 0)
    $Input3 = GUICtrlCreateInput("", 5, 126, 121, 21)
    $Input4 = GUICtrlCreateInput("", 5, 166, 121, 21)
    $check1 = GUICtrlCreateButton("Ok", 5, 194, 75, 17, 0)
    GUICtrlCreateLabel("", 0, 225, 131, 1)
    GUICtrlSetBkColor(-1, 0x666666)
    $alldone = GUICtrlCreateButton("Apply", 30, 230, 70, 22)
    Local $popup
    Local $popup1
    $expanded = False

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

                If GUICtrlRead($Input1) <> '' And GUICtrlRead($Input1) = GUICtrlRead($Input2) Then
                    $nn = GUICtrlRead($Input1)
                    GUICtrlDelete($popup)
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $nn = ''
                    $popup = GUICtrlCreateButton("", 100, 90, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf

            Case $check1
                If GUICtrlRead($Input3) <> '' And GUICtrlRead($Input3) = GUICtrlRead($Input4) Then
                    $pp = GUICtrlRead($Input3)
                    GUICtrlDelete($popup1)
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0x00CC00)
                Else
                    $pp = ''
                    $popup1 = GUICtrlCreateButton("", 100, 194, 25, 17, 0)
                    GUICtrlSetBkColor(-1, 0xFF0000)
                EndIf
            Case $alldone
                If $nn <> '' And $pp <> '' Then
                    ExitLoop
                Else
                    MsgBox(262144, "ERROR", "Please enter your User Name and Password")
                EndIf
        EndSwitch

        If Not $expanded Then
            If $nn <> '' And $pp <> '' Then
                WinMove($Form1, "", 619, 451, 137, 280)
            EndIf
        EndIf


    WEnd
    GUIDelete($Form1)
    Return
EndFunc ;==>GetUserName

I would like a new GUI to pop up after the send code(s). not a msgbox (or can you add buttons to a msg box?). All help is appreciated.

Edited September 21, 2008 by xShadowx

martin · September 21, 2008

Here is my code
I would like a new GUI to pop up after the send code(s). not a msgbox (or can you add buttons to a msg box?). All help is appreciated.

You wrote a gui with no problem before so why not just have another one called when the sends are done?

A message box can have certain buttons as described in the help.

Edited September 22, 2008 by martin

Send pause?

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members