Acceder
PortadaForo AyudaTutoriales
InicioForosForo Programación

Como hacer una consulta en sql en visual basic 6

ahggha
2006-09-27 18:44 - Respuestas: 7 - Tema nº: 2422158


Quiero hacer una consulta sql en una tabla en visual basic 6. Lo que quiero hacer es una consulta entre dos fechas que se toman desde dos textboxs. Lo he probado de muchas formas pero no hay manera. El código es el siguiente:
Dim fecha_a As Variant
Dim fecha_b As Variant
fecha_a = "21/9/2006"
fecha_b = "22/9/2006"

Data50.RecordSource = " select * from diario_personal where fecha between fecha_a and fecha_b"
Data50.Refresh
Saludos
Posibles soluciones:
Como hacer una consulta en sql en visual basic 6Como hacer una consulta en sql en visual basic 6
Como hacer una pantalla de consulta de visual basic Como hacer una pantalla de consulta de visual basic
Como hacer consulta en sql desde visual basicComo hacer consulta en sql desde visual basic
Consulta visual basic .netConsulta visual basic .net
Consulta en visual basic 6.0Consulta en visual basic 6.0
ebolo

Re: Como hacer una consulta en sql en visual basic 6 - 2006-09-27 20:00 - Respuesta 2

Hola, debes de tomar los textbox como variables y no ponerlos dentro de las comillas, además debes dar formato americano a las fechas:

Data50.RecordSource = "select * from diario_personal where fecha between (#" & format(fecha_a,"mm/dd/yyyy") & "# and #" & format(fecha_b,"mm/dd/yyyy") & "#)"

más o menos te quedaría así.

Un saludo.

De todas formas si te acostumbras a trabajar directamente con ADO, sin usar ningún componente DAta, ni Adodc pues mejor.
ebolo

Re: Como hacer una consulta en sql en visual basic 6 - 2006-09-27 20:01 - Respuesta 3

Te sigo comentando que Fecha_A y Fecha_b deberías declararlas como date, no como variant.

+saludos.
ahggha

Re: Como hacer una consulta en sql en visual basic 6 - 2006-09-30 19:29 - Respuesta 4

ebolo primero gracias por tu ayuda, he probado tu consejo pero me sale el siguiente error:
Error 3075 en tiempo de ejecución operador between sin and en la expresion de consulta fecha between (#09/21/2006# and #09/22/2006#)
Dim fecha_a As date
Dim fecha_b As date
fecha_a= Text6
fecha_b = Text7

'Data50.RecordSource = "select * from diario_personal where fecha between (#" & Format(fecha_a, "mm/dd/yyyy") & "# and #" & Format(fecha_b, "mm/dd/yyyy") & "#)"
Data50.Refresh
Gracias.
ebolo

Re: Como hacer una consulta en sql en visual basic 6 - 2006-10-02 08:25 - Respuesta 5

Hola, quita los paréntesis que engloba el between:
Data50.RecordSource = "select * from diario_personal where fecha between #" & Format(fecha_a, "mm/dd/yyyy") & "# and #" & Format(fecha_b, "mm/dd/yyyy") & "#"

De todas formas, pienso que es mejor abrir un recordset y trabajar con él, que no darle un origen de datos al objeto Data. Pero bueno esto son manías.

Un saludo.

Página:1 Siguiente

Respuestas relacionadas:

Mostrar consulta sql en pantalla visual basicMostrar consulta sql en pantalla visual basicForo
Como se hace una consulta x fecha en visual basic 6Como se hace una consulta x fecha en visual basic 6Foro
Co mo hacer uqe funcione visual basic 6.0 en w7Co mo hacer uqe funcione visual basic 6.0 en w7Foro
Como hacer una busqueda en visual basic en  un ado ?Como hacer una busqueda en visual basic en un ado ?Foro
Como hacer un programa para farmacia en visual basicComo hacer un programa para farmacia en visual basicForo
Visual basic (de visual studio 2008)Visual basic (de visual studio 2008)Foro
Visual basicVisual basicForo
Visual basic 5.0Visual basic 5.0Foro
Visual basicVisual basicForo
Visual basic 6.0Visual basic 6.0Foro

Sobre la web:

InicioNoticias
^ SubirAviso legal
Política PrivacidadEquipo CE
Configurarequipos06 Julio 2015