[VB6] - Multi-User Chat Example (Winsock)

It's almost done now. I had to start over some time ago, but I'm still working on the version shown in the screenshots.

I lost interest in this project awhile ago but still getting it done because I promised. ;) Not sure how many updates I'll do to it once this next one is released, but that's why it's open-source, right? ;) It will have a lot of features in it anyway.

Hey this was a great program, I added private messages, banning, kicking and muting within a half hour, its so easy to add more functions and its very user friendly.

Quote:

---

Originally Posted by RoflItsK

Hey this was a great program, I added private messages, banning, kicking and muting within a half hour, its so easy to add more functions and its very user friendly.

---

Thanks. :)

That was the goal: to make it easy to add/modify.

Hopefully this update, while it has a bunch of features and is completely different, will still be easy enough to modify and change stuff.

Quote:

---

Originally Posted by RoflItsK

Hey this was a great program, I added private messages, banning, kicking and muting within a half hour, its so easy to add more functions and its very user friendly.

---

plez upload source code server+ client


thanks

hi guys

someone can developed more mod like :

private messages + buzz
avatar
banned
ignore
smiles
fonts type+ size + color
admin can create rooms
banned words
upload files share




thanks

i think its only work in a single computer not multi...?right? just like in your attachment pictures...and tyr'd it also but it's not working if u prefer to user it on other computer to other computer..sorry but i am not perfectly sure about this..it just my theory and my expirement explanation...

lol..when you connect,you must change the ip address in the corresponding ip address and port of the server who host that thing..ok.? like if the IP ADDRESS of the server is 10.0.0.9 and the server port is 123456 then you must put that IP ADDRESS and server port to the box so that you could connect...just like what i did.

nice!,simple but full of learnings..

DigiRev you forget about this thread again!?

hey... can i ask a multi user chat using vb6 that does not use modules?? i'm working on a chat room that does not use modules... client side and server side... :)

oh jesus... when could this project will be release.?

Hey DigiRev,

You can can upload the project here and we will fix the bugs (those that we can). ;)

progress?

no respond from him ..as he said he is out in programming at the moment,maybe at the moment means 5 years after or forever for simplicity

Digirev?????????????? :wave: Have you forgotten how to program in vb6 ? :)

no progress yet i see

what if I'm using this program behind a router where I'm not allowed to change the router settings to do port forwarding, at university for example.
There must be some way to do it without changing the router settings, after all, you don't need to change your router settings when you use MSN or anything.

you don't have to mess with theprot forwarding with msn because you are not the host. you only have to port forward if someone outside your router is going to be using your chat system.

Great Replies
Here is Messenger Im Working on it
Webcam Support
VB Support
Room
Private IM

http://0k.012.img98.com/out.php/i389243_resaneh4.jpg

But I Just Afraid From 1Thing:(
I Think If Users Grows up to 5000! Server Cant Handle it!
Which Language is Good For Writing Server?
VB6 is Poor For Server?

Why did you hijack a thread that was created 3 years ago to post a screenshot of your program?

i want to know how can i save chat? i mean when ppl chat with tht program all gona be save when i admin login can view all chat wat ever thy chat in day user etc... if someone can help please share

if i'm reading what your asking correctly when you look at the original server console you see all the chat that there has been since you have been running it..... and you have the option i believe to save the chat to a file from the console if you want it to auto save the chat if i remember correctly you will have to program that yourself. i had to tweek the program myself to make the original work for me.

i asked a friend same q he told me i have to make data base for save chat etc... so i have to know php code:-s
i got no idea about php lol so im not gonna coded::mad:
thanks for reply

if i can find the code i did i will post it tomorrow

hijack?
I Just want to Ask a Question in this post[because most of those peoples come here! Know about Multi User Chatting Problems...! And U Say Why did u hijack...?
lol
Must of Guys post Screenshot! so is it problem?

Quote:

---

Originally Posted by paki42o

i asked a friend same q he told me i have to make data base for save chat etc... so i have to know php code:-s
i got no idea about php lol so im not gonna coded::mad:
thanks for reply

---

Why u use php?
U can store ur data in db with vb

Code:

---

Public dB As New ADODB.Connection

Sub OpenDB()
ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};Dbq=mdbAccess.mdb;DefaultDir=" & App.Path & ";UID=;PWD="  ' mdbAccess is ur database name! i save mdbAccess.mdb in my Program path

dB.ConnectionString = ConnectionString
dB.ConnectionTimeout = 10
dB.Open
End Sub

---

and with this code[below] u can Save ur Chat Archives... in DB

Code:

---

Function AddMessageArchive(Username As String, Message As String) As Boolean
Dim rs As New ADODB.Recordset
rs.Open "Ranking", dB, adOpenKeyset, adLockOptimistic 'Ranking is ur table in db file
With rs
    .AddNew
    !Username = Username
    !Message = Message
    Err = 0
    .Update
    If Err <> 0 Then
        AddRankInfo = False
        Exit Function
    End If
End With
AddMessageArchive = True
End Function

---

I HOpe U Got What I Say:-s

Yu could use OLEDB provider for speed while archiving messages.

Here i come.. New to vb6....
I used the pretty cool Digirev's App. Gonna need help to work on it for my Term Project :)
Digi's work was very much helpful...got the basic stuff..
Sweet proj:)

Digi

I'm trying to test your chat project (V 1 first file), but on my client-side pc it asked for the RICHTX32.OCX.
So I installed the file, and registered it using REGSVR32. My server side on a different pc operated perfectly.

The Client side still can't find the OCX, any suggestions?

copy from the server machine and place in the correct folder should work then

sorry i been away

Quote:

---

Originally Posted by Genovah

Well here is a huge revamp from my previous version. Please let me know if you find any bugs or have any suggestions. Feedback is much appreciated!

If you are trying to use the e-mail feature you will need to edit the SendMail sub and enter your gmail user account information. The only thing that is not functional server side is the chatrooms feature that is still a work in progress. Ignore any foul language in the code it is mostly me talking to myself. The main server is online so feel free to connect if you have questions or want to talk.

Thanks!

---

I use some part of code from post 132...
My question is how to modify server side code to accept only 1 connection at time ?

So that next client will wait until first client disconnect's...

hi there DigiRev.. im a new memberhere in vbforums and i just want to ask you a question....

how can we add kick user function in the first project you make

It can be used for chatting with another computer????

omg its realy good but i convert it to .net using vs2008 and fix the errors,server worked but client cant send message in users list box get +1 when i send something and it makes spam only client but im gonna make only server can speak