OK論壇

 找回密碼
 註冊
查看: 974|回復: 0

厭惡 IE 到連用來下載 Chrome 都不願意?用指令來下載吧!

[複製鏈接]
  • TA的每日心情
    慵懶
    2013-6-30 03:23 AM
  • 簽到天數: 2 天

    連續簽到: 1 天

    [LV.1]初來乍到

    發表於 2013-6-30 03:34:56 | 顯示全部樓層 |閱讀模式
    厭惡 IE 到連用來下載 Chrome 都不願意?用指令來下載吧!


    老實說這根本廢文... 根本不可能把那個腳本背起來,如果要儲存那個腳本還不如直接存安裝檔不是比較快嗎,反正現在的瀏覽器幾乎都會自動更新...

    當電腦重灌好的時候,現在多數人第一個要安裝的就是瀏覽器,但是要安裝就必須下載安裝檔,但是如果你極度厭惡 Internet Explorer 討厭到連開啟他來下載其他瀏覽器都不願意,覺得拿它下載都不配的時候要怎麼辦?



    Firefox:


    • 由於 Firefox 是使用 FTP,所以我們直接使用 CMD 來下載就可以了
    • 「Win鍵 + R」呼出「執行」並輸入 CMD 叫出命令提示字元
    • 輸入「ftp」,按下 Enter 初始化 FTP連線
    • 輸入「open ftp.mozilla.org」,按下 Enter 建立與 Mozilla 的 Ftp連線
    • 輸入「anonymous」,按下 Enter 進行登入,密碼也是「anonymous」
    • 輸入「cd pub/firefox/releases/latest/win32/zh-TW/」,按下 Enter 進入下載目錄
    • 輸入「lcd C:\」設定本地下載資料夾,這邊是設定下載到 C:\
    • 輸入「ls」檢視檔案列表
    • 輸入「get  "Firefox Setup 21.0.exe"」(請注意雙引號,版本號請自行變動)
    • 此時你到下載資料夾應該會看到一個.tmp檔,等他下載好就可以了!
    十個步驟... 背得起來才有鬼,還有網址,還是請讀者把它存起來吧XD
    為了方便讀者儲存,特地寫成了批次檔.. 預設下載到你儲存批次檔的同個資料夾
    @echo offecho open ftp.mozilla.org > ftp.datecho anonymous>>ftp.datecho anonymous>>ftp.datecho binary >>ftp.datecho prompt off >>ftp.datecho cd pub/firefox/releases/latest/win32/zh-TW/ >>ftp.datecho lcd %~dp0% >>ftp.datecho mget *.exe >>ftp.datecho bye >>ftp.datftp -s:ftp.datdel ftp.dat /f /qexit至於怎麼下載谷哥瀏覽器呢...

    Chrome:
    ' This is the URL of the chrome EXE.strFileURL="https://dl.google.com/tag/s/appguid%3D%7B8A69D345-D564-463C-AFF1-A69D9E530F96%7D%26iid%3D%7BA024641A-81C0-533A-53CB-AE9534821219%7D%26lang%3Den%26browser%3D4%26usagestats3D0%26appname%3DGoogle%2520Chrome%26needsadmin%3Dfalse%26installdataindex%3Ddefaultbrowser/update2/installers/ChromeStandaloneSetup.exe"' This is where the file will download to.strHDLocation = "c:\ChromeStandaloneSetup.exe"' Fetch the fileSet objXMLHTTP = CreateObject("MSXML2.XMLHTTP")objXMLHTTP.open "GET", strFileURL, falseobjXMLHTTP.send()If objXMLHTTP.Status = 200 ThenSet objADOStream = CreateObject("ADODB.Stream")objADOStream.OpenobjADOStream.Type = 1 'adTypeBinaryobjADOStream.Write objXMLHTTP.ResponseBodyobjADOStream.Position = 0 'Set the stream position to the startSet objFSO = Createobject("Scripting.FileSystemObject")If objFSO.Fileexists(strHDLocation) Then objFSO.DeleteFilestrHDLocationSet objFSO = NothingobjADOStream.SaveToFile strHDLocationobjADOStream.CloseSet objADOStream = NothingEnd ifSet objXMLHTTP = Nothing請將上面的文字以TXT存成「chrome.vbs」,存檔好後點擊下載即可,下載路徑也是預設在 C:\



    回復

    使用道具 舉報

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

    本版積分規則

    Archiver|手機版|小黑屋|OK討論區

    GMT+8, 2024-4-18 03:19 PM , Processed in 0.047771 second(s), 20 queries , Gzip On.

    Powered by Discuz! X3.4

    Copyright © 2001-2020, Tencent Cloud.

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