vb6 web-browser facebook

I tried without success to click the facebook like button in code with the webrowser control, but it doesn't work, here is the cod i used Private Sub ClickLikeUnlike() '# click like or Unlike button here On Error GoTo ErrorHandler: Dim InputCollection As...