WebBrowser control in VB6 -shdocvw.dll not working in Windows 8

I am using WebBrowser control in VB6. when i develop this in a Windows XP machine and when i add Microsoft Internet Controls reference , shdocvw.dll gets added. And my application works fine in XP. If i create the same project in a Windows 8 PC when i add Microsoft Internet Controls reference, ieframe.dll gets added automatically.But if i use shdocvw.dll then the application files to work in Windows 8 PC. Also there is change in procedure in xp and windows 8.In XP it will be WebBrowser2_FileDownload(Cancel As Boolean) and in Windows 8 the procedure will be WebBrowser2_FileDownload(ByVal ActiveDocument As Boolean, Cancel As Boolean).
I want to use shdocvw.dll in both Windows XP and Windows 8, and it should work properly.Can anyone help me on this?