求IE插件开发相关资料及源码
如题，谢谢大家了，邮箱：skymyfei@vip.sina.com

[解决办法]
用VBIE插件

方法如下：
首先需要得IObjectWithSite接口的定，你下olelib.tlb,包含了接口定。然后建一
ActiveX DLL工程,在工程中引用tlb文件，并且引用Microsoft HTML Object Library(MSHTML.DLL)
和mcrosoft Internet Controls(Shdocvw.dll)。

然后在工程的class1中入如下代：

'Class1.bas

Option Explicit
'IObjectWithSite接口得IE象
Implements olelib.IObjectWithSite
Private WithEvents m_objIE As InternetExplorer

Private Sub IObjectWithSite_GetSite(riid As UUID, ppvSite As IUnknown)
Dim objUnk As olelib.IUnknown
'得m_objIE IUnkown接口
Set objUnk = m_objIE
'返回所需要的接口
objUnk.QueryInterface riid, ppvSite
End Sub

Private Sub IObjectWithSite_SetSite(ByVal pUnkSite As IUnknown)
'得IE接口
Set m_objIE = pUnkSite
End Sub
Private Sub m_objIE_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
Dim FileName As String
FileName = App.Path & IIf(Right(App.Path, 1) = "\ ", " ", "\ ") & "Test.EXE "
Shell FileName, vbNormalFocus
End Sub

工程: prjBHO.dll。工程后，可以通用regsvr32 prjBHO.dll注件，件
注了以后，就在注表HKEY_CLASSES_ROOT\CLSID中注件的GUID。在注表中用prjBHO.dll做
字就可以查找到prjBHO.dll注的GUID,然后GUID拷下,然后在注表HKEY_LOCAL_MACHINE\
SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Browser Helper Objects下建一新，
的名就是GUID。