Access

Accessible = Access ( Path AS String [ , Mode AS Integer ] ) AS Boolean

يعيد القيمة TRUE إذا كان الملف المحدد بإستخدام Path يمكن الوصول إليه من خلال طريقة التي يحددها Mode .

إذا كانت قيمة Mode هي:
  • gb.Read, فستكون القيمة المعادة TRUE إذا كان الملف قابل للقراءة.

  • gb.Write, فستكون القيمة المعادة TRUE إذا كان الملف قابل للكتابة.

  • gb.Exec, فستكون القيمة المعادة TRUE إذا كان الملف قابل للتنفيذ.

يمكن الجمع بين كل ما سبق بإستخدام عملية OR.

  • gb.Read, هو الوضع الإفتراضي عند عدم تحديد Mode .

للمجلدات, إذا كانت القيمة صحيحة للتنفيذ فهذا يعني أن المجلد قابل للإستعراض.

Examples

PRINT Access("/home/benoit", gb.Write OR gb.Exec)
True

PUBLIC SUB Button1_Click()
DIM sPath AS String

sPath = "/root/bin"
PRINT sPath; " RW "; Access(sPath, gb.Read OR gb.write)
PRINT sPath; " R  "; Access(sPath, gb.Read)
PRINT sPath; "  W "; Access(sPath, gb.write)
PRINT sPath; "    "; Access(sPath)

END
/root/bin RW False
/root/bin R  True
/root/bin  W False
/root/bin    True

All files under the project directory (including any subdirectories created under the project directory) are treated as read-only despite any actual mode settings, even files set to permission mode 777 (full access read-and-write for owner, group and world), (ie: Access("img/myImage.png") will never return gb.Write).

Here is the reason: when making the executable, all project files are put inside the executable file, and so cannot be modified at runtime.

Use temporary files or create a special directory (dotfile) in the current user home directory.

PRINT Access("data/img/myImage.png", gb.Write)
False ' Even after performing: chmod 777 "PathToMyProject/img/myImage.png"

إنظر أيضا