Textfelder eine Briefvorlage füllen

[egerlach]

Hallo,
ich will die datenbankgebundenen Textfelder einer Vorlage per BASIC-Code füllen. Mit F4 (Ansicht -> Datenquellen) bekomme ich nur sehr unständlich mit vielen Klicks, alphabetischer Suche und suchen ... suchen ... was ich will: einen bestimmten Kundennamen aus der Datenbank in die Vorlage einsetzen. Die Textfelder in der Vorlage sind übrigens auch schon durch Entnahme aus der Datenbankquelle entstanden!

Jetzt soll das ganze mit BASIC programmiert werden: bei Klick auf ein Button in der Vorlage soll sich ein Dialog öffnen, der fragt den Kundennachname und - sofern nicht mehrere Namen der der Eingabe übereinstimmen - sind Name, Adresse, Anrede, ... des Kunden im Textdokument.

Leider finde ich nur Fragmente zur Lösung eines solchen (ich meine trivialen) Problemes in diesem Forum! Ich finde nur Lösungen wie ich Feld für Feld durchlaufe und Feld für Feld setze:

Code: Alles auswählen

if oTextFeld.supportsService("com.sun.star.text.TextField.lastname") then
...REM jetzt kannst du irgend etwa tun
    exit do   'Schleife beenden
end if

Der Zugriff auf meine Datenbank ist mir klar, die Daten stehen zur Verfügung, die ich vermutlich mit dem obigen Code den Textfeldern per BASIC zuordnen kann, aber ist da nicht etwas müheseelig? - Ich kann mir nicht vorstellen, daß es nicht eine Variante gibt, in der ich nur den Schlüssel eines Datensatzes der Vorlage übergebe und der Rest fluppt von alleine, schließlich weiss die Vorlage doch schon welches Textfeld welchem Datenbankfeld zugeordnet ist!

Gruss
Eckard

[oseebass]

hallo,

das wäre in der tat viel zu umständlich. gerade dazu ist doch die technik mit den datenbankgebundenen feldern da.

also: das mit dem makro ist soweit ok, du musst tatsächlich abfragen, welcher kunde gewünscht wird.

dann brauchst du aber nur dem formular, das zum dokument gehört, sobald du auch nur 1 formularfeld eingefügt hast mit der abfrage zu versehen. anschließend das formular neu laden oder ausführen (form.execute(), oder form.reload())

hth, gruß oliver