CheckDirName ( DirNameBuff 〔, Option〕 )
値 | 意味 |
---|---|
Remove | 末尾の(¥)を取り去ります。 |
' フォルダパスが( ¥ )で終わることを保証してからフルパス名を作成
Dim inDir , outDir
inDir = _TEMP_
outDir = "C:¥Script¥Data"
CheckDirName ( inDir )
CheckDirName ( outDir )
Copy ( inDir+"FILE.DAT" ,outDir+"FILE.DAT" ,Overwrite )