How to make a simple chat program in visual basic using the Microsoft Winsock Control

In this instuctable i will show you how to make a simple chat program in visual basic. i will go over what all the code does so you will be learning as you make it, and at the end i will show you how to use it.

Step 1: Overview

This program will let you exchange messages between two people on your same network. It may work if your not on the same network but i can't test it now.

You should have Microsoft Visual Basic 6.0, that is what i am using.
Basic programing knowledge is recommended

Lets get started!!!

open visual basic and create a Standard EXE

Comments

[adityachavan142]

its good but runtime error "object required" 424

[adityachavan142]

its good but error object required

[Naitikkundalia]

I tried your code and it works fine so thank you for it.

I want to perform following task in your program :-
1)Group chat
2)Add smilies
3)Sending files

Please note that i don't want to make more changes

I use richtextbox in my program.

I request you to upload pdf to perform above task

[Screamz332]

I am still having trouble with the sckMain.GetData(Data, vbString) line, do you have any suggestions. I fixed the rest of the errors myself, but have no clue with this one.

[mukeshdube]

when i click host and then connect runtime error 40020 occurrs how i can overcome this problem

[adandoy]

thank you now i already know it...

[t asdi]

when i click host and then connect runtime error 40020 occurrs how i can overcome this problem

[t asdi]

when i click host and then connect runtime error 40020 occurrs how i can overcome this problem

[essamabdallah]

thank you

[rnvenkat]

operator '&' is not defined for types 'string' and 'system.windows.forms.textbox'

i am facing this problem in vb.net 2008

pls help me

[purni2192]

For the send command we get wrong protocol or connection state for the requested transaction,n for other commands v get a runtime error-424 object required..and no 2 forms appear here;pls help me in this...

[othmanmohammed]

i can't download the tut pdf!!

[Corliansa]

there is this word in front = "Run-Time Error '40006';

[Corliansa]

I can't when i click "Send" button it give this message = "Wrong Protocol Or Connection State For The Requested Transaction Or Request" can you fix it?

[markjeggar]

A simple VB.NET chat program with source code

http://vb.net-informations.com/communications/vb.net_chat_server_program.htm

jeggr.

[kumali]

is it working with at least 3 computers?

[de7ox]

Hi, i am coding in VB2008, it worked so far but this part doesn't work @ all for me :

sckMain.state <> sckClose

---

sckMain.accept requestid

---

Please e-mail me with a solution asap as i really like this proggy u made!
[e-mail]
Thanks!

[jflores-3]

I created a chat program without winsock and its works

[jflores-3]

the correct code is:If sckMain.CtlState <> 0 Then

sckMain.Accept(e.requestID)

[sathiprady]

how is it possible can you explain

[twenglish1]

How did you do it?

[gurgle528]

Dim proCedure As String
sckMain.Close()
sckMain.Accept(e.requestID)
sckMain.Accept(e.requestID)
proCedure = txtLog.Text & "Connected to: " & sckMain.RemoteHostIP & vbCrLf
proCedure = txtLog.Text
you will need to fix the lines, but this is what I have.

[RoboticProgrammer]

Winsock1.Close() Winsock1.Accept(e.requestID)

[twenglish1]

i don't know how to get this program to work with VB2008 you need to make changes to the code, sorry

[MunRa]

How to make the message sent to ListBox if use ENTER BUTTON on Keyboard?

Like chat aplication generally, example: Facebook chat.

Thanks

[pradysathi]

Hai I tried to connect the chat(program which is developed in vb 6) with another system on the LAN. i am finding it hard to do so.kindly help me.

[Hendro_Prayogo]

Sir ,
Error "40020" how come ?"
plese reply ..
:D

[hyker69]

mr twenglish when i run the program RUN TIME ERROR Occurs and says it Requires an Object how can i fix that?..pls reply until tommorow because im rushing our project tnx..pls teach me how to fix that problem..tnx again..

[ark_anghel07]

Successfull.. tnx

[twenglish1]

you need to make sure you renamed all the objects correctly

[embivert]

Hi,
I'm paras. I've never tried to run the above program but the way of describing the example is awesome.

[Mochamaddhany]

I have run-time error "40020" invalid operation at current state

[mhimebaugh]

Operator "&" is not defined for types "String" and "System.Windows.Forms.Textbox"
This message will appear when entering the code for cmdSend. This is the exact code I typed in
Private Sub cmdSend_Click()
sckMain.SendData("[" & txtName.Text & "]" & txtSend.Text)
txtLog = txtLog.Text & "[" & txtName & "]" & txtSend.Text & vbCrLf
txtSend.Text = ""
End Sub

[mhimebaugh]

Wait Nevermind i used a diffrent code it works now :P

[вприске]

is it working in WAN i mean like skype or MSN?

[twenglish1]

i tried to figure out how to use this over WAN but i couldn't figure it out

[msörhäll]

I need help.
EVERYTHING is working fine, but I want it so when you're active in the txtSend window, and press Enter/Return, it's the same as clicking Send.

So, when I click enter, it will send the message I've typed in the txtSend box.

Thanks!

[jormsbee]

im on vista so i couldn't get visual basics 6 to work

[jormsbee]

im on vista so i couldn't get visual basics 6 to work

[jormsbee]

does anyone know about visual basics 2010? winsock ?