[HTA 源码] Google Hosts 安装向导 By Yu2n

yu2n · 发表于 2014-9-24 15:46:25

本帖最后由 yu2n 于 2017-4-15 19:25 编辑

------------------------------------------------------------------------
Update: 17/3/25
------------------------------------------------------------------------
  1. 更新了 Hosts 来源，马上打开 https://www.google.com/ncr 试试吧~
  2. 收录了 pcl_test 版主的批处理版本，如 HTA 版本不是最新的 Hosts 时，请使用批处理版本。

------------------------------------------------------------------------
软件界面预览：
------------------------------------------------------------------------

------------------------------------------------------------------------
HTA技术说明：使用HTA技术，可以使用用 VBS、JS 等脚本语言，简单、整洁的编写 HTA 小程序。
这个界面使用 HTML 语言构建，只有一个HTA文件。
------------------------------------------------------------------------

------------------------------------------------------------------------
源码下载：
Tips: 下载后解压即可使用~
------------------------------------------------------------------------

------------------------------------------------------------------------
欢迎建议、交流、完善。
------------------------------------------------------------------------

------------------------------------------------------------------------
更新历史：
------------------------------------------------------------------------
17/3/25
  1. 更新了 Hosts 来源，马上打开 https://www.google.com/ncr 试试吧
  2. 收录 pcl_test 版主的批处理版本，如 HTA 版本不是最新的 Hosts 时，请使用批处理版本。

16/9/20
  更新了 Hosts 来源

14/09/26
  发布第一个版本。
  备注：使用前请关闭360安全软件（感谢“版主523066680”的反馈）
  说明：如果发现 Google Hosts 失效，敬请告知。本人将尽快更新服务器上的 Google Hosts 源。

------------------------------------------------------------------------

Hosts来源：《2017 Google hosts 持续更新【更新于:2017-03-24】》
https://laod.cn/hosts/2017-google-hosts.html

yu2n · 发表于 2014-9-24 15:47:54

这个界面基本照抄 EasyX_Setup.hta 。
囧~

tmplinshi · 发表于 2014-9-25 14:46:27

好用，多谢

523066680 · 发表于 2014-9-25 17:05:48

很好用，添加备注吧：使用前请关闭360安全软件

CrLf · 发表于 2015-3-5 15:40:07

能长成这样，hta的人生都无憾了

pcl_test · 发表于 2016-9-20 22:28:19

如果已安装，打开hta可以直接跳到选择更新或卸载

yu2n · 发表于 2016-9-21 23:28:24

回复 6# pcl_test

Ok!

老刘1号 · 发表于 2017-3-25 12:42:23

额，服务器挂了

yu2n · 发表于 2017-3-25 20:44:24

本帖最后由 yu2n 于 2017-3-25 20:55 编辑

回复 8# 老刘1号

已更新 Hosts 来源，需要重新下载程序~

pcl_test · 发表于 2017-3-25 22:47:10

本帖最后由 pcl_test 于 2017-4-15 20:05 编辑

批处理简易版

@echo off
set "rar=C:\Program Files\WinRAR\winrar.exe"
set "url=https://laod.cn/hosts/2017-google-hosts.html"
for /f "delims=" %%a in ('mshta http://bathome.net/s/hta/index.html "var m=web('%url%').match(/(https:\/\/iiio.io\/download\/\d+\/?).+?密码\s*?[:：]\s*?([^<\s]+)/);download(m[1]+'windows用批处理.zip');m[2]"') do set "pw=%%a"
if defined pw (
"%rar%" e -y -p"%pw%" "windows用批处理.zip"
>nul ping /n 3 0
"Windows自动替换脚本.bat"
)
pause

复制代码

yu2n · 发表于 2017-3-25 23:39:42

回复 10# pcl_test

直接 unzip 啦~

@echo off
set "url=https://iiio.io/download"
md %temp%\host 2>nul & cd /d %temp%\host && rem 创建临时目录
mshta http://bathome.net/s/hta/index.html?echo=false "Tools.get('unzip')" && rem 下载 unzip.exe
for /f %%a in ('mshta http://bathome.net/s/hta/index.html "download('%url%/'+web('%url%/').match(/(\d+)(?=\/\s*?<\/a>)/g).pop()+'/windows用批处理.zip')"') do set result=%%a
if /i "%result%" equ "true" (
>nul unzip -o -P laod.org "windows用批处理.zip"
>nul ping /n 3 0
"windows用批处理\Windows自动替换脚本.bat"
) else echo;%result%
pause

复制代码

bbaa · 发表于 2017-4-15 20:09:04

https://github.com/bbaa-bbaa/Google-Hosts-Auto-Update
开机更新

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[原创代码] [HTA 源码] Google Hosts 安装向导 By Yu2n

本帖子中包含更多资源

评分

评分

评分

浏览过的版块