Hi soyemil,
1. Open file "App_Code\DNNChatProvider.vb"
2. Find section below and delete it
-
Public Class MyDataManager
-
-
Inherits CuteChat.AppDataManager
-
-
Public Sub New(ByVal portal As CuteChat.AppPortal)
-
-
MyBase.New(portal)
-
-
End Sub
-
-
Public Overrides Sub AddContact(ByVal identity As CuteChat.ChatIdentity, ByVal userid As String)
-
-
End Sub
-
-
Public Overrides Sub RemoveContact(ByVal identity As CuteChat.ChatIdentity, ByVal userid As String)
-
-
End Sub
-
-
Public Overrides Function GetContacts(ByVal identity As CuteChat.ChatIdentity) As CuteChat.IChatUserInfo()
-
-
Dim portalid As Integer = 0
-
-
Dim list As ArrayList = DotNetNuke.Entities.Users.UserController.GetUsers(portalid)
-
-
Dim res As New ArrayList
-
-
Dim provider As CuteChat.ChatProvider = CuteChat.ChatProvider.Instance
-
-
Dim myname As String = provider.FromUserId(identity.UniqueId)
-
-
For Each info As DotNetNuke.Entities.Users.UserInfo In list
-
-
If Not String.Equals(info.Username, myname, StringComparison.OrdinalIgnoreCase) Then
-
-
res.Add(Me.GetUserInfo(provider.ToUserId(info.Username)))
-
-
End If
-
-
Next
-
-
Return res.ToArray(GetType(CuteChat.IChatUserInfo))
-
-
End Function
-
-
End Class
-
-
-
-
Public Overrides Function CreateDataManagerInstance(ByVal portal As CuteChat.AppPortal) As CuteChat.AppDataManager
-
-
Return New MyDataManager(portal)
-
-
End Function
Regards,
ken