Red de conocimiento del abogados - Respuesta jurídica de la empresa - Cómo obtener texto de una página web desde el control WebBrowser de VB

Cómo obtener texto de una página web desde el control WebBrowser de VB

Función?HtmlStr$(Url$)?'Extraer código fuente de página web función Dim?XmlHttp Set?XmlHttp?=?CreateObject("Microsoft.XMLHTTP") XmlHttp.Open?"GET",?Url ,? Falso XmlHttp.send Si?

Privado?Sub?Form_Load()

Texto1?=?"" Texto1?=?HtmlStr("/")

Fin? Sub