29. März 200125 j Dim dbNetzwerkdaten As Database Dim rsRecordset As Recordset Dim strSQL As String Dim xy As String xy = "online" Set dbNetzwerkdaten = OpenDatabase("\\ws3411\Database\Server_und_Netzwerkkomponenten.mdb") strSQL = "SELECT * From tbl_Status WHERE tbl_Status.Status like " & "'" & xy & "'" Set rsRecordset = dbNetzwerkdaten.OpenRecordset(strSQL, dbOpenSnapshot) Beim Ausführen der Anwendung bekomme ich in der letzten zeile immer einen Type mismatch. Warum? mfG Doomguard :confused:
Archiv
Dieses Thema wurde archiviert und kann nicht mehr beantwortet werden.