Textfelder eine Briefvorlage füllen
Verfasst: So, 13.05.2007 17:16
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:
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
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
Gruss
Eckard