OpenOffice.info

Hallo zusammen,

ich habe für mein Programm ein Formular für die Suche nach Namen. Sobald das Textfeld geändert wird, werden die Daten i mListenfeld aktualisiert.

Hierzu 2 Fragen:
1) Ich habe ein SQL mit dem Daten das Listenfeld gefüllt wird
"SELECT ""Name"" || ', ' || ""Vorname ...

Hallo Robert,

vielen, vielen Dank! Da muss ich erst einmal drauf kommen . . . ich bin leider Microsoft verwöhnt . . .

Gruß
Christian

Hallo zusammen,

ich habe in meinem Formular "Stammdaten" einen button "OK". Als Aktion habe ich "Datensatz speichern" eingestellt.
Sobald ich Werte eintragen, wird die SQL Abfrage durchgeführt und eine Meldung erscheint, dass nicht alle Werte eingetragen sind.
Nachdem ich alle Felder ausgefüllt ...

Hallo Robert,

danke für den Hinweis . . . manchmal ist es so einfach

Funktioniert jetzt super!

Gruß
Christian

Hallo zusammen,

ich öffne über ein Formular ein weiteres mit
ThisDatabaseDocument.FormDocuments.getByName("Stammdaten").open

Nun möchte ich direkt anschließend auf diese Form zugreifen. Dazu habe ich 2 Varianten versucht:

1)
oForm = ThisComponent.DrawPage.Forms(0)
2)
oDoc = StarDesktop ...

Hallo Robert,

super Tipp von dir! Genau waqs ich gesucht habe

Jetzt kann ich über "Nach der Datensatzaktion" eine weitere Bearbeitung gestalten.

Gruß
Christian

Hallo zusammen,

ich habe ein Formular und ein Button "OK", der die eingetragenen Daten in die DB speichert. Es wird erst gespeichert, wenn alle Pflichtfelder gefüllt sind. Sind diese nicht gefüllt erscheint eine Meldung.

Ich möchte gerne ein Maskro ausführen, nachdem die Datem gespeichert wurden ...

Super lieben Dank für dein Hilfe!

Thema damit erledigt und beantwortet

Ein Frage dazu hätte ich noch: Wie hast du erkannt, dass die Form nicht geladen war zu dem Zeitpunkt?

Danke und Gruß
Christian

Aber gerne doch!

Danke und Gruß,
Christian

Hallo zusammen,

ich habe foglenden Code:


Sub open_Kontakdaten(iId as Integer)
Dim oDoc as Variant
Dim oForm as Variant
Dim id as Object

ThisDatabaseDocument.FormDocuments.getByName("Kontakt").open

oDoc = StarDesktop.CurrentComponent
oForm = oDoc.DrawPage.Forms(0)
oForm.filter = "ID ...