本ページには広告が含まれています。
指定したフォルダをZIP形式のファイルに圧縮します。
- 構文
- Zip( path, destination )
- 引数
- path 必須
- destination省略可
- 戻り値
プログラム
//////////////////////////////////////////////////
// 【引数】
// path
// destination
// 【戻り値】
//
//////////////////////////////////////////////////
PROCEDURE Zip(path, destination = "")
IFB destination = "" THEN
DIM FSO = CREATEOLEOBJ("Scripting.FileSystemObject")
destination = FSO.GetParentFolderName(path)
ENDIF
POWERSHELL("Compress-Archive -Path " + path + " -DestinationPath " + destination)
FEND