Foros de daboweb

MULTIMEDIA, Video digital, Grabación, Diseño gráfico, Diseño web, Programación => Webmasters - Diseño Web - Programación - Diseño gráfico => Mensaje iniciado por: argy en 01 de Agosto de 2006, 06:47:07 pm

Título: Error en sentencia SQL
Publicado por: argy en 01 de Agosto de 2006, 06:47:07 pm

Hola! como ya comente en otro post, estoy trabajando con visual basic para aplicaciones. Qieo consultar una base de datos de excel, pero quiero que esa consulta sea dinamica, que cambie cada vez que los parametros cambien. Esta sentencia de aqui abajo la he creado con el grabador de macros y despues le añadido un par de cambios, pero me da error en sentencia SQL cuando añado WHERE fusibles.In=" & miVariable &"

Sub recuperarDatos()
'recupera datos de la base de datos

miVariable = 4

direccion = Array(Array("ODBC;DSN=Protecciones;DBQ=F:\protecciones.mdb;DriverId=25;FIL=MS Access;MaxBuf"), Array("ferSize=2048;PageTimeout=5;"))

mirar = Array("fusibles.Nombre, fusibles.Clase, fusibles.Tamaño, fusibles.In, fusibles.tension" & Chr(13) & "" & Chr(10) & "FROM  fusibles fusibles" & Chr(13) & "" & Chr(10) & "WHERE (fusibles.In=" & miVariable & ")")

    With ActiveSheet.QueryTables.Add(Connection:=direccion, Destination:=ActiveSheet.Range("a1"))
            .CommandText = mirar
            .Name = izena
            .FieldNames = True
            .RowNumbers = False
            .FillAdjacentFormulas = False
            .PreserveFormatting = True
            .RefreshOnFileOpen = False
            .BackgroundQuery = True
            .RefreshStyle = xlInsertDeleteCells
            .SavePassword = True
            .SaveData = True
            .AdjustColumnWidth = False
            .PreserveColumnInfo = True
            .Refresh BackgroundQuery:=True
        End With
End Sub

No se si alguien sabe como va la cosa o como lo podria hacer se lo agradeceria. Gracias

Título: Re: Error en sentencia SQL
Publicado por: argy en 19 de Agosto de 2006, 09:12:15 am

Hola! Todabia no he solucionado ese problema con la sentencia SQL, pero ya lo he hecho de otra manera.
De todas formas he encontrado esta pagina web que le puede venir bien a alguien que en un futuro trabaje con Visual basic para aplicaciones y gestion de BBDD. http://www.programarvba.com/ (http://www.programarvba.com/)

Título: Re: Error en sentencia SQL
Publicado por: destroyer en 19 de Agosto de 2006, 05:08:40 pm

Gracias por el enlace amigo.. Estamos en malas fechas con las vacaciones..  ;-)

Un saludo