JP1/Script(Windows(R)用)
MakePath ( FullPathBuff , DrvName , DirName , LblName , ExtName )
' OriginalFileに格納されているファイル名を解析し, ' 拡張子を".BAK"に変更したフルパスをBackupFileに作成する。 Dim OriginalFile ,BackupFile ,Drv ,Dir ,Lbl ,Ext OriginalFile = _SCF_ + "TEST.SPT" SplitPath ( OriginalFile ,Drv ,Dir ,Lbl ,Ext ) MakePath ( BackupFile ,Drv ,Dir ,Lbl ,".BAK" )
Copyright (C) 2012, Hitachi, Ltd.
Copyright (C) 2012, Hitachi Solutions, Ltd.