Descargar las actualizaciones de Office 2013
Hola que tal amigos pues en esta ocasión vamos a ver con un script como podemos descargar las actualizaciones de Office 2013 para poder implementarlas en otros entornos, el script muestra la descarga de las actualizaciones en un archivo .MSP de los diferentes componentes de Office 2013. una vez descargadas las podemos utilizar en un recurso compartido de Office 2013 en la carpeta updates. lo que tenemos que hacer es copiar el siguiente código y lo guardamos como CollectUpdates.vbs Dim oMsi,oFso,oWShell Dim Patches,SumInfo Dim patch,record,msp Dim qView Dim sTargetFolder,sMessage Const OFFICEID = "000-0000000FF1CE}" Const PRODUCTCODE_EMPTY = "" Const MACHINESID = "" Const MSIINSTALLCONTEXT_MACHINE = 4 Const MSIPATCHSTATE_APPLIED = 1 Const MSIOPENDATABASEMODE_PATCHFILE = 32 Const PID_SUBJECT = 3 'Displayname Const PID_TEMPLATES = 7 'PatchTargets Set oMsi = CreateObject("WindowsInstaller.Installer") Set oFso = CreateObject("Scripting.FileSystemObject") Set oWShell = CreateObject("Wscript.Shell") 'Create the target folder sTargetFolder […]
