ComputerName & ???-??? & dtmThisYear & ???-??? & dtmThisMonth
& ???-??? &_
dtmThisDay & ???-??? & dtmThisHour & ???-??? & dtmThisMinute & ???.xml???
???===================================================================
??? Get export
???===================================================================
Dim objFPC
Dim objArray
??? Here an instance of the FPC object is created.
Set objFPC = WScript.CreateObject(???FPC.Root???)
??? Here, the GetContainingArray method is used, thereby obtaining an instance of the
??? IFPCArray interface that represents an array that contains the
??? current ISA server??™s configuration.
Set objArray = objFPC.GetContainingArray
??? Here, using the Export method dumps the configuration for the ISA server
??? into the XML object that was created.
objArray.Export objXML, 0
objXML.Save(strPath & ???\??? & strFileName)
If WScript.Arguments.Named.Exists(???silent???) = FALSE Then
WScript.Echo(???Finished export to ??? & strPath & ???\??? & strFileName)
End If
???===================================================================
??? Functions
???===================================================================
??? This function is used to pad date variables that contain only one
??? digit.
Pages:
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749