Textfeld füllen mit SQL Anweisung

12/11/2008 - 08:37 von Mike Berger | Report spam
Hallo zusammen,

ich habe auf einem Formular ein Rahmen mit 5 OptionButtons.
Wenn ich jetzt die Option1 anklicke möchte ich gerne, dass das
Textfeld34 mit dem Inhalt von einer Tabelle angezeigt wird.

Tabelle = ID; Art; Text; Aktiv

SELECT [tbl_Einleitungssatz].[ID], [tbl_Einleitungssatz].[Art],
[tbl_Einleitungssatz].[Text] FROM [tbl_Einleitungssatz] WHERE
(([tbl_Einleitungssatz].[Art]="Anruf"))

Aber wie kann ich nun dieses Textfeld34 füllen?

Vielen Dank für Eure Hilfe

Mike
 

Lesen sie die antworten

#1 Andreas Vogt
12/11/2008 - 08:49 | Warnen spam
Hallo,
du könntest die dlookup() Funktion verwenden siehe OH.
Oder auch ein Recordset verwenden im folgenden Muster:

Dim db AS DAO.Database
Dim rs AS DAO.Recordset
Set db = Currentdb
set rs = db.openRecordset("Hier deine Abfrage einfügen",
dbopenDynaset)
Me!Textfeld34 = rs!Text
rs.close
set rs = nothing
set db = nothing

Gruß Andreas

Ähnliche fragen