Hi,

I'm calling the Skype4COM function .SearchForUsers but getting inconsistent results returned between calls.

The first call sets the full name and country to "", but on the second call they are populated.

Here is the code, if you start VB6 and add a command button and list box to a form and paste this code in:

Private Sub Command1_Click()

Dim oUser As SKYPE4COMLib.User
Dim oUsers As SKYPE4COMLib.UserCollection

Dim oClass1 As New Class1

Set oUsers = New SKYPE4COMLib.UserCollection
Set oUsers = oClass1.FindSkypeUser("smith1233")
For Each oUser In oUsers
List1.AddItem oUser.FullName & " " & oUser.Handle & " " & oUser.Country
Next

End Sub

and add a class module called Class1 and paste this code in:

Public WithEvents oSkype As SKYPE4COMLib.Skype
Public oUsers As SKYPE4COMLib.UserCollection
Public Function FindSkypeUser(strSearchString As String) As SKYPE4COMLib.UserCollection
Set oUsers = New SKYPE4COMLib.UserCollection
Set oUsers = oSkype.SearchForUsers(strSearchString)
Set FindSkypeUser = oUsers
End Function
Private Sub Class_Initialize()
Set oSkype = New SKYPE4COMLib.Skype
End Sub

Clicking twice on the command button will show the discrepancies
Any help much appreciated
Cheers