ZTIGather.wsf Compare
Produced: 3/21/2011 11:07:17 AM
   
Mode:  Differences, With Context  
Left file: C:\7\DeployShare\Scripts\ZTIGather.wsf     Right file: A:\Scripts\ZTIGather.wsf  
1293                                 iRetVal = GetIniGenericSettings(sIniFile, sRule) = 1293                                 iRetVal = GetIniGenericSettings(sIniFile, sRule)
1294                                 If iRetVal <> Success then   1294                                 If iRetVal <> Success then
1295                                         oLogging.CreateEntry "ERROR trying to obtain ini settings.  No further processing.", LogTypeError   1295                                         oLogging.CreateEntry "ERROR trying to obtain ini settings.  No further processing.", LogTypeError
1296                                         WScript.Quit iRetVal   1296                                         WScript.Quit iRetVal
1297                                 End if   1297                                 End if
1298     1298  
1299 'MM: Mike Morawski (Migee.com) Per-Task Settings - ZTIGATHER.VBS +-    
1300                                 dim dynamicSections, dynamicSectionsSplit, dSection      
1301                                 oLogging.CreateEntry "MM: Begin Dynamic Groups", LogTypeInfo      
1302        
1303                                 'If DynamicID rule found, process the sections it points at and insert any values into a 'pending' area      
1304                                 If sRule = "DYNAMICID" Then      
1305                                         dynamicSectionsSplit=Split(oEnvironment.Item("DynamicTasks"), ",")      
1306                                         for each dSection in dynamicSectionsSplit      
1307                                                 oLogging.CreateEntry "MM: Processing user-data dynamic section: " & dSection, LogTypeInfo      
1308                                                  
1309                                                 'Process ini group specified by user      
1310                                                 iRetVal = GetIniGenericSettings(sIniFile, "Dynamic_" & dSection)      
1311                      
1312                                                 If iRetVal <> Success then      
1313                                                 oLogging.CreateEntry "MM: ERROR trying to obtain ini settings.  No further processing.", LogTypeError      
1314                                                         WScript.Quit iRetVal      
1315                                                 End if      
1316                                         next      
1317                                 End If                                     
1318 'MM: End Per-Task Settings Snippet      
1319        
1320                         End if = 1299                         End if
1321     1300  
1322                 Next   1301                 Next
1323     1302  
1324                 oLogging.CreateEntry "------ Done processing " & sIniFile & " ------", LogTypeInfo   1303                 oLogging.CreateEntry "------ Done processing " & sIniFile & " ------", LogTypeInfo
1325     1304  
 
