The new NET SEND

[evod510]

in the developers forum "Autoit v3.1.0++" i think

<{POST_SNAPBACK}>

sigh....cant find it, confuse no specific location for the beta, found

the 3.1.1 but cannot use it ....

[GaryFrost]

thought you find this interesting, I was tasked with making a net send that sends to multiple subnets in our network, of course I've remove our domain name and true ip's from the ini.

(This has been in use for our site for almost a month now)

Let me know what you think.

[erifash]

Sorry, i was away for a while. Wow, this is my first hot topic ever! Cool so...

For all of you who wanted a compiled version, here ya go:

It has a pretty cool icon that i think i reshacked from explorer or shell32...

gafrost, that program looks great!

[advance]

how about net stop?... that would be sweet!

[erifash]

how about net stop?... that would be sweet!

<{POST_SNAPBACK}>

ohhhh... very interesting! Maybe tomorrow though.

[advance]

Now now now!! ;p... I might take a crack at it once i get time

[Owen]

Net Send DOES work when SENDING to Win 9x computers, however WinPopup (X:\Windows\Winpopup.exe I think) must be running for it to receive it

And never run net send /domain message here on a school/business network! Instantly busted!

[Ktulu789]

just wanna add some info,

few people had already done the gui net send

if you search the forum you can find among the best gui net send

done by Josbe (JSendx v0.1) and CyberSlug (Slugsend).

The one done by CyberSlug is very intersting cause it can be like an instant

messaging.

fyi net send only work in lan and with messenger service running.

here is what i done using message box

Do<BR>$PC = InputBox("Message To", "Please Specify PC Name:")<BR>If @error == 1 Then Exit<BR>Until $PC <> " "<BR><BR>Do<BR>$Text = InputBox("Message Text", "Enter your message.")<BR>If @error == 1 Then Exit<BR>Until $Text <> " "<BR><BR>RunWait(@comspec & " /c net send "& $PC &" "& $Text,"",@sw_hide)<BR><BR>if RunWait(@comspec & " /c net send "& $PC &" "& $Text,"",@sw_hide) == 0 Then<BR><BR>MsgBox(0, $PC,"Message Send")<BR><BR>Else<BR>MsgBox(0, $PC,"Cannot Send Message")<BR><BR>EndIf

Cheers

Two things:

• To avoid blank ImputBoxes you can: $Text=InputBox("NetSend","MSG:","Hello"," M",300,125)
• That script sends the same msg twice

;Original code from Evod510 (some little modifications: Ktulu789)
$PC=InputBox("NetSend","PC:","192.168.0."," M",300,125)
If @error=1 Then Exit
$Text=InputBox("NetSend","Message:","Hello"," M",300,125)
If @error=1 Then Exit

If RunWait(@ComSpec&" /c Net Send "&$PC&" "&$Text,"",@SW_HIDE)=0 Then
MsgBox(0,$PC,"Message Sent")
Else
MsgBox(0,$PC,"Cannot Send Message")
EndIf

What is the difference between "If @error == 1 Then Exit" and "If @error=1 Then Exit"?

Don't answer two spaces and one =, please :-D

The script works anyway but I want to know why it's written with two "=".

Cheers, Lucas.

[BALA]

From help file, under operators:

== Tests if two values are equal (case sensitive if used with strings)

= Assignment. e.g. $var = 5 (assigns the number 5 to $var)

Edited January 28, 2007 by BALA