OpenOffice.info

Guten Tag.

Beim Versuch über Basic Daten in eine Tabelle einzufügen entsteht ein Fehler.

Sub DatenEinfuegen

Dim oDialog As Object
Dim DatabaseContext as Object
Dim s as String
Dim oDatenquelle as Object
Dim oHandler as Object
Dim oDatVerb as Object
Dim oStatement as Object
Dim oErgSet as Object
Dim sSql as String

DatabaseContext=createUnoService("com.sun.star.sdb.DatabaseContext")
oDatenquelle=DatabaseContext.getByName("Test")

If not oDatenquelle.IsPasswordRequired Then
oDatVerb=oDatenquelle.getConnection("","")
Else
oHandler=oDatenquelle.createUnoService("com.sun.star.sdbc.InteractionHandler")
oDatVerb=oDatenquelle.ConnectWithCompletion(oHandler)
End If


oStatement=oDatVerb.createStatement()
oStatement.ResultSetConcurrency=com.sun.star.sdbc.ResultSetConcurrency.UPDATABLE
oStatement.ResultSetType=com.sun.star.sdbc.ResultSetType.SCROLL_SENSITIVE
sSQL= "SELECT ""Name"",""Vorname"" FROM ""tblPerson"""
oErgSet=oStatement.executeQuery(sSQL)

oErgSet.absolute(3)
s=oErgSet.getString(1)
msgBox s, 0, "Test"
oErgSet.moveToInsertRow()
......


End Sub


Die Daten können aus der Tabelle gelesen werden. In der Zeile oErgSet.moveToInsertRow() zeigt er folgenden Fehler.

BASIC Laufzeitfehler,
Es ist eine Exception aufgetreten
Type:com.star.sdbc.SQLException
Massage:Function sequence error.

Woran liegt das?

Hey Kulesza,

..Versuch über Basic Daten in eine Tabelle einzufügen ...

Was für eine Tabelle? Was für eine Datenbank hast du? HSQLDB oder Calc-Tabelle?

Gruss
Thomas

Eine HSQLDB Tabelle in OpenOffice Base.