Hello
I would like to incorporate code into this to allow the script I found on the internet to pull input from a txt file and then wait for the script to end before using the next entry in the text file and run until all entries in the text file have been used.
Any help would be great thx.
Jason
' Get Options from user
GetOptions
If (bInvalidArgument) Then
WScript.Echo "Invalid Arguments" & VbCrLf
bDisplayHelp = True
End If
If (bDisplayHelp) Then
DisplayHelp
Else
If (bCheckVersion) Then
CheckVersion
End If
If (strComputer = "") Then
strComputer = InputBox("What Computer do you want to document (default=localhost)","Select Target",".")
End If
If (strComputer <> "") Then
' Run the GatherWMIInformation() function and return the status
' to errGatherInformation, if the function fails then the
' rest is skipped. The same applies to GatherRegInformation
' if it is successful we place the information in a
' new word document
errGatherWMIInformation = GatherWMIInformation()
If (errGatherWMIInformation) Then
If (bDoRegistryCheck) Then
errGatherRegInformation = GatherRegInformation
End If
GetWMIProviderList
Else
WScript.Quit(999)
End If
If (bHasMicrosoftIISv2) Then ' Does the system have the WMI IIS Provider
GatherIISInformation
End If
SystemRolesSet
If (errGatherWMIInformation) Then
Select Case strExportFormat
Case "word"
PopulateWordfile
Case "xml"
PopulateXMLFile
End Select
End If
End If
End If