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

Register 
新用户注册
Search 搜索
首页 
Home Home
Software
Upload

  
Forum List • Thread List • Reply • Refresh • New Topic • Search • Previous • Next First 1 Last
Message1. 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
Message2. 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 First 1 Last
掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Wed 2017-12-13  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0