Page History
...
dim sFileType as string
' get file type and append it to list label
sFileType = string (FILE_TYPE_
...
LENGTH +
...
1,
...
chr(0))
...
iRet = LceGetFileType(iSession,
...
"PSLMST",
...
sFileType)
lbFileList.
...
Caption =
...
lbFileList.
...
Caption " Type:"
...
sFileType