I'm lost, how can this be?

[ChazFire's REVENGE]

GUICtrlCreateLabel("What do you want to say?", 10, 110, 150)
$file = GUICtrlCreateInput("", 5, 125, 290, 20)
GUICtrlSetState ( -1, $GUI_FOCUS)
GUICtrlSetTip(-1, "Type text in field.")

$message = GUICtrlRead($file)

Dim $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(36,"","You'r about to send MESSAGE to USER, are you sure u want to 

continue?")
                Select
                       Case $iMsgBoxAnswer = 6;Yes
                    Run("cmd.exe")      
                    WinWaitActive("C:\WINDOWS\system32\cmd.exe")
                    Send("LakeNUM ")
                    Send("+{TAB " & $MESSAGE & "}") 
                       Case $iMsgBoxAnswer = 7;No

            EndSelect

How could this code type treeview.au3 ? Does't make any since at all! Plz some1 help.

EDIT oh yeah to see what i mean

d/l image

Edited May 20, 2006 by Jon

[ChazFire's REVENGE]

OK so i moved the script to a differnt folder( the main AutoIt folder) and now its typing in unistall.exe. So basicly no matter what i do it just tries to get another file, how would i just copy what is in the text field?

[Valuater]

GUICtrlCreateLabel("What do you want to say?", 10, 110, 150)
$file = GUICtrlCreateInput("", 5, 125, 290, 20)
GUICtrlSetState ( -1, $GUI_FOCUS)
GUICtrlSetTip(-1, "Type text in field.")

$message = GUICtrlRead($file)

Dim $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(36,"","You'r about to send MESSAGE to USER, are you sure u want to 

continue?")
                Select
                       Case $iMsgBoxAnswer = 6;Yes
                    Run("cmd.exe")        
                    WinWaitActive("C:\WINDOWS\system32\cmd.exe")
                    Send("LakeNUM ")
                    Send("+{TAB " & $MESSAGE & "}")    
                       Case $iMsgBoxAnswer = 7;No

            EndSelect

How could this code type treeview.au3 ? Does't make any since at all! Plz some1 help.

EDIT oh yeah to see what i mean

d/l image

<{POST_SNAPBACK}>

Played with your program a little.... not sure about LakeNUM

but take a look at this

$message = InputBox("User Name", "Please Type in Your User Name. ", @UserName, "")              
    If $message <> "" then
        $message2 = InputBox("Message", "Please Enter your Message. ", "", "")
    EndIf

If $message="" then Exit    

Dim $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(36,"","Your about to send MESSAGE to USER, are you sure u want to continue?")
    Select
        Case $iMsgBoxAnswer = 6;Yes
            Run("cmd.exe")      
            WinWaitActive("C:\WINDOWS\system32\cmd.exe")
           ;Send("LakeNUM ")
           ;Send("+{TAB " & $MESSAGE & "}")
            Send(" From: " & $message)
            Send(" Message is " & $message2)
        Case $iMsgBoxAnswer = 7;No
            
    EndSelect

hope it helps...

Edited March 19, 2005 by Valuater

[RPC]

This is my first posting but I've been programming for over 14 years and I've been using AutoIt for about 3 years.

The problem starts here: $message = GUICtrlRead($file).

$Message is wrong because GUICtrlRead($file) is wrong.

GUICtrlRead($file) is wrong because it's being called before the user has a chance to enter something into the input field.

You need to create a GUI first.

Next create your controls.

Display the GUI to the user.

Then wait in a loop for GetGUIMsg to tell you that the user keyed something into the input field.

Now read the text using $Message = GUICtrlRead($file)

Now you can call LakeNUM $Message

Take a look at GUI Concepts and the example for GUIGetMsg in the HELP.

The GUI concept is to create a UI and display it to the user. Then in a loop constantly call GUIGetMsg. This function returns a "message" or an EVENT of what just happened. Did the user click on a control? Which one? Based on the message from GUIGetMsg do something. Like call LakeNUM followed by the text the user typed in.

Hopes this helps. :">

RPC

Played with your program a little.... not sure about LakeNUM

but take a look at this

$message = InputBox("User Name", "Please Type in Your User Name. ", @UserName, "")                 
    If $message <> "" then
        $message2 = InputBox("Message", "Please Enter your Message. ", "", "")
    EndIf

If $message="" then Exit    

Dim $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(36,"","Your about to send MESSAGE to USER, are you sure u want to continue?")
    Select
        Case $iMsgBoxAnswer = 6;Yes
            Run("cmd.exe")        
            WinWaitActive("C:\WINDOWS\system32\cmd.exe")
          ;Send("LakeNUM ")
          ;Send("+{TAB " & $MESSAGE & "}")
            Send(" From: " & $message)
            Send(" Message is " & $message2)
        Case $iMsgBoxAnswer = 7;No
            
    EndSelect

hope it helps...

<{POST_SNAPBACK}>