Hallo
Ich stehe vor folgendem Problem. Ich habe mehrere Memofelder. Nun möchte ich in meinem Formular mit einem Kombinationsfeld ein Memofeld aussuchen und so die Verbindung des entsprechenden Datenbankfeldes dem Textfeld im Formular zuweisen. Wie kann ich das machen?
Gruss Daniel
Ich bin ein Stück weitergekommen. Mit folgendem Code kann ich die verschiedenen Felder aus der Tabelle dem Textfeld auf dem Formular durch eine Kombiboxfeld zuweisen. Ich sehe den Inhalt, doch kann ich diesen nicht überarbeiten
Private Sub cboNotizBereich_AfterUpdate()
Dim strFeldName As String
strFeldName = DLookup("adreText_FeldName", "tblCboAdreTexte", "adreText_ID = " & Me.cboNotizBereich)
Me.Form.RecordSource = "SELECT * FROM qryAdresseTexte WHERE adresse_ID = " & Me.Parent!adresse_ID & " AND adreTeilSes_AdreMitGlied_IDF = " & Me.Parent!sfrAdresseMitgliedListe!adreMitglied_ID & " AND adreTeilSes_Session_IDF = " & Me.Parent!cboAdreSes_Session_IDF
Me.txtAdresse_Bem.ControlSource = strFeldName
Me.Refresh
End Sub
Gruss Daniel
Hallo,
vermutlich ist die Abfrage "qryAdresseTexte" nicht aktualisierbar....
Ja ich habe den Fehler gefunden. Meine Abfrage war so aufgebaut, dass sie nicht aktualisierbar ist. Da die Felder in unterschiedlichen Tabellen sind mache ich nun Select Case eine Unterscheidung und mache mein Me.Forme.RecordSource direkt auf die Tabelle. Nun funktioniert es.
Gruss Daniel