Sign in to follow this  
Followers 0
tigerduck

Newbie: NET SEND & Starting Perl script

4 posts in this topic

Hi all,

i am a newbie with scripting. and i have 2 questions.

1) i try to script a GUI with a textfield. insert text should be send by net send.

...

;this is where i enter a text

GUICtrlCreateLabel("Text", 20, 60, 30)

$TEXT = GUICtrlCreateEdit("", 20, 80, 450, 100, $ES_AUTOVSCROLL + $WS_VSCROLL + $ES_MULTILINE + $ES_WANTRETURN)

GUICtrlSetTip(-1, "Bitte Text eingeben.")

.....

how can i include that to...

Case $MSG = $BTN_SEND

Run("net send someuser")

2) i have a perl script on a server.

http://SOMEWHERE/sh/ns-install.pl

how can i start it, by pressing a button?

thanks a lot.

Share this post


Link to post
Share on other sites



1) Read the text of your edit box with GUICtrlRead($EDIT). Example:

Case $MSG = $BTN_SEND
     $TextRead = GUICtrlRead($EDIT)
     Run("net send someuser " & $TextRead)

2) Not sure what you mean by "start it". Do you just want to access that URL? Cus if so, you can just go like this:

Case $MSG = $BTN_PERL; I'm pretending this is the button you want to push
     ShellExecute("http://somewhere/sh/ns-install.pl")

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

Hi Saunders,

sorry 4 my worst english :-)

ah, yes, i want to run a perl script by pressing a button.

i will test it now.

thanks a lot 4 ur help.

//Edit: thanks a lot it works fine :-) is there a user guide for some "hello World" scriptings?

is it possible to set a maximum limit of charakters in a textbox?

Edited by tigerduck

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