To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=61277
                  Issue #:|61277
                  Summary:|Basic open file with random access erases all data
                Component:|framework
                  Version:|OOo 2.0.1
                 Platform:|PC
                      URL:|
               OS/Version:|Windows XP
                   Status:|UNCONFIRMED
        Status whiteboard:|
                 Keywords:|
               Resolution:|
               Issue type:|DEFECT
                 Priority:|P3
             Subcomponent:|code
              Assigned to:|tm
              Reported by:|regina





------- Additional comments from [EMAIL PROTECTED] Sat Jan 28 14:38:48 -0800 
2006 -------
I use German OOo2.0.1 on German WinXp.

Generate a dummy “daten.txt” file with about 40 times character x with an 
editor.

Try the following macro on this file

Sub Main
Dim iNumber As Integer
Dim aFile As String
aFile = "c:\daten.txt" REM or where it is on your machine
msgBox "size before opening=" & FileLen(aFile)
iNumber = Freefile
Open aFile For Random As #iNumber len=8
msgBox "size after opening=" & lof(iNumber)
close #iNumber
msgBox "size after closing=" & FileLen(aFile)
End Sub

Notice, that opening the file has erased all data.

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