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
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
Copyright © 2004-2026 IDERA, Inc.