none
Problemas con conexion a base de datos RRS feed

  • Pregunta

  • Hola  a  todos.

    Estoy conectando una macro en word a sql server 2005, pero el código que
    utilizo no me esta funcionando.
    El código es el siguiente:

    Imports Systems.Data
    Imports Systems.Data.SqlClient

    Public Function OLEDB(ByVal myQuery As String) As Data.DataSet

    Dim conexion As System.Data.SqlClient.SqlConnection

    conexion = New System.Data.SqlClient.SqlConnection

    conexion.connectionString = "Data Source=JUDITH-F876DA01\SQLEXPRESS;Initial Catalog=control1;Integrated Security=True"

    conexion.Open

    Dim adapter As New System.Data.SqlClient.SqlDataAdapter

    adapter.SelectCommand=new System.Data.SqlClient.Sqlcommand(myQuery,conexion)

    Dim ds As New System.Data.DataSet

    adapter.Fill (ds)

    conexion.Close

    End Function



    El espacio de nombres que estoy importando no me lo acepta, dice que el procedimiento
    externo no es válido.

    Espero me puedan ayudar.

    Saludos

    • Cambiado Enrique M. Montejo martes, 10 de mayo de 2011 9:58 macro word (De:Lenguaje VB.NET)
    viernes, 19 de junio de 2009 15:58

Todas las respuestas

  • Creo que debes retornar el dataset
    viernes, 19 de junio de 2009 16:35
  • Hola Mariande.

    Muchas Gracias por tu respuesta.

    Me podrías dedir como retornarlo
    viernes, 19 de junio de 2009 16:49
  • hola,


    seria algo asi:

    Public Function OLEDB(ByVal myQuery As String) As Data.DataSet

        Dim conexion As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection
        conexion.connectionString = "Data Source=JUDITH-F876DA01\SQLEXPRESS;Initial Catalog=control1;Integrated Security=True"

        conexion.Open

        Dim adapter As New System.Data.SqlClient.SqlDataAdapter

        adapter.SelectCommand=new System.Data.SqlClient.Sqlcommand(myQuery,conexion)

        Dim ds As New System.Data.DataSet

        adapter.Fill (ds)

        conexion.Close
       
        Return ds

    End Function



    la linea en negrita especifica el objeto que retornas.

    Instrucción Return (Visual Basic)


    saludos
    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina
    viernes, 19 de junio de 2009 17:22
  • Muchas gracias Leandro Tuttini

    Ya agregué la linea que escribiste
    pero me sigue mandando el erro.
    viernes, 19 de junio de 2009 17:32
  • "manesito" escribió:

    > Estoy conectando una macro en word a sql server 2005, pero el código que
    > utilizo no me esta funcionando.
    > El código es el siguiente:
    >
    > Imports Systems.Data
    > Imports Systems.Data.SqlClient
    >
    > El espacio de nombres que estoy importando no me lo acepta, dice que el procedimiento
    > externo no es válido.

    Hola:

    Como dices que estás "conectando una macro en Word a Sql Server 2005", y como observo que el código en principio no tendría que darte ningún problema, te quisiera preguntar si el código fuente que estás intentando ejecutar está dentro de una aplicación de Visual Basic .NET, o por el contrario está dentro de una macro de Microsoft Word.

    Si por una casualidad de la vida, el código está dentro de una macro de Word, me parece a mí que no vas a poder ejecutar el código; tendrás que utilizar código del lenguaje Visual Basic para Aplicaciones. ;-)

    Un saludo


    Enrique Martínez [MS MVP - VB]
    sábado, 20 de junio de 2009 18:51