XL98: Cómo realizar mediante programación una consulta Web

Seleccione idioma Seleccione idioma
Id. de artículo: 187364 - Ver los productos a los que se aplica este artículo
Expandir todo | Contraer todo

En esta página

Resumen

Una consulta Web es una característica nueva de Microsoft Excel 98 Macintosh Edition, que permite recuperar datos almacenados en una intranet o en Internet. Una consulta Web puede utilizar parámetros estáticos, parámetros dinámicos o una combinación de ambos. Consultas con parámetros estáticos envían una consulta sin ninguna entrada; las consultas con parámetros dinámicos le pedirá que para la entrada. Independientemente del tipo de parámetros de la consulta, la información solicitada se extrae de una intranet o sitio Web y los resultados se colocan en una hoja de cálculo.

Mediante un formulario de lenguaje de marcado de hipertexto (HTML), puede utilizar dos métodos para enviar parámetros al servidor: GET y POST. Utilice GET cuando se envía una pequeña cantidad de información y POST cuando estás enviando la mayor cantidad de información. El método GET anexa los parámetros para el localizador de recursos (URL). El método POST envía los parámetros como una línea independiente de texto en el archivo de consulta.

Este artículo proporciona macros de ejemplo que se ejecutan las consultas de Web que utilizan el GET y los métodos POST.

Más información

Microsoft proporciona ejemplos de programación con fines ilustrativos únicamente, sin ninguna garantía tanto expresa como implícita. Esto incluye, entre otras, las garantías implícitas de comerciabilidad e idoneidad para un fin determinado. Este artículo se supone que está familiarizado con el lenguaje de programación que se muestra y con las herramientas que se utilizan para crear y depurar procedimientos. Los ingenieros de soporte técnico de Microsoft pueden explicarle la funcionalidad de un determinado procedimiento, pero no modificarán estos ejemplos para ofrecer mayor funcionalidad ni crearán procedimientos que cumplan sus requisitos específicos.

Mediante programación con una consulta Web

Para ejecutar mediante programación una consulta Web, debe utilizar el método Add de la colección QueryTables. Cuando se utiliza el método Add, devuelve un objeto QueryTable que representa la nueva tabla de consulta. La sintaxis del método Add es como sigue:
<expression><expresión>.Add (conexión, destino, SQL)
<expression>donde <expresión> es necesaria y devuelve un objeto QueryTable. El argumento Connection también es necesario y es el origen de datos de la tabla de consulta. En el contexto de las consultas Web, puede utilizar uno de los dos tipos de cadenas de conexión: dirección URL o FINDER. Al especificar el tipo de dirección URL, se utiliza la dirección URL completa en el servidor en el que está realizando la consulta (puede copiar la tercera línea de cualquier archivo de consulta (.iqy) de Web y utilizar como la dirección URL). Cuando especifica el tipo FINDER, utilice la ruta completa a un archivo de consulta (.iqy) Web existente.

Crear un módulo de Visual Basic

Para poder utilizar los ejemplos en este artículo, debe crear un módulo. Para ello, siga estos pasos:

  1. Guarde y cierre todos los libros abiertos y, después, cree un libro nuevo.
  2. Iniciar el Editor de Visual Basic presionando ALT+F11 OPTION.
  3. En el menú Insertar, haga clic en módulo.

Ejemplos de la dirección URL

Consulta de Web estático (método GET):

En el siguiente ejemplo utiliza parámetros estáticos, no se le pedirán los valores de enviar al servidor de Windows. Para crear esta macro, siga estos pasos:

  1. En el módulo, escriba el siguiente código:
       Sub URL_Get_Query()
    
           With ActiveSheet.QueryTables.Add(Connection:= _
           "URL;http://webservices.pcquote.com/cgi-" & _
           "bin/excelget.exe?TICKER=msft", _
           Destination:=Range("a1"))
    
              .BackgroundQuery = True
              .TablesOnlyFromHTML = True
              .Refresh BackgroundQuery:=False
              .SaveData = True
              End With
       End Sub
    						
  2. Cambie a Sheet1 del libro.
  3. Ejecute la macro URL_Get_Query.
Se devuelve una cotización detallada para MSFT a Sheet1.

Consulta de Web dinámica (método POST):

En el siguiente ejemplo utiliza parámetros dinámicos, se le pedirá los valores para enviar al servidor. Puesto que los parámetros están contenidos en la consulta, este ejemplo utiliza el método POST. Para crear la macro, siga estos pasos:

  1. Cambie al Editor de Visual Basic y escriba la siguiente macro en la hoja de módulo:
          Sub URL_Post_Query()
    
             With ActiveSheet.QueryTables.Add(Connection:= _
             "URL;http://webservices.pcquote.com/cgi-bin/excel.exe", _
             Destination:=Range("a1"))
    
                .PostText = _
                "QUOTE0=[""QUOTE0"",""Enter up to 20 symbols " & _
                "separated by spaces.""]"
    
                .BackgroundQuery = True
                .TablesOnlyFromHTML = True
                .Refresh BackgroundQuery:=False
                .SaveData = True
             End With
          End Sub
    						
  2. Cambie a ésta en el libro y ejecutar la macro URL_Post_Query.
  3. En el cuadro de diálogo Introducir valor del parámetro, escriba hasta veinte símbolos de cotización válidos que están separados por un espacio; por ejemplo, escriba msft .
  4. Haga clic en Aceptar.
