NetWare、Symbian OS、UNIX、Windows、および Windows CE で有効です。
GetDir または GetDirectory 関数では、現行ディレクトリ名が取得されます。
ファイルの内容に関するこの関数の形式は、以下のとおりです。
GetDir(n1 as Integer) as String
GetDirectory(n1 as Integer) as String
ドライブ番号を示します。
正常に終了した場合、この関数では、指定ドライブの現行ディレクトリ名を含む文字列が返されます。 それ以外の場合は、空の文字列が返されます。
この関数では、パラメータ n1(ドライブ番号を示します。デフォルトは 0、A は 1、B は 2 など)により示されるドライブの現在の作業ディレクトリの名前が返されます。
注: UNIX プラットフォームでは、「n1」には意味がありません。
例: GetDirectory 関数
この例ではディレクトリが作成され、そのディレクトリに Active Directory が設定された後、そのディレクトリの名前が取得されます。 この例では、デフォルト ディレクトリが C:¥ に設定され、作成したディレクトリの名前が変更されます。 このディレクトリが存在している(つまり、名前が変更されていない)場合は、削除されます。
'Create dir
CreateDirectory("C:¥AMTest")
'Set active dir
SetDirectory("C:¥AMTest")
MessageBox(" Current Directory is : " + GetDirectory(0) )
'Set Default to C:¥
SetDirectory("C:¥")
'Rename the directory
RenameDirectory("C:¥AMTest","C:¥AMTest_1")
If ExistDirectory("C:¥AMTest_1") THEN
RemoveDirectory("C:¥AMTest_1")
Else
MessageBox("Could not find directory : C:¥AMTest_1")
Endif
|
Copyright © 2013 CA.
All rights reserved.
|
|