访客只能看到部份内容,免费 加入会员 或由脸书 Google 可以看到全部内容
下面是引用book531231于2006-07-1 19:57发表的 请问OFFICE更新档如何制作无人值守安装: 请问各位先进:(OFFICE更新档如何制作无人值守安装)office2003-KB916518-FullFile-CHT.exeoffice2003-KB917149-FullFile-CHT.exeoffice2003-KB917334-FullFile-CHT.exe.......
function FindCDRom(){ position = "generate.js"; var i, li; if (LaunchFromCD=="yes") FindFile="WIN51"; else FindFile="WPI.hta"; if (foundCDdrv) return cddrv; li = GetCDRomDriveLetters(); for (i=0; i<li.length; i++) { if (FileExists(li+'\\Soft\\WPI\\'+FindFile)) { cddrv = li; debug("Found CDROM as drive " + cddrv,1,2); } }
for %%i in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do if exist %%i\\Soft\\WPI\\WPI.hta set CDROM=%%i:echo Found CD-Rom as drive %CDROM%%System32%\Reg.exe add "HKLM\SoftWare\Microsoft\Windows\CurrentVersion\RunOnce" /V "WPI" /D "%Cdrom%\Soft\WPI\WPI.hta"
CLS@ECHO OFFECHO.ECHO正在安装OFFICE更新档ECHO请稍候.....for %%i in (KB907417.exe) do start /wait %%i /Q:U:Nfor %%i in (KB913807.exe) do start /wait %%i /Q:U:Nfor %%i in (KB905756.exe) do start /wait %%i /Q:U:Nfor %%i in (KB887616.exe) do start /wait %%i /Q:U:Nfor %%i in (KB916521.exe) do start /wait %%i /Q:U:Nfor %%i in (KB914454.exe) do start /wait %%i /Q:U:Nfor %%i in (KB916518.exe) do start /wait %%i /Q:U:Nfor %%i in (KB917334.exe) do start /wait %%i /Q:U:Nfor %%i in (KB917149.exe) do start /wait %%i /Q:U:NEXIT
for %%i in (*.exe) do start /wait %%i /Q:U:N
function FindCDRom(){ position="generate.js"; whatfunc="FindCDRom()"; var i, li; if (foundCDdrv) return cddrv; li = GetCDRomDriveLetters(); for(i=0; i<li.length; i++) { if (FileExists(li[ i ]+'\\WPI.HTA') || FileExists(li[ i ]+'\\WIN51') || FileExists(li[ i ]+'\\I386\\DRIVER.CAB')) { cddrv = li[ i ]; debug("Found CDROM as drive " + cddrv,1,2); } }