概述

InstallShield 创建安装日志

#define LOGFILE "SetupLog.txt"

详细内容
export prototype WriteLog(byval string);
function WriteLog(message)
STRING LogFolder, LogFileName, curDate, curTime;
NUMBER nvResult, nLogFileHandle;
begin
   // specify the log folder
   LogFolder = WINDISK +  “\“;
   if (FindFile(LogFolder, LOGFILE, LogFileName) < 0) then
   OpenFileMode(FILE_MODE_APPEND);
            CreateFile(nLogFileHandle, LogFolder, LOGFILE);
            CloseFile(nLogFileHandle);
        endif;
OpenFileMode(FILE_MODE_APPEND);
        OpenFile(nLogFileHandle, LogFolder, LOGFILE);
GetSystemInfo(DATE, nvResult, curDate);
        GetSystemInfo(TIME, nvResult, curTime);
        message = curDate + “    “ + curTime + “    “ + message;
        WriteLine(nLogFileHandle, message);
CloseFile(nLogFileHandle);
 end;