Thank u for u reply. I created a project and placed 3 buttons in the form and when i click on them i get the following errors:



code :

Code:
Private Declare Function installHook Lib "C:\getListView.dll" (ByVal hwnd As Long) As Long
Private Declare Function removeHook Lib "C:\getListView.dll" () As Long
Private Declare Sub doSelect Lib "C:\getListView.dll" ()


Private Sub Command1_Click()
Dim x As Long
Dim targetHwnd As Long   'you need the targets window handle
x = installHook(targetHwnd)

End Sub

Private Sub Command2_Click()
Call doSelect   'this lets you select all the items after calling installHook
End Sub

Private Sub Command3_Click()
Dim x As Long
x = removeHook()  'removes the hook
End Sub
Furthermore, how should i display the items that i got from external app to my form if it rurns ?Thanks