1759                                                 If Len(sValue) = 0 then = 1738                                                 If Len(sValue) = 0 then
1760                                                         sValue = oUtility.ReadIni(sIniFile, sSection, sElement & Right("000" & CStr(i), 3))   1739                                                         sValue = oUtility.ReadIni(sIniFile, sSection, sElement & Right("000" & CStr(i), 3))
1761                                                 End if   1740                                                 End if
1762                                                 If Len(sValue) = 0 then   1741                                                 If Len(sValue) = 0 then
1763                                                         Exit For   1742                                                         Exit For
1764                                                 End if   1743                                                 End if
1765   +-    
1766 'MM: Mike Morawski (Migee.com) Per-Task Settings - ZTIGATHER.VBS vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv      
1767        
1768                                                 'Need to denote which values are 'pending'. Any area having 'Dynamic_' prefix is included.      
1769                                                 If Left(sSection, 8) = "Dynamic_" Then      
1770                                                         dim sElement_Prev       
1771                                                         sElement_Prev = sElement      
1772                                                         sElement = sSection & "_" & sElement      
1773                                                 End If      
1774        
1775 'MM: End Per-Task Settings Snippet ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^      
1776        
1777                                                 sValue = oEnvironment.Substitute(sValue) = 1744                                                 sValue = oEnvironment.Substitute(sValue)
1778                                                 Set objTmp = oEnvironment.ListItem(sElement)   1745                                                 Set objTmp = oEnvironment.ListItem(sElement)
1779   +-    
1780                                                 If not objTmp.Exists(sValue) then = 1746                                                 If not objTmp.Exists(sValue) then
1781                                                         objTmp.Add sValue, ""   1747                                                         objTmp.Add sValue, ""
1782   +-    
1783                                                         oEnvironment.ListItem(sElement) = objTmp = 1748                                                         oEnvironment.ListItem(sElement) = objTmp
1784                                                         oLogging.CreateEntry "Added value from [" & sSection & "]: " & sElement & " = " & sValue, LogTypeInfo   1749                                                         oLogging.CreateEntry "Added value from [" & sSection & "]: " & sElement & " = " & sValue, LogTypeInfo
1785   <>    
1786        
1787        
1788        
1789 'MM: Mike Morawski (Migee.com) Per-Task Settings - ZTIGATHER.VBS vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv      
1790                                                                      
1791                                                                 'Record key being used to be called later from a definite variable      
1792                                                                 set objTmp = oEnvironment.ListItem(sSection & "_Elements_LIST")      
1793                                                                 If not objTmp.Exists(sElement_Prev) then      
1794                                                                         objTmp.add sElement_Prev, ""      
1795                      
1796                                                                         oEnvironment.ListItem(sSection & "_Elements_LIST") = objTmp      
1797                                                                         oLogging.CreateEntry "MM: Added DYNAMIC pending value from [" & sSection & "]: " & sElement_Prev & " = " & sValue, LogTypeInfo      
1798                                                                 End If   1750                                                 End if
1799 'MM: End Per-Task Settings Snippet ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^      
1800        
1801                                                         End if      
1802        
1803 'MM: Mike Morawski (Migee.com) Per-Task Settings - ZTIGATHER.VBS vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv      
1804                                                         If Left(sSection, 8) = "Dynamic_" Then      
1805                                                                 sElement = sElement_Prev      
1806                                                         End If                                                     
1807 'MM: End Per-Task Settings Snippet ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^      
1808        
1809                                         Next = 1751                                         Next
1810                                 Else   1752                                 Else
1811                                         sValue = oUtility.ReadIni(sIniFile, sSection, sElement)   1753                                         sValue = oUtility.ReadIni(sIniFile, sSection, sElement)
1812                                         If Len(sValue) = 0 then   1754                                         If Len(sValue) = 0 then
1813                                                 ' oLogging.CreateEntry sElement & " value not defined in the section [" & sSection & "]", LogTypeInfo   1755                                                 ' oLogging.CreateEntry sElement & " value not defined in the section [" & sSection & "]", LogTypeInfo
1814                                         ElseIf Len(oEnvironment.Item(sElement)) = 0 or dicOverwrite.Exists(sElement) then   1756                                         ElseIf Len(oEnvironment.Item(sElement)) = 0 or dicOverwrite.Exists(sElement) then
1815   +-    
1816        
1817 'MM: Mike Morawski (Migee.com) Per-Task Settings - ZTIGATHER.VBS vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv      
1818                                                 'sSection = such as DYNAMIC_WIN_007      
1819                                                 'sElement = such as AREACODE, COMPUTERBACKUPLOCATION etc (becomes DYNAMIC_WIN_007_AREACODE)      
1820                                                 'Dynamic_{task}_Elements = elements to be reset within a task      
1821        
1822                                                 If Left(sSection, 8) = "Dynamic_" Then      
1823                                                         oEnvironment.Item(sSection & "_" & sElement) = oEnvironment.Substitute(sValue)      
1824                                                         oLogging.CreateEntry "MM: Using from [" & sSection & "]: " & sSection & "_" & sElement & " = " & oEnvironment.Item(sSection & "_" & sElement), LogTypeInfo      
1825        
1826                                                         'Use a dictionary to record what values will have to be reset...      
1827                                                         set objTmp = oEnvironment.ListItem(sSection & "_Elements")      
1828        
1829                                                         If not objTmp.Exists(sElement) then      
1830                                                                 objTmp.add sElement, ""      
1831        
1832                                                                 oEnvironment.ListItem(sSection & "_Elements") = objTmp      
1833                                                                 oLogging.CreateEntry "Added DYNAMIC pending value from [" & sSection & "]: " & sElement & " = " & sValue, LogTypeInfo      
1834                                                         End If      
1835                                                 Else      
1836 'MM: End Per-Task Settings Snippet ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^      
1837        
1838        
1839                                                 oEnvironment.Item(sElement) = oEnvironment.Substitute(sValue) = 1757                                                 oEnvironment.Item(sElement) = oEnvironment.Substitute(sValue)
1840                                                 oLogging.CreateEntry "Using from [" & sSection & "]: " & sElement & " = " & oEnvironment.Item(sElement), LogTypeInfo   1758                                                 oLogging.CreateEntry "Using from [" & sSection & "]: " & sElement & " = " & oEnvironment.Item(sElement), LogTypeInfo
1841   +-    
1842        
1843 'MM: Mike Morawski (Migee.com) Per-Task Settings - ZTIGATHER.VBS vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv      
1844                                                 End If      
1845 'MM: End Per-Task Settings Snippet ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^      
1846        
1847                                         End if = 1759                                         End if
1848   +-    
1849        
1850                                 End if = 1760                                 End if
1851                         Next   1761                         Next
1852     1762  
1853                 End if   1763                 End if
1854     1764  
1855     1765