파워빌더/파일관리
파워빌더.파일 - 폴더 size 구하기
농부지기
2017. 1. 26. 23:37
[ 파워빌더.파일 - 폴더 size 구하기 ]
| |
String ls_f = "c:\test"Double size
OLEObject FSO, FSO2
FSO = CREATE OLEObject
SetPointer(Hourglass!)
ll_result = FSO.ConnectToNewObject("Scripting.FileSystemObject")
IF ll_result <> 0 THEN
messagebox('error',ll_result)
DESTROY FSO
SetPointer(Arrow!)
return
END IF
IF FSO.FolderExists(ls_f) THEN
FSO2 = FSO.GetFolder(ls_f)
size = FSO2.Size
Else
DESTROY FSO
return
End if
DESTROY FSO2
SetPointer(Arrow!) |