Problema con consulta poco Precisa
Publicado por Lavtaro (4 intervenciones) el 10/03/2001 02:09:13
Primero que todo gracias por leer la nota. Estoy trabajando en VB6. El problemilla es que la consulta es my poco precisa. Este es el código:
Dim SQL As Recordset
Dim DB As Database
Dim CadenaSQL As String
CadenaSQL = "Select ficha, fecha
from tblTrabajos
where ficha = '" & TxtFicha.Text & "' and fecha > #" & Trim$(Text1.Text) & "# ;"
Set DB = OpenDatabase("c:\consulta.mdb")
Set SQL = DB.OpenRecordset(CadenaSQL)
If SQL.RecordCount = 0 Then
MsgBox "No se encontraron registros", vbInformation, "Error"
Exit Sub
End If
Es muy poco precisa al seleccionar por la fecha. la base de datos es ACCESS y el campo es de tipo fecha corta.
Agradecería cualquier ayuda.
Dim SQL As Recordset
Dim DB As Database
Dim CadenaSQL As String
CadenaSQL = "Select ficha, fecha
from tblTrabajos
where ficha = '" & TxtFicha.Text & "' and fecha > #" & Trim$(Text1.Text) & "# ;"
Set DB = OpenDatabase("c:\consulta.mdb")
Set SQL = DB.OpenRecordset(CadenaSQL)
If SQL.RecordCount = 0 Then
MsgBox "No se encontraron registros", vbInformation, "Error"
Exit Sub
End If
Es muy poco precisa al seleccionar por la fecha. la base de datos es ACCESS y el campo es de tipo fecha corta.
Agradecería cualquier ayuda.
Valora esta pregunta
0