To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=56327
                  Issue #:|56327
                  Summary:|Crash caused by macro
                Component:|Word processor
                  Version:|OOo 2.0
                 Platform:|All
                      URL:|
               OS/Version:|Linux
                   Status:|UNCONFIRMED
        Status whiteboard:|
                 Keywords:|
               Resolution:|
               Issue type:|DEFECT
                 Priority:|P5
             Subcomponent:|programming
              Assigned to:|mru
              Reported by:|jkon





------- Additional comments from [EMAIL PROTECTED] Thu Oct 20 10:25:05 -0700 
2005 -------
Using the following Macro, it is possible to crash Openoffice serverly.
Sometimes i can restart OpenOpffice afterwards, but most of the times I have to
restart my Linux System. It even happend, that my system froze and would not
react again.

The Macro uses postgresql and is connected to it via unixODBC.
The Table is called "artikel" ist has just two columns (nummer, barcode)

It might be, that the code is somehow malformed, I'm still trying to get hold of
OO Basic, but OO should never crash and even less in a that brutal manner.

Sub executeArticle(art)
    Dim RowSet
    ' Create a row-set to query the database
    RowSet = createUnoService("com.sun.star.sdb.RowSet")
    RowSet.DataSourceName = "postgresql"
    RowSet.CommandType = com.sun.star.sdb.CommandType.COMMAND
    RowSet.Command = "SELECT nummer FROM artikel WHERE nummer=" + art
    RowSet.execute()
    
    ' it only returns 1 row
    ' so we need no loop

    RowSet.next()

    MsgBox "The MaxId is " + RowSet.getString(1)
 
End Sub

---------------------------------------------------------------------
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]


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to