To comment on the following update, log in, then open the issue: http://www.openoffice.org/issues/show_bug.cgi?id=59197 Issue #:|59197 Summary:|Get function unexplained behaviour Component:|api Version:|OOo 2.0 Platform:|PC URL:| OS/Version:|Windows XP Status:|UNCONFIRMED Status whiteboard:| Keywords:| Resolution:| Issue type:|DEFECT Priority:|P3 Subcomponent:|code Assigned to:|sw Reported by:|pi_r2
------- Additional comments from [EMAIL PROTECTED] Sun Dec 11 02:23:33 -0800 2005 ------- following exemple (from on line help) doen't work as expected: What happens is Get function always position at file end, whatever seek does before. It is only when position is put in the get call that get works. Sub ExampleRandomAccess Dim iNumber As Integer Dim sText As String * 32'REM Must be une variant 'WRONG variant generates error Dim aFile As String aFile = "c:\data.txt" iNumber = Freefile Open aFile For Random As #iNumber Len=32 Seek #iNumber,1 REM Position au début Put #iNumber,, "Ceci est la première ligne de texte." REM Remplir la ligne avec du texte Put #iNumber,, "Ceci est la seconde ligne de texte." Put #iNumber,, "Ceci est la troisième ligne de texte." Seek #iNumber,1 Get #iNumber,,sText Get #iNumber,,sText Get #iNumber,,sText Print sText Close #iNumber 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]
