To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=61869
Issue #:|61869
Summary:|HSQL access/field update via macro doesn´t work
Component:|Database access
Version:|OOo 2.0
Platform:|All
URL:|
OS/Version:|Windows 98
Status:|UNCONFIRMED
Status whiteboard:|
Keywords:|
Resolution:|
Issue type:|DEFECT
Priority:|P3
Subcomponent:|none
Assigned to:|dbaneedsconfirm
Reported by:|sarotti
------- Additional comments from [EMAIL PROTECTED] Thu Feb 9 12:45:22 -0800
2006 -------
Using a makro to access and update HSQL databases produces an error. Here is
the
macro code:
Sub ResetTMP
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("Adress_db")
If not oDatenquelle.IsPasswordRequired Then
oDatVerb = oDatenquelle.getConnection("","")
else
oHandler = oDatenquelle.createUnoService("com.sun.star.sdb.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 ""TMP1"", ""TMP2"", ""TMP3"" FROM ""TMP"""
oErgSet = oStatement.executeQuery(sSQL)
oErgSet.absolute(1)
REM die folgenden 3 Zeilen ändern den Inhalt der 1.-3.
Spalte des Ergebnisses der Abfrage "sSQL"
oErgSet.updateString(1, "text1") 'here you get the error
oErgSet.updateString(2, "text2")
oErgSet.updateString(3, "text3")
oErgSet.updateRow()
End sub
The error:
Basic runtime error
...exception....
Type: com.sun.star.sdbc.SQLException
Message: Function Sequence error.
Using other databases (like access)the update function with the macro will run.
best regards
- Jörg Leistikow -
---------------------------------------------------------------------
Please do not reply to this automatically generated notification from
Issue Tracker. Please log onto the website and enter your comments.
http://qa.openoffice.org/issue_handling/project_issues.html#notification
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
