LAN Messanger


Recommended Posts

I am Searching For a LAN messanger .so i cant talk with poeple on my LAN without having to be on the net....

cuz the DSL connection is not up yet...and we need to have some IM Between us..

Link to comment
Share on other sites

Slap one together in VB. It's fun and easy.

Form contains a textbox, listbox and button

Dim oldtext As String

Private Sub Command1_Click()
If Form1.List1.Text <> "" Then
 ? ?oldtext = Form1.Text1.Text
 ? ?ret = NetSendMessage(Form1.List1.Text, Form1.Text1.Text)
 ? ?Form1.Text1.Text = ""
Else
 ? ?MsgBox ("Select a user")
End If
End Sub

Private Sub Form_Load()
Form1.List1.AddItem ("nlouch")
Form1.List1.AddItem ("User2")
Form1.List1.AddItem ("User3")
Form1.List1.AddItem ("User4")
Text1.Text = ""
End Sub


Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
 ? ?If KeyCode = 38 Then
 ? ? ? ?Form1.Text1.Text = oldtext
 ? ?End If
End Sub

Module contains

Private Declare Function NetMessageBufferSend Lib "netapi32.dll" (ByVal servername As String, ByVal msgname As String, ByVal fromname As String, ByVal Buffer As String, ByVal BufSize As Long) As Long


Public Function NetSendMessage(ByVal sSendTo As String, ByVal sMessage As String) As Long
    NetSendMessage = NetMessageBufferSend(vbNullString, StrConv(sSendTo, vbUnicode), vbNullString, StrConv(sMessage, vbUnicode), Len(StrConv(sMessage, vbUnicode)))
End Function

If it's only for a few days, that should do ya!

Link to comment
Share on other sites

doug: I took the chance, it is clean :)

I am looking for something similar. The owner of the company sometimes monitors people from home, and would like to use a computer chat program to be able to talk back and forth. I don't want to have the users be able to initiate a chat request, but I would like them to be able to accept one. Does anyone know of a program like this?

Link to comment
Share on other sites

or use a winsock control in VB, and open a udp connection to 255.255.255.255 when you send data, that will send to everyone on your network

Link to comment
Share on other sites

Nick ..when using ur messanger through 2 computer conectted to each through Switch and Ethernet cards...

one of them can send msg to the other ,,,,but this other cant replay him....do u know why???

it tell him thats the msg was sent to the user...but i dont receive anything...but when i send him he go whatever i send to him!!!!!!!!!!!

Link to comment
Share on other sites

This topic is now closed to further replies.
  • Recently Browsing   0 members

    • No registered users viewing this page.