Db.CursorLocation = adUseClient
      Db.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & dbFile & ";"
      rs.Open sqlQuery, Db, adOpenStatic, adLockReadOnly
      txtResultat.value = rs.RecordCount

SELECT tblDaten.regdate AS Eingangsdatum, tbliMK.serienr AS SerieNr, _
  tblDaten.repnr AS RMA, tbliMK.matnr AS MaterialNr, tbliMK.maschinentyp, _
  tbliMK.imktyp, tbliMK.vertretung, tbliMK.kunde, tbliMKFehlertable.name AS _
  Fehlerursache FROM ((tblDaten RIGHT JOIN tbliMK ON tblDaten.id = _
  tbliMK.matid) LEFT JOIN tbliMKFehler ON tbliMK.matid = tbliMKFehler.matid) _
  LEFT JOIN tbliMKFehlertable ON tbliMKFehler.fehler = tbliMKFehlertable.id _
  WHERE (((tbliMK.serienr)>'1.03.050.0000' And ( _
  tbliMK.serienr)<'1.03.100.9999') OR ((tbliMK.serienr)>'1.02.050.0000' And ( _
  tbliMK.serienr)<'1.02.100.9999')) AND ((tbliMK.matnr) Like '304*000*56300' OR _
  (tbliMK.matnr) Like '304*000*54200' OR (tbliMK.matnr) Like '304*001*52300') _
  AND ((tbliMK.imktyp) Like 'O30' OR (tbliMK.imktyp) Like 'C20' OR ( _
  tbliMK.imktyp) Like 'C15' OR (tbliMK.imktyp) Like 'C15 / F23') AND (( _
  tbliMKFehlertable.name) Like 'Spulraum -> ungetestet liquidiert' OR ( _
  tbliMKFehlertable.name) Like 'Basis C: C7 Kurzschluss') ORDER BY _
  tbliMK.serienr;