파워빌더.파일 - 생성일자

[ 파워빌더.파일 - 생성일자 ]

 

OLEObject FSO, FSO2INTEGER ll_result string rtn //파일존재 여부 IF NOT FILEEXISTS(as_filename) THEN RETURN 'none' // File System OBJECT 생성 FSO = CREATE OLEObject FSO2 = CREATE OLEObject ll_result = FSO.ConnectToNewObject("Scripting.FileSystemObject") IF ll_result <> 0 THEN //messagebox('error',ll_result) DESTROY FSO DESTROY FSO2 RETURN 'none' END IF FSO2 = FSO.GetFile(as_filename) //File System 구하기 //rtn = string(FSO2.DateCreated , 'yyyy/mm/dd-hh:mm') --> 생성일자 //rtn = string(FSO2.DateLastAccessed , 'yyyy/mm/dd-hh:mm') --> 접근일자 //rtn = string(FSO2.DateLastModified , 'yyyy/mm/dd-hh:mm') --> 수정일자 //rtn = string(FileLength(as_filename)) --> 파일크기 rtn = string(FSO2.DateLastModified, 'yyyy/mm/dd hh:mm:ss') // File System OBJECT Destroy DESTROY FSO DESTROY FSO2 RETURN rtn