Hai,
who do i get the Google Talk Contact list count in the main window named "Google Talk"

I tried with

SendMessage = (Hwnd,LVM_GETITEMCOUNT,0,0)

but does not work.

Option Explicit

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long

Private Const LVM_FIRST = &H1000
Private Const LVM_GETITEMCOUNT = (LVM_FIRST + 4)

Private Sub Command1_Click()
Dim wnd As Long
Dim chwnd As Long
Dim cchwnd As Long
Dim itcount As Long

wnd = FindWindow("Google Talk - Google Xmpp Client GUI Window", vbNullString)
chwnd = FindWindowEx(wnd, 0&, "Main View", vbNullString)
cchwnd = FindWindowEx(chwnd, 0&, "Contact List View", vbNullString)
itcount = SendMessage(cchwnd, LVM_GETITEMCOUNT, 0, 0)
MsgBox itcount

End Sub

Edit:- code has been slightly edited.