Hola
Estoy realizando una base de datos la cual realize una busqueda por un rango de un campo ya sea numerico o cadena, esto lo habia hecho para un campo fecha sin problemas, alguien podria decirme como lo hago con un campo numerico o de cadena.
El codigo lo tego en visual basic, agradeceria mucho a quien me muestre como hacerlo, el codigo es el siguiente:
espero te sirva jonvd,
Private Sub cmdExecute_Click()
Dim strSQL As String
Dim db As Database
Dim dc As Recordset
Dim qrySales As QueryDef
Set db = DBEngine.Workspaces(0).OpenDatabase _
("C:\Sistemas\Proyecto de Vehiculos\Vehiculos.mdb")
Set qrySales = db.CreateQueryDef("", "PARAMETERS [Fecha de inicio] DateTime, " & _
"[Fecha de fin] DateTime; " & _
"SELECT DISTINCTROW Vehiculos.Numeco, " & _
"Vehiculos.Modelo, " & _
"Vehiculos.Kilometraje, " & _
"Orden.Fecha, Servicio.Tipo, Taller.Nombre " & _
"FROM Vehiculos INNER JOIN (Taller INNER JOIN " & _
"(Servicio INNER JOIN Orden ON Servicio.Numero = " & _
"Orden.Numero) ON Taller.Num = Orden.Num) ON " & _
"Vehiculos.Numeco = Orden.Numeco " & _
"WHERE (((Orden.Fecha) Between " & _
"[Fecha de inicio] And [Fecha de fin]))")
qrySales.Parameters("Fecha de inicio") = CDate(txtBegin)
qrySales.Parameters("Fecha de fin") = CDate(txtEnd)
Set dc = qrySales.OpenRecordset()
Set datSales.Recordset = dc
End Sub
Funciona para mostrar una busqueda en un rango de fechas.
