Quick Question about window

[w0_0t]

I am trying to send text to an MSN convorsation using controlsend. However, i cannot find the proper control ID. i want to send it to the place where you type in the text. Heres what the window info gives me:

>>>>>>>>>>>> Window Details <<<<<<<<<<<<<

Title: M i K e - Conversation

Class: IMWindowClass

Size: X: 356 Y: 271 W: 634 H: 468

>>>>>>>>>>> Mouse Details <<<<<<<<<<<

Screen: X: 639 Y: 666

Cursor ID: 0

>>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<<

RGB: Hex: 0xFFFFFF Dec: 16777215

>>>>>>>>>>> Control Under Mouse <<<<<<<<<<<

Size: X: 0 Y: 0 W: 626 H: 414

Control ID:

ClassNameNN: DirectUIHWND1

Text:

>>>>>>>>>>> Status Bar Text <<<<<<<<<<<

>>>>>>>>>>> Visible Window Text <<<<<<<<<<<

>>>>>>>>>>> Hidden Window Text <<<<<<<<<<<

Thanks for any help i get!

~Jamie

[GaryFrost]

I suspect you were holding your mouse over the control to send the info to, if that's the case then use "DirectUIHWND1" as the controlID

[Valuater]

hope this helps

Mouseclick("left",639, 666) ; >>>> ; to be sure of the location

Send("your text here")

good luck

[w0_0t]

im gonna try using the first one, im actually trying to send it to their window with it minimized. im gonna test the script.

[Valuater]

I suspect you were holding your mouse over the control to send the info to, if that's the case then use "DirectUIHWND1" as the controlID

<{POST_SNAPBACK}>

*IF*... you use AdAware 1.05+,. or have it available, i tried everything to auto-run the program. however none of the controls worked **NONE**. if you know of info on this program please let me know

thx

[w0_0t]

expandcollapse popup

hotkeyset ("{F1}", "Start")
hotkeyset ("{F2}", "Stop")
hotkeyset ("{F3}", "changevar")

dim $var1
dim $var2 = 0
dim $var3 = 0
dim $var4 = 0
dim $var5 = 0
Opt("SendKeyDelay", 1)

func changevar()
    While $var2 < 1
        $var1 = inputbox ( "Spammer By Jamie", "The time is " & @HOUR & ":" & @MIN & ":" & @SEC, "Type in spam message")
        $var5 = inputbox ( "Spammer By Jamie", "The time is " & @HOUR & ":" & @MIN & ":" & @SEC, "Type in MSN window to spam")
        $var2 = $var2 + 1
        $var4 = 0

    WEnd
Endfunc

Func start()
    $var3 = 0
    While $var3 = 0
        $var2 = 0
        ControlSend ($var5, "", "DirectUIHWND1", $var1)
        send ("{ENTER}")
        $var4 = $var4 + 1
    WEnd
Endfunc

Func stop()
    $var = 0
    $var3 = 1
    send ("{ENTER}")
    send ("Spams - ")
    send ($var4)
    send ("{ENTER}")
    MsgBox(4096, "Number of spammZ", $var4)
    $var4 = 0   
    sleep(1000)
Endfunc

While 1
    Sleep(1000)
WEnd

hm, not workin so well.. it wont send it. Any advice? I try to send it to the window n' everything, but it only works when i click on the msn thing, is there a way i can send it to them even when the window's minimized. I thought this would do it.

[GaryFrost]

ControlSend from help

Sends a string of characters to a control.

ControlSend ( "title", "text", controlID, "string" [, flag])

Parameters

title The title of the window to access.

text The text of the window to access.

controlID The control to interact with. See Controls.

string String of characters to send to the control.

flag [optional] Changes how "keys" is processed:

  flag = 0 (default), Text contains special characters like + to indicate SHIFT and {LEFT} to indicate left arrow.

  flag = 1, keys are sent raw.

don't think $var5 will work for window title

[w0_0t]

ok after a bit of testing it out, i dont think it matters if its $var5 or not. Im not sure why its not doing anything until i click on the window(make it active). Any suggestions?

[GaryFrost]

try WinActivate

[w0_0t]

that does the trick, but i want to be able to send them while the window is minimized. Here's what it looks like now. I annotated it.

expandcollapse popup

hotkeyset ("{F1}", "Start");
hotkeyset ("{F2}", "Stop");   Setting Hotkeys
hotkeyset ("{F3}", "changevar");

dim $var1;
dim $var2 = 0;
dim $var3 = 0;
dim $var4 = 0;  Declaring Variables
dim $var5 = 0;
Opt("SendKeyDelay", 1)

func changevar()
    While $var2 < 1
        $var1 = inputbox ( "Spammer By Jamie", "The time is " & @HOUR & ":" & @MIN & ":" & @SEC, "Type in spam message");
        $var5 = inputbox ( "Spammer By Jamie", "The time is " & @HOUR & ":" & @MIN & ":" & @SEC, "Type in MSN window to spam");
        $var2 = $var2 + 1;                                                    
        $var4 = 0;                       Gathering Information for spam
        ClipPut ($var1);

    WEnd
Endfunc

Func start()
    $var3 = 0
    While $var3 = 0
        $var2 = 0;
        WinActivate ("M i K e - Conversation")
        ControlSend ("M i K e - Conversation", "", "DirectUIHWND1", "^v");
        send ("{ENTER}");                                  Spam them
        $var4 = $var4 + 1;
    WEnd
Endfunc

Func stop()
    $var = 0;
    $var3 = 1; Set $var3 to 1 to stop spamming
    send ("{ENTER}"); Finish off any of the last spams
    send ("Spams - ");
    send ($var4);      These 2 say how many spams
    send ("{ENTER}");
    MsgBox(4096, "Number of spammZ", $var4);  Msgbox with how many spams
    $var4 = 0;  <--indicates that spam set has finished
    sleep(1000);
Endfunc

While 1
    Sleep(1000);  to keep program active
WEnd