Home Office-Hilfe.com - Wir lösen Ihr Problem mit Microsoft Excel, Word, Outlook, PowerPoint, Access gratis Forum Impressum

  "Ben.-def. Typ nicht gefunden"
Neues Thema eröffnenNeue Antwort erstellen
Autor Nachricht
spacebug
Newbie
Newbie


Anmeldedatum: 15.10.2005
Beiträge: 4
Wohnort: Hamburg

BeitragVerfasst am: 15.10.2005, 20:55 Nach oben

Hallo!

Ich habe ein kleines Problem beim Suchen nach Daten in einer Tabelle, und zwar erscheint die Meldung "Benutzerdefinierter Typ nicht gefunden", wenn ich auf einen Button klick, der folgendes bewirkt:

In Feld "Eingabe" wird ein Wert "A" eingetragen, zu diesem Wert ist in Tabelle "Tab" ein bestimmer Wert "B" zugeordnet. Drückt man den Knopf wird "B" in einem Feld "Ausgabe" ausgegeben.

Wo liegt denn da das Problem?
Habe den Quelltext aus einem Beispielprogramm, dort geht es.

Quelltext:
Private Sub Befehltpos_Click()
On Error GoTo fehler

Dim db As Database
Dim rs As Recordset
Dim Krit As String

If IsNull(Eingabe) Then
MsgBox "Bitte Such-Wert eingeben."
Eingabe.SetFocus
Else
Set db = CurrentDb()
Set rs = db.OpenRecordset("Tab, dbOpenSnapshot)
Krit = "SpalteA='" & Eingabe & "'"
rs.FindFirst Krit
If rs.NoMatch Then
MsgBox "Wert nicht gefunden."
Else
Ausgabe = rs!SpalteB
End If
End If

ende:
Exit Sub
End Sub
Benutzer-Profile anzeigenPrivate Nachricht sendenWebsite dieses Benutzers besuchen
racoon0506
Office-Spezialist
Office-Spezialist


Anmeldedatum: 20.01.2006
Beiträge: 85
Wohnort: Rümmelsheim

BeitragVerfasst am: 20.01.2006, 15:34 Nach oben

Vermutlich verwendest du Access ab Version 2000 (oder höher!).
Hierbei wird von MS lustigerweise ADO vorausgesetzt. Die von dir verwendete Syntax gehört jedoch zur ObjectLibrary von DAO. Ergo musst du zunächst in einem Modul auf den Menüpunkt Extras - Verweise gehen und dort in der Liste den Verweis auf MS DAO 3.x aktivieren.

auch solltest du dir für diese Access-Versionen eine neue (sauberere) Schreibweise merken:
Dim DB as DAO.Database
Dim RS as DAO.Recordset
(um explizit auf DAO zu verweisen!)

BTW: Exit Sub unmittelbar vor End Sub kannst du dir sparen....

_________________
Ein kluger Mann widerspricht nie seiner Frau .... Er wartet, bis sie es selbst tut.
Feedback ist wichtig.
Bei Access-Fragen die verwendete Version angeben! Es gibt gravierende Unterschiede!!!!
Benutzer-Profile anzeigenPrivate Nachricht sendenE-Mail sendenWebsite dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:      
Neues Thema eröffnenNeue Antwort erstellen


Ähnliche Beiträge
Thema Autor Forum Antworten Verfasst am
Keine neuen Beiträge Office nicht für den aktuellen Benutz... metze21 Sonstiges 0 01.12.2008, 18:40 Letzten Beitrag anzeigen
Keine neuen Beiträge Eingehende Mails nicht mehr im html-F... jasonsebi Microsoft Outlook Hilfe 1 01.12.2008, 07:51 Letzten Beitrag anzeigen
Keine neuen Beiträge Weiß nicht weiter! Hab Probleme! steried Sonstiges 1 30.11.2008, 21:57 Letzten Beitrag anzeigen
Keine neuen Beiträge Weiß nicht weiter! Hab Probleme! steried Sonstiges 0 30.11.2008, 21:56 Letzten Beitrag anzeigen
Keine neuen Beiträge Vista, rtfhtml.dll datei fehlt, outlo... Peter Marchert Microsoft Outlook Hilfe 5 30.11.2008, 19:43 Letzten Beitrag anzeigen


 Gehe zu:   



Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Haftungsausschluss/Disclaimer


SMS kostenlos versenden | Battle-Dream | Tuning Forum | Join the YoungGeneration | krankenversicherungsvergleich | Kalorienarme Rezepte!
Versicherungsvergleich | Bürobedarf | Papier | Betten

Ranking-Hits



Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de