Guidance Forums / Rapid-Q Basic / If QFilseStream.Open("myfile", fmOpenRead) = 0 Then WORKS-Guidance指路人

Guidance
指路人
g.yi.org

Guidance Forums / Rapid-Q Basic / If QFilseStream.Open("myfile", fmOpenRead) = 0 Then WORKS

Home

Software

Upload

回顶部

⇑

Forum List • Thread List • Reply • Refresh • New Topic • Search • Previous • Next

1. If QFilseStream.Open("myfile", fmOpenRead) = 0 Then WORKS

#1111

Posted by: 2003-10-21 09:41:23

Hello,

The OPEN method of QFileStream is not a SUB as stated in the HTML DOCUMENTATION, but a FUNCTION returning zero if the file does not exist.

' ----------------------------
$INCLUDE "RAPIDQ.INC"
'
Dim fileIn As QFileStream
If fileIn.Open ("c:dontexist", fmOpenRead) <> 0 Then
ShowMessage ("OK the file exist")
Else
ShowMessage ("The File Does Not Exist and it wont Bug")
End If
'
Application.Terminate
End
' ----------------------------

This works as in any other languages !

Jacques

2. Thanks for report this!

#1112

Posted by: guidance 2003-10-21 12:08:50

It will be added in the bug list.

Forum List • Thread List • Reply • Refresh • New Topic • Search • Previous • Next

掌柜推荐