I just have checked this function in EXE file.
1) The empty file Result.TXT might occur when wrong server name (wrong computer name).
2) Need a little corect:
ServerTime= CTOT(STRTRAN(SUBSTR(cServerTime,AT("is",cServerTime)+3,18),CHR(13),""))
to delete chr(13) on line 1 from Result.TXT
ThuVan