ファイルの容量を取得します。

GetFileSize ( PathName 〔, UnitofByte〕 )

PathName

取得するファイルのフルパスを文字列，または値を格納した変数名で指定します。

UnitofByte

取得する容量の単位を次の値で指定します。この値は省略できます。省略した場合，Byteを仮定します。

値	意味
Byte	バイト
KB	キロバイト
MB	メガバイト

UnitofByteにKB，またはMBが指定した場合，切り上げた値を返します。例えば，UnitofByteにKBが指定され，容量が1キロバイトに満たない場合は，1を返します。

指定したファイルの容量を取得し，コマンドの実行結果として返します。指定したファイルが存在しない場合は，0を返します。

ディレクトリに対してGetFileSizeを発行した場合，ディレクトリの容量に0以上の値（AIXの場合は2,048バイト）を返します。

JP1/Script 07-51以降では，ラージファイルが使用できます。ただし，ラージファイルでも指定された容量の単位に変換した結果が，JP1/Scriptで扱える数値の上限値2,147,483,647を超えると，エラーとなります。なお，2,251,799,812,636,672バイト以上の容量のファイルに対しては，GetFileSizeコマンドを使用することはできません。

‘ コピー元ファイルの容量を調べて,コピー先ディスクに書き込む空き容量があれば
‘ ファイルをコピーする。
Dim  path1 ,path2 ,fileSz ,freeSz
path1 = _SCF_+"Bkup.TXT"
path2 = "/WORK"
fileSz = GetFileSize ( path1 )
freeSz = GetDiskFreeSpace ( path2 ,KB )
If  ( freeSz * 1024 ) >= fileSz  Then
     Copy ( path1 ,path2 )
End If