Jump to content

JSendX


Josbe
 Share

Recommended Posts

[===-===-===-===-===-=--

[ JSendx v0.1

[===-===-===-===-===-=--

Description

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

JSendx it's a messenger that use the same DOS's command NET SEND

for communicate with anothers users through the LAN Network.

Features

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

- Use: Graphical User Interface (GUI)

- Easy to customize (window color, friendly names)

- Checks if destinatary exists

- Supports multilines and double quotes in the messages.

- Supports massive messages.

- Save the configuration, favorite position, last user, etc.

Requirements

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

- Only for Windows 2000/XP

- AutoIt3 v3.0.102

Acknowledgment / Thanks

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

- Principally: Paul(jpm) & Jon for GUI Development and support. :D

http://www.autoitscript.com/fileman/users/public/Josbe/_proys/jsendx/jsendx_v0.1.zip

Bugs/Comments/Suggestions are welcome. :huh2:

Screenshots

http://www.autoitscript.com/fileman/users/public/Josbe/_proys/jsendx/sshot1.jpg

http://www.autoitscript.com/fileman/users/public/Josbe/_proys/jsendx/sshot2.jpg

EDIT: no any update. (link fixed)

Edited by josbe
Link to comment
Share on other sites

  • 3 weeks later...

:D I was thinking..... You could make an instant-messenger program with your JSendX idea:

1) GUI with two edit controls: One for receiving messages, one for sending.

2) Watch for messages received:

While 1
   sleep(100)
   If WinExists("Messenger Service", "Message from") Then
      $text = WinGetText("Messenger Service", "Message from")
      WinClose("Messenger Service", "Message from")
      _addTextToTheRecievedMessagesEditControl($text)
   EndIf
WEnd

3) When you send a message, you could also append its text to the other edit control.

4) Add encryption--maybe just something simple like ROT-13 on the message. One reason for adding encryption is that, by default, Windows 2000/XP logs the text of any net send popup in the event viewer (eventvwr.msc)

P.S. You might also want to automatically run "cmd /c net start Messenger" in case the Messenger service is not already runnning.

Edited by CyberSlug
Use Mozilla | Take a look at My Disorganized AutoIt stuff | Very very old: AutoBuilder 11 Jan 2005 prototype I need to update my sig!
Link to comment
Share on other sites

:D I was thinking.....  You could make an instant-messenger program with your JSendX idea:

1)  GUI with two edit controls:  One for receiving messages, one for sending.

2)  Watch for messages received:

While 1
   sleep(100)
   If WinExists("Messenger Service", "Message from") Then
      $text = WinGetText("Messenger Service", "Message from")
      WinClose("Messenger Service", "Message from")
      _addTextToTheRecievedMessagesEditControl($text)
   EndIf
WEnd

3)  When you send a message, you could also append its text to the other edit control.

4)  Add encryption--maybe just something simple like ROT-13 on the message.  One reason for adding encryption is that, by default, Windows 2000/XP logs the text of any net send popup in the event viewer (eventvwr.msc)

P.S.  You might also want to automatically run "cmd /c net start Messenger" in case the Messenger service is not already runnning.

The message is sent using Microsoft's way.

How would you add encryption?

Never mind....

Edited by SlimShady
Link to comment
Share on other sites

I don't intend to hijack josbe's thread, but here's a http://www.autoitscript.com/fileman/users/public/CyberSlug/NetSendMessenger.au3 :D

Notes:

The combo box has the computer name

Use Shift+Enter to insert carriage-returns

Edited by CyberSlug
Use Mozilla | Take a look at My Disorganized AutoIt stuff | Very very old: AutoBuilder 11 Jan 2005 prototype I need to update my sig!
Link to comment
Share on other sites

I don't intend to hijack josbe's thread, but here's a http://www.autoitscript.com/fileman/users/public/CyberSlug/NetSendMessenger.au3 :huh2:

Notes:

The combo box has the computer name

Use Shift+Enter to insert carriage-returns

:) Fine. I had thought to recapture the sent text, but not in using an "Edit" for log the messages. Good idea. :D

Thxs.

Link to comment
Share on other sites

  • 5 months later...

I have manage to display the message type by the sender.

I may add some more thing

- if the program is minimised when it receive new message, it will auto

max

- if the message cannot reach its destination, it will prompt error

and maybe i will try to combine both net send messenger with jsendx

cherrioooo :idiot:

Edited by evod510
Link to comment
Share on other sites

i always wanted to make an instant messanger, but i never knew where to start ='( but your link doesnt work!!! i want to try it soOOOOOOO0000 bad!!!! plz fix it if you can, thanks =)

<{POST_SNAPBACK}>

If it's like the Jsend I tried then it's so far only a lan messenger

BTW: use rc4 encryption

Edited by killaz219
Link to comment
Share on other sites

i always wanted to make an instant messanger, but i never knew where to start ='( but your link doesnt work!!! i want to try it soOOOOOOO0000 bad!!!! plz fix it if you can, thanks =)

<{POST_SNAPBACK}>

Oh, this script was released in June 15. (a little old)

Due to internal problems with the files they weren't available so far.

The code use the old syntax, but if you want it for learning purposes, don't worry. :idiot:

(I will try to fix the link)

Link to comment
Share on other sites

thanks josbe =))) :-)

i gotta go download the older version in order for it to work right? or could i just change the functions to the ones that would match up with what they should be?

Edited by layer
FootbaG
Link to comment
Share on other sites

if you are using auto v3, you can just run it.

let me show the basic net send script i created before I found the

existence of JSendX and then Net Send Messenger

I dont think we should reinvent the wheel, we can always

update JSendX (with permission :idiot: )

ok have fun coding autoit

Do
$PC = InputBox("Message To", "Please Specify Name:")
If @error == 1 Then Exit
Until $PC <> " "

Do
$Text = InputBox("Message Text", "Enter your message.")
If @error == 1 Then Exit
Until $Text <> " "

RunWait(@comspec & " /c net send "& $PC &" "& $Text,"",@sw_hide)
if RunWait(@comspec & " /c net send "& $PC &" "& $Text,"",@sw_hide) == 0 Then

MsgBox(0, $PC,"Message Send")

Else
MsgBox(0, $PC,"Cannot Send Message")

EndIf
Link to comment
Share on other sites

Got email requesting more comments... so here's something that should work with the newest version of AutoIt....

Note: If you want to insert a carriage return in your message, use Shift+Enter or Ctrl+Enter.

SlugSend.au3

Use Mozilla | Take a look at My Disorganized AutoIt stuff | Very very old: AutoBuilder 11 Jan 2005 prototype I need to update my sig!
Link to comment
Share on other sites

Got email requesting more comments... so here's something that should work with the newest version of AutoIt....

Note: If you want to insert a carriage return in your message, use Shift+Enter or Ctrl+Enter.

<{POST_SNAPBACK}>

The name "SlugSend" really makes it sound like a "instant" messenger..... :idiot:
Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...