Las cotizaciones de bolsa los símbolos de cotización que escribió se devuelven en una tabla de ésta.

Ejemplos FINDER

Consulta dinámica (método GET):

Con el tipo FINDER de conexión, especifique la ruta de acceso completa un archivo de consulta Web existente. Este ejemplo utiliza el método GET porque el archivo de consulta Web, "Microsoft Investor índices", utiliza el método GET. Es decir, los parámetros y la dirección URL del servidor están en la tercera línea en el archivo. Para crear la macro, siga estos pasos:

  1. Cambie al Editor de Visual Basic y escriba la siguiente macro en la hoja de módulo:
       Sub Finder_Get_Query()
    
          Dim IQYFile As String
    
          ' NOTE: Change <HD Name> in the line below to the name of your
          ' hard disk.
          IQYFile = "<HD Name>:Microsoft Office 98:Office:Queries:" & _
                    "Microsoft Investor Indices"
    
          With ActiveSheet.QueryTables.Add(Connection:= _
          "FINDER;" & IQYFile, Destination:=Range("A1"))
    
             .BackgroundQuery = True
             .TablesOnlyFromHTML = True
             .Refresh BackgroundQuery:=False
             .SaveData = True
          End With
        End Sub
    						
  2. Cambie a Sheet3 del libro y ejecutar la macro Finder_Get_Query.

    Dado que este ejemplo utiliza un parámetro dinámico, se le pedirá el valor del parámetro.
  3. En el cuadro de diálogo Introducir valor del parámetro, escriba un símbolo de cotización válido.
  4. Haga clic en Aceptar.
Se devuelve una cotización detallada a Sheet3 para el símbolo de cotización que escribió en el paso 3.

Consulta dinámica (método POST):

Con el tipo FINDER de conexión, especifique la ruta de acceso completa un archivo de consulta Web existente. Este ejemplo utiliza el método POST porque el archivo de consulta de Web "Microsoft Investor Stock Quote," utiliza el método POST. Es decir, los parámetros están en la cuarta línea y la dirección URL del servidor es en la tercera línea en el archivo. Para crear la macro, siga estos pasos:

  1. Cambie al Editor de Visual Basic y escriba la siguiente macro en la hoja de módulo:
            Sub Finder_Post_Query()
    
              Dim IQYFile As String
    
              ' NOTE: Change <HD Name> in the line below to the name of your
              ' hard disk.
              IQYFile = "<HD Name>:Microsoft Office 98:Office:Queries:" & _
                        "Microsoft Investor Stock Quote"
    
                 With ActiveSheet.QueryTables.Add(Connection:= _
                 "FINDER;" & IQYFile, Destination:=Range("A1"))
    
                    .PostText = _
                       "QUOTE0=[""QUOTE0"",""Enter up to 20 symbols " & _
                       separated by spaces.""]"
    
                    .BackgroundQuery = True
                    .TablesOnlyFromHTML = True
                   .Refresh BackgroundQuery:=False
                    .SaveData = True
                 End With
           End Sub
    						
  2. Cambie a la Hoja4 en el libro y ejecutar la macro Finder_Post_Query.

    Dado que este ejemplo utiliza parámetros dinámicos, se le pedirán los valores de parámetro.
  3. En el cuadro de diálogo Introducir valor del parámetro, escriba hasta veinte símbolos de cotización válidos que están separados por un espacio. Por ejemplo, escriba msft .
  4. Haga clic en Aceptar.
Índice de cotizaciones para los símbolos stock que escribió vuelven a una tabla de Sheet4.

Para obtener información adicional, consulte en contacto con el siguiente artículo en Microsoft Knowledge Base:
157482XL97: Cómo crear archivos de consulta (.iqy) de Web

Referencias

Para obtener más información acerca de las consultas Web, haga clic en contenido e índice en el menú Ayuda (o en el menú de globos de Ayuda) si está utilizando una versión del sistema operativo Macintosh anteriores a 8.0, haga clic en el botón índice en la Ayuda de Microsoft Excel, escriba el texto siguiente
Web, las consultas
y, a continuación, haga clic en Mostrar temas. Seleccione el tema "Obtener datos de un origen Web" y haga clic en Ir A. Si no se puede encontrar la información que necesita, pregunte al Ayudante de Office.

Propiedades

Id. de artículo: 187364 - Última revisión: viernes, 17 de junio de 2005 - Versión: 2.0
La información de este artículo se refiere a:
  • Microsoft Excel 98 para Macintosh
Palabras clave: 
kbmt kbhowto kbprogramming KB187364 KbMtes
Traducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 187364
Renuncia a responsabilidad de los contenidos de la KB sobre productos a los que ya no se ofrece asistencia alguna
El presente artículo se escribió para productos para los que Microsoft ya no ofrece soporte técnico. Por tanto, el presente artículo se ofrece "tal cual" y no será actualizado.

Enviar comentarios

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com