Dim manager As CometClientManager = ChatChannelHandler.ClientManager 'log in if not already logged If Not manager.ClientExists(publicToken) Then manager.InitializeClient(publicToken, privateToken) End If
If manager.GetClientByPublicToken(strFriendId) IsNot Nothing Then ''add list of friend if online End if
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)