Hi,
Ich brauchen hilfen. z.b
Ich habe Tabelle
Meine Tabelle Name ist Test008 Und Test007
Test008:
ID Niedrig Hoch
1 100 200
2 500 700
3 900 1000
************************************************************
Test007:
ID DD001
1 530
************************************************************
Sub FindProject007()
Dim strSQL As String
Dim rst As Recordset
Set WS = DBEngine.Workspaces(0)
Set DB = WS.Databases(0)
strSQL = "SELECT * FROM Test008, Test007 WHERE Test007.DD001 >= Test008.Niedrig AND Test007.DD001 <= Test008.Hoch"
Set rst = DB.OpenRecordset(strSQL)
If Not rst.EOF Then
MsgBox "Not Found"
Else
MsgBox "Found"
End If
rst.Close
Set rst = Nothing
End Sub
Meine Fragen jedesmal Wenn ich versuchen über Formulare zu Filtern >= AND <= wie meine Beispiel oben
bekommen ich egal welchen Nr (FOUND). Normal wenn ich 107 eingeben soll sagen (FOUND) aber wenn ich 800 eingeben
soll sagenn (NOT FOUND). Bitte was habe ich falsch gemacht????
Danke