微剋多資訊

 找回密碼
 註冊

Sign in with google

Google帳號登入

搜索

該用戶從未簽到

升級   0%

跳轉到指定樓層
主題
發表於 2012-10-14 00:40 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
本帖最後由 rictirse 於 2014-5-22 22:01 編輯

噹噹撰寫的搜尋安裝M$的更新擋,只要是副檔名msu的檔案

只要放在資料夾內,執行Fixit_AutoInstall.exe 會自動搜尋並安裝

噹噹預設是不會自動重開機,所以全部更新完成後請自行重開機即可

如果加上rar自解功能,把msu跟 Fixit_AutoInstall全部包在同一個rar內

使用自解到tmp後啟動 Fixit_AutoInstall就可以達到自己封裝 m$更新檔的集合

1.對「Fixit_AutoInstall集合包.exe」右鍵 以WinRAR開啟

2.將要加入的更新檔副檔名為msu拖曳到RAR內

3.選擇「壓縮最佳」

4.就可以享受自己封裝的 安靜自動更新檔了


適用WinXP VISTA W7 W8 各版本的msu檔案
  1. #NoTrayIcon
  2. #RequireAdmin
  3. #include <Array.au3>
  4. Global $FullFile[1]
  5. Global $cnt = 0
  6. Global $FileCnt, $DirCnt,$BlackListCnt,$FullFilePath

  7. $rut = FileSelectFolder ( "請選擇一個目錄", "", 4, @ScriptDir)


  8. _ScanFolder($rut)

  9. ;~ _ArrayDisplay($FullFile)

  10. For $i = 1 To UBound($FullFile)-1
  11.         $strtmp = StringSplit ( $FullFile[$i], "")
  12.         ToolTip (StringFormat ( "總共%d個 已安裝%d個"&@CRLF&"目前正在安裝:"&@CRLF&"%s", UBound($FullFile)-1,$i, $strtmp[$strtmp[0]]), 10, 10)
  13.         RunWait ( @ComSpec & " /c wusa.exe "&$FullFile[$i]&" /quiet /norestart", "", @SW_HIDE)
  14. Next
  15. MsgBox (0,"","安裝完成")

  16. Func _ScanFolder ($SourceFolder)
  17.         Local $Search
  18.         Local $File
  19.         Local $FileAttributes
  20.         Local $FullFilePath

  21.         $Search = FileFindFirstFile ( $SourceFolder & "*.*")

  22.         While 1
  23.                 If $Search = -1 Then
  24.                         ExitLoop
  25.                 EndIf

  26.                 $File = FileFindNextFile ($Search)
  27.                 If @error Then ExitLoop

  28.                 $FullFilePath = $SourceFolder & "" & $File
  29.                 $FileAttributes = FileGetAttrib ($FullFilePath)


  30.                 If StringInStr ( $FileAttributes, "D") Then
  31.                         $DirCnt += 1
  32.                         _ScanFolder ($FullFilePath)
  33.                 Else
  34.                         _AddArrayFile($FullFilePath)
  35.                 EndIf

  36.         WEnd
  37.         FileClose($Search)
  38. EndFunc

  39. Func _AddArrayFile($FileName)
  40.         $strtmp = StringSplit ( $FileName, "")
  41.         $strtmp = StringSplit ( $strtmp[$strtmp[0]], ".")
  42.         If $strtmp[$strtmp[0]] = "msu" Then
  43.                 _ArrayAdd ( $FullFile, $FileName)
  44.         EndIf
  45.         $FileCnt += 1
  46. EndFunc
複製代碼

集合包請下載這個

單純背景安裝請下載這個



本帖子中包含更多資源

您需要 登入 才可以下載或查看,沒有帳號?註冊

x
樓主熱門主題

簽到天數: 103

該用戶今日未簽到

升級   100%

2F
發表於 2013-6-21 12:04 | 只看該作者
有載點嗎
還是移除了?

使用道具

該用戶從未簽到

升級   11.9%

3F
發表於 2013-11-17 03:09 | 只看該作者
是真的沒有
看過安裝檔了

使用道具

您需要登入後才可以回帖 登入 | 註冊

本版積分規則

小黑屋|Archiver|微剋多資訊(MicroDuo)

GMT+8, 2024-4-19 15:45

Discuz! X

© 2009-2023 Microduo

快速回覆 返回頂部 返回列表