[Gelöst]Daten verschwinden aus der DB
Verfasst: Do, 06.09.2007 18:05
Hi zusammen,
ich habe folgendes Problem:
Ich möchte über einen Dialog mit Eingabefeldern Daten in eine Base DB schreiben.
Wenn ich das Worksheet, aus dem ich den Dialog aufrufe, schliesse, verschwinden die eingegebenen Daten aus der DB.
Sie bleiben erst in der DB stehen, wenn ich explizit über die Datenquelle in Calc gehe und dort sage, dass die Verbindung geschlossen werden soll.
Da das Worksheet von DAUs bedient werden soll, haben die natürlich keine Ahnung, wie man das macht.
Hier ist einmal ein Auszug aus dem Code, ich denke, dass sind die wichtigsten Stellen:
Ich hoffe es kann mir jemand helfen. Bin schon seit Stunden hier im Forum unterwegs, habe aber leider keine Lösung gefunden.
Danke schon mal
Gruß
Ironzwerg
ich habe folgendes Problem:
Ich möchte über einen Dialog mit Eingabefeldern Daten in eine Base DB schreiben.
Wenn ich das Worksheet, aus dem ich den Dialog aufrufe, schliesse, verschwinden die eingegebenen Daten aus der DB.
Sie bleiben erst in der DB stehen, wenn ich explizit über die Datenquelle in Calc gehe und dort sage, dass die Verbindung geschlossen werden soll.
Da das Worksheet von DAUs bedient werden soll, haben die natürlich keine Ahnung, wie man das macht.
Hier ist einmal ein Auszug aus dem Code, ich denke, dass sind die wichtigsten Stellen:
Code: Alles auswählen
Sub StammdatenHinzufuegenOeffnen
DialogLibraries.LoadLibrary( "RechnungsBibliothek" )
oStammdatenhinzufuegen = CreateUnoDialog( DialogLibraries.RechnungsBibliothek.DlgStammdatenHinzufuegen )
StammdatenSuche.StammdatensucheSchliessen
oStammdatenhinzufuegen.Execute()
End Sub
Sub StammdatenHinzufuegen
oDatabaseContext = createUnoService( "com.sun.star.sdb.DatabaseContext" )
oDatenbankname = oDatabaseContext.getByName( "Stammdaten" )
oVerbindung = oDatenbankname.getConnection( "","" )
oSqlAnweisung = oVerbindung.createStatement()
oSqlAnweisung.ResultSetConcurrency = com.sun.star.sdbc.ResultSetConcurrency.UPDATABLE
...
...
...
oSqlAnweisung.executeUpdate(sSql)
oVerbindung.close()
StammdatenHinzufuegenSchliessen
End Sub
Ich hoffe es kann mir jemand helfen. Bin schon seit Stunden hier im Forum unterwegs, habe aber leider keine Lösung gefunden.
Danke schon mal
Gruß
Ironzwerg