Create a Winpopup application in VB 6?

How do you create a Winpopup application in VB6. I would prefer a tutorial, as I am a complete beginner of VB.

Thanks

------------------
Robert Culver

[Forest Dragon]

What exactly do you mean by "Winpopup"?

[cjwares]

Winpopup is a network chat program. it comes with windows.

Yes, thanks for your help.

I was just wondering how to create one myself in VB6.

[razzaj]

here is some code that should help ... actualy the whole program :

but first u must create a blank project (standart exe ) then add to the form1 :
- winsock control
- 4 text boxes
the first textbox must be set to multiline andf have a vertical scrollbar
- 2 labels ( u will name the first "SESSION WITH" ) and the second leave it as it is ...
- a command button labeled "Connect"


that is for the design .. now here is the code :

Private Sub Command1_Click()
Winsock1.Close
Winsock1.RemoteHost = Text4
Winsock1.RemotePort = 1000
Winsock1.LocalPort = 1000
Winsock1.Bind

End Sub

Private Sub Text1_Change()
Text1.SelStart = Len(Text1.Text)
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Dim nick As String
nick = "*nick*" & Text3
Winsock1.SendData nick
Winsock1.SendData Text2
Text1 = Text1 & Chr(13) & Chr(10) & "<" & Text3 & "> " & Text2
End If
End Sub


Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)

Dim str As String
Winsock1.GetData str
If Mid(str, 1, 6) = "*nick*" Then
Label2 = Mid(str, 7)
Exit Sub
End If

Text1 = Text1 & Chr(13) & Chr(10) & "<" & Label2 & "> " & str

End Sub


description :
---------------

in text1 u are supposed to view both sent and received data (like mirc)
in text2 u type what u want to send
in text3 u put ur nickname ( which u can change when u feel like (without repressing connect)
in text4 u put the ip address of the person u want to chat with ...
before starting any chat fill in those fields(exept text1) and press connect
label1 & label2 must be next to each other as label2 will indicate the other party's current nickname
i hope i havent forgotten anything ...


anyway if u face any problems just email me i ll see what i can do , and if u are having problems understanding the design i ll e mail it to u ... just ask ...

- regards -
- razzaj -

Thanks very much razzaj

I am about to test the program now. I shall put up another message when it is complete.

Thanks again

Robert

[razzaj]

there is one more detail i forgot to add
when u add a winsock control to the form
right clic on the control and set the protocol property to sckUDPProtocol

- regards -
- razzaj -

[razzaj]

rlculver ,

i just was wondering , did it , work , any errors???


------------------
- regards -
- razzaj -

Razzaj,

It worked fine. Very helpful and informative coding.

I see you have put lots of messages up, I am looking at your shutdown procedure for remote computers. Again very detailed and informative.

Thanks a lot for all your help


------------------
Robert Culver

[sujatharaj]

I created a Project as you explained in VB6.0. But it is not working. No error is coming. Why?

[r0ach]

It might not be working because you need the same program on the host computer.

I did a similar program, using TCP/IP. I wanted it to accepted multiple connections, so i created both a 'server' and 'client' program. I never finished it, since i had too much trouble creating a good protocol for the communication between the server and the client apps. Reading this BB, gave me the urge to complete it.

[Maartin]

Yes, I had the same problem with the server and client thing. My idea was to use the NT protocol but nobody could tell me how NT sends a message to another NT PC.

Now this is where the difference comes in. On win9x you need to run the client software continuesly. Where on NT all you do is go to a dos prompt and type 'net send ' and a logon ID ' Hallo' and the message will be displayed on the other PC. No client software that sit in the startbar or systemtry.

But not even microsoft could give a proper answer.

[This message has been edited by Maartin (edited 01-17-2000).]

[Rodik]

I Have also tried like Maartin to use the protocol built in in windows, I know that is you send a message using 'net send' to a W95/98-computer running Winpopup, it would recieve the message, and winpopup sending to an NT-computer would make the message popup. This means they use the same... "port" ? which is equivalent to wheter winsock it uses since if tcp/ip is not installed it does work anyway if you have ipx/spx. Microsoft hasn't given me any answer and I guess they don't want to either.

[smalig]

Here is a code with NetMessageBufferSend function: http://vbcode.webhostme.com/en/click.asp?id=115

It's work like NET SEND Command. You can send a message only to a name that is active on the network. If the message is sent to a username, that user must be logged on and running the Messenger service to receive the message.
Look help about NET SEND.

Best regards.

------------------
smalig
[email protected]
http://vbcode.webhostme.com/

Windows NT acctually does run a 'client' program, only it runs as a service so you don't know it's running.

It's the messenger service, you could see it when you go to services in the control panel



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

Vincent van den Braken
EMail: [email protected]
ICQ: 15440110
Homepage: http://www.azzmodan.demon.nl

[hozo]

In anyone interested in writing a client/server chat/message environment? I have a decsent one already programmed (Sloppy), however I think it can turn into something good. Get back to me if you are interested.
[email protected]

[SomeJerk]

I, like many of you am also trying to find a way to send message to a Winpopup or NT Messenger service server. I have found a couple of pieces of useful information. Winpopup and messenger service communitcate using Mailslots... you should be able to find some documentation about that in your MSD library. Mailslots are virtual files stored in memory. the path would be "\\computername\mailslot\messngr" for messngr service and winpopup. How to open a mailslot or write to one is my question. I have been fooling around with the CreateFile function in the win32 API but I am relatively inexperienced in this API stuff

[SomeJerk]

Messenger service receive its messages VIA the mailslot called messngr (\\computername\mailslot\messngr)

Yes, I had the same problem with the server and client thing. My idea was to use the NT protocol but nobody could tell me how NT sends a message to another NT PC.

Now this is where the difference comes in. On win9x you need to run the client software continuesly. Where on NT all you do is go to a dos prompt and type 'net send ' and a logon ID ' Hallo' and the message will be displayed on the other PC. No client software that sit in the startbar or systemtry.

But not even microsoft could give a proper answer.

[This message has been edited by Maartin (edited 01-17-2000).]