Escribir complemento BHO en VB

BHO (objeto auxiliar del navegador) se utiliza en los complementos de IE para interceptar eventos de IE (puede ser la barra de herramientas de IE, o botones o complementos invisibles. Definición de BHO. Se encuentra debajo de). registro "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Browser Helper Objects\". Cuando se inicia IE, todas las subclaves bajo esta clave se pueden usar a través de la interfaz IObjectWithSite como la extensión de la barra de herramientas anterior. y la interfaz IDispatch se utiliza para escuchar los eventos del navegador.

Primero necesita obtener la definición de la interfaz IObjectWithSite. Descargue tl_ole.zip, que contiene la definición de la interfaz. Después de descargarlo, aplíquelo.

Luego cree un proyecto DLL ActiveX llamado. MyBho hace referencia a este archivo tlb en el proyecto,

y hace referencia a la Biblioteca de objetos HTML de Microsoft (MSHTML.DLL) y a los Controles de Internet de Microsoft (Shdocvw.dll).

Implementa IObjectWithSiteTLB.IObjectWithSite

Atenuar WithEvents m_ie como objeto del navegador de InternetExplorer

Atributo m_ie.VB_VarHelpID = -1

Atenuar m_Site como IUnknownVB 'Interfaz COM

Private Sub IObjectWithSite_GetSite(ByVal priid As IObjectWithSiteTLB.GUIDPtr, ppvObj As IObjectWithSiteTLB.VOIDPtr)

m_Site.QueryInterface priid, ppvObj

End Sub

Private Sub IObjectWithSite_SetSite(ByVal pSite As IObjectWithSiteTLB.IUnknownVB)

Set m_Site = pSite

Set m_ie = pSite 'Puedes hacer lo que quieras después de obtener el objeto Todo hecho

End Sub

Compile este proyecto en: MyBho.dll.

Después de compilar el proyecto, puede registrar este componente llamando a regsvr32 MyBho.dll. Si el componente está en el directorio del sistema, no necesita ingresar la ruta. De lo contrario, debe ingresar la ruta. , como e:\\MyBho.dll

Después de registrar el componente, el GUID del componente se registrará en el registro HKEY_CLASSES_ROOT\CLSID.

Utilice prjBHO.dll como palabra clave en el registro para encontrar el GUID registrado por MyBho.dll, luego copie este GUID y luego agréguelo al registro HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\ Create un nuevo elemento en Explorer\Browser Helper Objects. El nombre del elemento es este GUID

Sub privado m_ie_DocumentComplete(ByVal pDisp como objeto, URL como variante)

En caso de error, reanudar a continuación<. /p> p>

MsgBox CSTR(URL)

Suplemento de respuesta final para hacer las cosas perfectas descarga tl_ole.zip.

http://www.mvps.org/ emorcillo/ download/vb6/tl_ole.zipSi no entiendes nada, por favor contáctame directamente.