Cómo consultar tablas HTML con VBA Acceso

Visual Basic para Aplicaciones ( VBA ) es el lenguaje de programación de base de datos de programa de acceso de Microsoft . VBA puede realizar las mismas funciones disponibles en la interfaz de acceso habitual , incluyendo la consulta de fuentes externas de acceso a datos. Un tipo de datos externos es una tabla HTML. Consultando una tabla de Access VBA consiste en conectar al documento HTML que contiene la tabla , a continuación, ejecutar una consulta en la tabla . La principal ventaja de consultar una tabla HTML desde Access VBA es el tiempo ahorrado mediante la sustitución de la intervención del usuario de una consulta estándar con la automatización de una consulta basada en VBA . Cosas que necesitará
Microsoft Access
Mostrar más instrucciones
1

Bloc de notas abierto y pegar en ella el siguiente documento HTML muestra. Este documento contiene una pequeña tabla de datos relacionados con las películas . Vas a consultar esta tabla desde un programa VBA acceso:

Press "Control" + " S " y escriba " c: \\ movies.html ." para el nombre de archivo
3

Open Access y pulsa "Alt " + "F11 " para entrar en el entorno de programación de VBA.
4

clic comando " Módulo " del menú " Insertar" para crear una nueva ventana para entrar en la rutina de consulta HTML pulg
5

Pega el siguiente código de programa en la nueva ventana. La subrutina superior crea una conexión , a través del comando " TransferirTexto " , con la tabla en el archivo HTML desde el paso 1 . El subprograma " queryHTML " se ejecutará una consulta SQL en la tabla de datos transferidos.

Public Sub importHTMLData ()

tabName dévil como secuencia

tabName = "Películas "

DoCmd.TransferText acLinkHTML , tabName , "C : \\ movies.html " , -1

End Sub

Public Sub queryHTML ()

Const qry = " qHTML "

Dim dbs Como DAO.Database

recset As DAO.Recordset

Set dbs = CurrentDb

Set recset = dbs.OpenRecordset ( qry )

Do While Not recset.EOF

Debug.Print " título" y recset [ título ]

recset.MoveNext

Loop !

recset.Close

dbs.Close

End Sub
6

Haga clic en cualquier declaración en el subprograma " importHTMLData ", luego presione "F5 "para ejecutar la subrutina.
7

Pulse" Alt "+ " F11 "para volver a Access , a continuación, haga clic en las flechas del panel de navegación ( " << " ) dos veces para actualizar los datos del panel . El panel mostrará ahora una nueva tabla, " Películas ", que la subrutina importHTMLData producido .
8

clic en el icono de la mesa " Películas " en el panel de navegación, haga clic en el menú "Crear" , seguido por el botón "Buscar " en la barra de herramientas principal.
9

doble clic en el tema "Cine" en el cuadro de diálogo "Agregar tabla" , a continuación, arrastre el elemento "* " de la pequeña ventana " Movie " en primer comando de la cuadrícula de la consulta . Esta acción crea una consulta que la segunda subrutina VBA que escribiste utilizará para obtener los datos de la nueva tabla de Películas .
10

Press "Control" + " S ", a continuación, escriba " qHTML " para la consulta de nombre.
11

Pulse " Alt " + "F11 " para volver al entorno de desarrollo . Haga clic en cualquier declaración en el subprograma queryHTML , a continuación, pulse la tecla "F5 " para ejecutar la subrutina.
12

Press "Control" + " G" para abrir la ventana " inmediata " del entorno de desarrollo. La ventana mostrará la salida de la instrucción Debug.Print del subprograma queryHTML . Esa salida contiene los resultados de la ejecución del subprograma queryHTML de la consulta qHTML (del paso 10 ) .

Visual Basics Programación

Cómo cambiar un nombre de archivo de comandos

Cómo jugar el audio multicanal en Visual Basic

Cómo utilizar Visual Basic Express

Partes básicas de Visual Basic

Cómo hacer un evento de clic del ratón mediante Visual Basic

Cómo girar en HTML

Cómo recibir un SMS con Visual Basic

Cómo Auto Scroll texto en un cuadro de texto Utilizando VB.NET