Questione : Eccellente disinstallare lo scritto da Zoofan. Avere bisogno di un senso accelerarlo o fare funzionare le macchine multiple allo stesso tempo.

Ciao, il

Excellent disinstalla lo scritto da Zoofan. Avere bisogno di un senso accelerarlo o fare funzionare il
Rather delle macchine allo stesso tempo. che disinstallando uno dopo che il other

Can chiunque aiuto con questo change

REgards
Sharath class= > " libero " del
> " del codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
147:
148:
149:
150:
151:
152:
153:
154:
155:
156:
157:
158:
159:
160:
161:
162:
163:
164:
165:
166:
167:
168:
169:
170:
171:
172:
173:
174:
175:
176:
177:
178:
179:
180:
181:
182:
183:
184:
185:
186:
187:
188:
189:
190:
191:
192:
193:
194:
195:
196:
197:
198:
199:
200:
201:
202:
203:
204:
205:
206:
207:
208:
209:
210:
211:
>Option notpretty " del class= " del id= " codeSnippet743235 del 
 “allora completasse„
						objOutputFile.WriteLine strReadPCfile
						objOutputFile.Close
						WScript.Quit (0)
					<> strReadAppfile di ElseIf “allora completato„
						objOutputFile.WriteLine strReadAppfile
						objOutputFile.Close
						WScript.Quit (0)								
					Altrimenti
						Per ogni strPCName nei arrPcnames
							arrPCappList di ReDim (0)
							il più strConnectionTest = IsServerOn (strPCName)
							Se <> più strConnectionTest “in linea„ allora
								strPCName di objOutputFile.WriteLine & “, errore mentre collegandosi: „ & il più strConnectionTest
							Altrimenti
								arrPCappList di ReDim (0)
								strGetRemApps = getRemoteApps (strPCName, arrPCappList)
								Se <> “gotlist„ degli strGetRemApps allora
									strPCName di objOutputFile.WriteLine & “, errore mentre ottenendo la lista a distanza di applicazione: „ & strGetRemApps
								Altrimenti
									arrTargetApps di ReDim (0)
									strCompApps = compareArray (arrUninstallApps, arrPCappList, arrTargetApps) 										 
									Se il <> degli strCompApps “allora completasse„
										strPCName di objOutputFile.WriteLine & “, errore mentre confrontando la lista di applicazione: „ & strCompApps
									Altrimenti
										Se 0) <> “noAppsToDo„ dei arrTargetApps (allora
											Per ogni strTargetapp nei arrTargetApps
											il arrAppSplit = ha spaccato (strTargetapp, ““*u*„ ")
											strUnistallRet = uninstallTarget (strPCName, strTargetapp)																
												Se il <> dello strUnistallRet “allora disinstallasse„
													strPCName di objOutputFile.WriteLine & “, errore mentre disinstallare„ & arrAppSplit (0)
												Altrimenti
													lo strPCName di objOutputFile.WriteLine & “,„ & il arrAppSplit (0) & “sono stati disinstallati con successo„
												Concluder se																
											Dopo
										Altrimenti
											strPCName di objOutputFile.WriteLine & “, nessun applicazioni da disinstallare.„
										Concluder se															
									Concluder se
								Concluder se	
							Concluder se
						Dopo														
						objOutputFile.Close
					Concluder se
			Concluder se                                                
	Concluder se
WScript.Quit (0)          
 
Funzione riservata readFileToArray (strTxtFile, arrname ())
Err.Clear
Sul riassunto di errore dopo
      intFuncErr fioco, intFuncLines
      objFuncTxtLines fiochi, objFuncReadFile, objFuncFso      
            Regolare il objFuncFso = CreateObject (“Scripting.FileSystemObject„)
            Regolare i objFuncTxtLines = objFuncFso.GetFile (strTxtFile)
            Regolar objFuncReadFile = objFuncTxtLines.OpenAsTextStream (ForReading, TristateUseDefault)
                  Fare fino a objFuncReadFile.AtEndOfStream
                        Arrname della conserva di ReDim (intFuncLines)
                        arrname (intFuncLines) = objFuncReadFile.ReadLine
                        intFuncLines = intFuncLines + 1
                  Ciclo
            objFuncReadFile.Close
            Regolare il objFuncFso = niente
            Regolare i objFuncTxtLines = niente
            Regolar objFuncReadFile = niente                    
		Se <> 0 di Err.Number allora
			readFileToArray = “lima della lettura di errore: „ & strTxtFile & VbCrLf & “descrizione: „ & Err.Description		
		Altrimenti
			readFileToArray = “ha completato„
		Concluder se
  Sull'errore 0 di avanzamento
Funzione di conclusione
getRemoteApps di funzione (strRemotePC, arrname ())
Err.Clear
Sul riassunto di errore dopo
objFuncWMIService fioco
colFuncSoftware fioco
objFuncSoftware fioco
intFuncLines fiochi
        Regolare il objFuncWMIService = GetObject (“winmgmts: „ & “{impersonationLevel=impersonate}! \ \„ & strRemotePC & “\ radice \ cimv2„)
        Regolare il colFuncSoftware = objFuncWMIService.ExecQuery (“SELEZIONARE * A PARTIRE da Win32_Product„)   
                Se colFuncSoftware.Count > 0 allora
                        Per ogni objFuncSoftware nel colFuncSoftware                     		
                      			arrname (intFuncLines) = objFuncSoftware.Name & ““*u*„„ & objFuncSoftware.IdentifyingNumber
                      			intFuncLines = intFuncLines + 1
                      			Arrname della conserva di ReDim (intFuncLines)
                        Dopo
                Concluder se
        Se <> 0 di Err.Number allora
              getRemoteApps = Err.Description
        Altrimenti
              getRemoteApps = “gotlist„
        Concluder se		                
      Sull'errore 0 di avanzamento                
Funzione di conclusione
Funzione IsServerOn (strserver)                        
      Err.Clear
      Sul riassunto di errore dopo
      Testme fioco
      strTestConn fioco
            Regolare Testme = GetObject (“winmgmts: /„ & strserver & “/root/cimv2„)
                  Regolare lo strTestConn = GetObject (“winmgmts: /„ & strserver & “/root/default: StdRegProv„)
                        Se <> 0 di Err.Number allora
                              IsServerOn = Err.Description
                        Altrimenti
                              IsServerOn = “in linea„
                        Concluder se
      Sull'errore 0 di avanzamento
Funzione di conclusione
Funzione riservata compareArray (arrOne (), arrTwo (), arrReturn ())
Err.Clear
Sul riassunto di errore dopo
strArrElement1 fioco
strArrElement2 fioco
intFuncLoop fioco
	intFuncLoop = 0
	Per ogni strArrElement1 nel arrOne
		Per ogni strArrElement2 in arrTwo
			Se strArrElement1 = strArrElement2 allora
			arrReturn della conserva di ReDim (intFuncLoop)
				arrReturn (intFuncLoop) = strArrElement2
			=intFuncLoop del intFuncLoop + 1
			Concluder se
		Dopo
	Dopo
	Se arrReturn (0) = arrReturn del "" allora (0) = “noAppsToDo„
    Se <> 0 di Err.Number allora
          compareArray = Err.Description
    Altrimenti
          compareArray = “ha completato„
    Concluder se	
Sull'errore 0 di avanzamento	
Funzione di conclusione
uninstallTarget riservato di funzione (strComputer, strAppInfo)
Err.Clear
Sul riassunto di errore dopo
objFuncWMIService fioco
colFuncSoftware fioco
objFuncSoftware fioco
	lo strAppInfo = ha spaccato (strAppInfo, ““*u*„ ")
	Regolare il objFuncWMIService = GetObject (“winmgmts: „ & “{impersonationLevel=impersonate}! \ \„ & strComputer & “\ radice \ cimv2„)
	Regolare il colFuncSoftware = objFuncWMIService.ExecQuery (“selezionare * a partire da Win32_Product dove nome = “„ & strAppInfo (0) & “„ e IdentifyingNumber = ““& strAppInfo (1) &„„ ")	
		Per ogni objFuncSoftware nel colFuncSoftware
		    objFuncSoftware.Uninstall ()
		Dopo
	    Se <> 0 di Err.Number allora
          uninstallTarget = Err.Description
    	Altrimenti
          il uninstallTarget = “ha disinstallato„
    	Concluder se			
Sull'errore 0 di avanzamento			
Funzione di conclusione
class= del

Risposta : Eccellente disinstallare lo scritto da Zoofan. Avere bisogno di un senso accelerarlo o fare funzionare le macchine multiple allo stesso tempo.

Quello è un articolo di niente male su schieramento dei iTunes.  

Non ho avuto mai un'edizione allontanarmi una lima di .bat “dalla linea di ordine„ di programma di SCCM.  Forse using .bat anziché .cm la d contribuirà a risolvere la vostra edizione.

“Programma: i iTunes 9.2 aggiornano riuscito con il codice di uscita 0„ sembra indicare che il cliente di SCCM abbia potuto caricare programmi oggetto ed eseguire la lima.  Nell'esempio del BLOCCO di windows-noob.com il codice restituisce sempre “0„ (che è che cosa “l'uscita 0„ fa).  Così, anche se uno del venire a mancare di MSIs la lima del BLOCCO restituirà sempre un messaggio “di successo„ al cliente di SCCM.

Ciò è un'edizione ingannevole e l'unico senso che ho potuto esaminare le edizioni è di annotare tutto MSI installa.

Per esempio “i iTunes 9.1.1.12 .msi /qn /norestart /log c:\isdept\iTunes9.1 .1.12.log di /i del msiexec„ genereranno una lima di ceppo quando il MSI è installato.

Inoltre,

UserContext = “\ \ SISTEMA di AUTORITÀ del NT„;  implica che il cliente di SCCM stia eseguendo la lima cmd/del blocco come l'utente di sistema locale.  È improbabile che questo utente abbia accesso alle lime se sono su un percorso di UNC (mentre l'articolo di windows-noob.com suggerisce).
Altre soluzioni  
 
programming4us programming4us