Cuestión : Excelente desinstalar la escritura de Zoofan. Necesitar una manera de acelerarla o de hacer funcionar las máquinas múltiples al mismo tiempo.

Hola, el

Excellent desinstala la escritura de Zoofan. Necesitar una manera de acelerarla o de funcionar el
Rather de las máquinas al mismo tiempo. que desinstalando uno después de que el other

Can cualquier persona ayuda con este change

REgards
Sharath
class= > " claro " 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
 “entonces terminó”
						objOutputFile.WriteLine strReadPCfile
						objOutputFile.Close
						WScript.Quit (0)
					<> strReadAppfile de ElseIf “entonces terminado”
						objOutputFile.WriteLine strReadAppfile
						objOutputFile.Close
						WScript.Quit (0)								
					
						Para cada strPCName en arrPcnames
							arrPCappList de ReDim (0)
							el más strConnectionTest = IsServerOn (strPCName)
							Si el <> más strConnectionTest “en línea” entonces
								strPCName de objOutputFile.WriteLine y “, error mientras que conecta: ” y el más strConnectionTest
							
								arrPCappList de ReDim (0)
								strGetRemApps = getRemoteApps (strPCName, arrPCappList)
								Si <> “gotlist” de los strGetRemApps entonces
									strPCName de objOutputFile.WriteLine y “, error mientras que consigue la lista alejada del uso: ” y strGetRemApps
								
									arrTargetApps de ReDim (0)
									strCompApps = compareArray (arrUninstallApps, arrPCappList, arrTargetApps) 										 
									Si el <> de los strCompApps “entonces terminó”
										strPCName de objOutputFile.WriteLine y “, error mientras que compara la lista del uso: ” y strCompApps
									
										Si 0) <> “noAppsToDo” de los arrTargetApps (entonces
											Para cada strTargetapp en arrTargetApps
											el arrAppSplit = partió (strTargetapp, ““*u*” ")
											strUnistallRet = uninstallTarget (strPCName, strTargetapp)																
												Si el <> del strUnistallRet “entonces desinstaló”
													strPCName de objOutputFile.WriteLine y “, error mientras que desinstala” y arrAppSplit (0)
												
													el strPCName de objOutputFile.WriteLine y “,” y el arrAppSplit (0) y “fueron desinstalados con éxito”
												Terminar si																
											Después
										
											strPCName de objOutputFile.WriteLine y “, ningunos usos a desinstalar.”
										Terminar si															
									Terminar si
								Terminar si	
							Terminar si
						Después														
						objOutputFile.Close
					Terminar si
			Terminar si                                                
	Terminar si
WScript.Quit (0)          
 
Función privada readFileToArray (strTxtFile, arrname ())
Err.Clear
En curriculum vitae del error después
      intFuncErr dévil, intFuncLines
      objFuncTxtLines déviles, objFuncReadFile, objFuncFso      
            Fijar el objFuncFso = CreateObject (“Scripting.FileSystemObject”)
            Fijar los objFuncTxtLines = objFuncFso.GetFile (strTxtFile)
            Fijar objFuncReadFile = objFuncTxtLines.OpenAsTextStream (ForReading, TristateUseDefault)
                  Hacer hasta objFuncReadFile.AtEndOfStream
                        Arrname del coto de ReDim (intFuncLines)
                        arrname (intFuncLines) = objFuncReadFile.ReadLine
                        intFuncLines = intFuncLines + 1
                  Lazo
            objFuncReadFile.Close
            Fijar el objFuncFso = nada
            Fijar los objFuncTxtLines = nada
            Fijar objFuncReadFile = nada                    
		Si <> 0 de Err.Number entonces
			readFileToArray = “archivo de la lectura del error: ” y strTxtFile y VbCrLf y “descripción: ” Y Err.Description		
		
			readFileToArray = “terminó”
		Terminar si
  En el error 0 indicado
Función del final
getRemoteApps de la función (strRemotePC, arrname ())
Err.Clear
En curriculum vitae del error después
objFuncWMIService dévil
colFuncSoftware dévil
objFuncSoftware dévil
intFuncLines déviles
        Fijar el objFuncWMIService = GetObject (“winmgmts: ¡” y “{impersonationLevel=impersonate}! \ \” y strRemotePC y “\ raíz \ cimv2”)
        Fijar el colFuncSoftware = objFuncWMIService.ExecQuery (“SELECCIONAR * de Win32_Product”)   
                Si colFuncSoftware.Count > 0 entonces
                        Para cada objFuncSoftware en colFuncSoftware                     		
                      			arrname (intFuncLines) = objFuncSoftware.Name y ““*u*”” y objFuncSoftware.IdentifyingNumber
                      			intFuncLines = intFuncLines + 1
                      			Arrname del coto de ReDim (intFuncLines)
                        Después
                Terminar si
        Si <> 0 de Err.Number entonces
              getRemoteApps = Err.Description
        
              getRemoteApps = “gotlist”
        Terminar si		                
      En el error 0 indicado                
Función del final
Función IsServerOn (strserver)                        
      Err.Clear
      En curriculum vitae del error después
      Testme dévil
      strTestConn dévil
            Fijar Testme = GetObject (“winmgmts: /” y strserver y “/root/cimv2”)
                  Fijar el strTestConn = GetObject (“winmgmts: /” y strserver y “/root/default: StdRegProv”)
                        Si <> 0 de Err.Number entonces
                              IsServerOn = Err.Description
                        
                              IsServerOn = “en línea”
                        Terminar si
      En el error 0 indicado
Función del final
Función privada compareArray (arrOne (), arrTwo (), arrReturn ())
Err.Clear
En curriculum vitae del error después
strArrElement1 dévil
strArrElement2 dévil
intFuncLoop dévil
	intFuncLoop = 0
	Para cada strArrElement1 en arrOne
		Para cada strArrElement2 en arrTwo
			Si strArrElement1 = strArrElement2 después
			arrReturn del coto de ReDim (intFuncLoop)
				arrReturn (intFuncLoop) = strArrElement2
			=intFuncLoop del intFuncLoop + 1
			Terminar si
		Después
	Después
	Si arrReturn (0) = arrReturn del "" entonces (0) = “noAppsToDo”
    Si <> 0 de Err.Number entonces
          compareArray = Err.Description
    
          compareArray = “terminó”
    Terminar si	
En el error 0 indicado	
Función del final
uninstallTarget privado de la función (strComputer, strAppInfo)
Err.Clear
En curriculum vitae del error después
objFuncWMIService dévil
colFuncSoftware dévil
objFuncSoftware dévil
	el strAppInfo = partió (strAppInfo, ““*u*” ")
	Fijar el objFuncWMIService = GetObject (“winmgmts: ¡” y “{impersonationLevel=impersonate}! \ \” y strComputer y “\ raíz \ cimv2”)
	Fijar el colFuncSoftware = objFuncWMIService.ExecQuery (“seleccionar * de Win32_Product donde nombre = “” y el strAppInfo (0) y “” e IdentifyingNumber = ““y strAppInfo (1) y”” ")	
		Para cada objFuncSoftware en colFuncSoftware
		    objFuncSoftware.Uninstall ()
		Después
	    Si <> 0 de Err.Number entonces
          uninstallTarget = Err.Description
    	
          el uninstallTarget = “desinstaló”
    	Terminar si			
En el error 0 indicado			
Función del final
class= del

Respuesta : Excelente desinstalar la escritura de Zoofan. Necesitar una manera de acelerarla o de hacer funcionar las máquinas múltiples al mismo tiempo.

Eso es un artículo bastante bueno sobre el despliegue de los iTunes.  

Nunca he tenido una edición el funcionar de un archivo de .bat de la “línea de comando” de un programa de SCCM.  Quizás usar .bat en vez de .cm d ayudará a solucionar su edición.

“Programa: los iTunes 9.2 se ponen al día tenido éxito con el código de salida 0” parecen indicar que el cliente de SCCM podía transferir y ejecutar el archivo.  En el ejemplo del PALO de windows-noob.com el código vuelve siempre “0” (que sea lo que lo hace la “salida 0”).  Así pues, incluso si uno del fall de MSIs el archivo del PALO volverá siempre un mensaje del “éxito” al cliente de SCCM.

Esto es una edición difícil y la única manera que he podido mirar en las ediciones es registrar todo el MSI instala.

Por ejemplo “los iTunes 9.1.1.12 .msi /qn /norestart /log c:\isdept\iTunes9.1 .1.12.log de /i del msiexec” crearán un fichero de diario cuando el MSI está instalado.

También,

UserContext = “\ \ SISTEMA de la AUTORIDAD del NT”;  implica que el cliente de SCCM está ejecutando el archivo del palo/del cmd como el usuario de sistema local.  Es inverosímil que este usuario tiene acceso a los archivos si están en una trayectoria de UNC (mientras que el artículo de windows-noob.com sugiere).

Otras soluciones  
 
programming4us programming4us