文档介绍:.'..............................................................................'SummaryServerProcessReport-'Generateareportforallinstalledservers"processes.'Copyright(c2003byPurPerLimited'..............................................................................DimReportFile'..............................................................................'..............................................................................SubLog(Description,((DataEndSub'..............................................................................'..............................................................................FunctionBooleanToString(ValueResult="True"IfValue=TrueThenResult="True"ElseResult="False"EndFunction'..............................................................................'..............................................................................mandCountDimParameterCountDimServerRecordDimServerProcessDimSDimfsoIfClientIsNothingThenExitSubBeginHourGlassS=""FileName=SpecialFolder_MyDesigns+"\"Setfso=CreateObject(""SetReportFile=(FileName,TrueCallLog("ServerProcessesinformation:",""CallLog("=============================",""CallLog("",""RecordCount=