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

【已解决】50元有偿求助自动脚本安装谷歌浏览器并配置

本帖最后由 阿布leo 于 2019-5-15 13:08 编辑

如题。
需求如下;
1,装个谷歌浏览器
2,给装好的浏览器快捷方式加个参数
3,把谷歌浏览器放到启动目录下,每次开机自动启动。
4,禁止虚拟键盘Tablet PC。
5,脚本在win7和win10上都能运行
一个爱学习的人

本帖最后由 zaqmlp 于 2019-5-15 22:22 编辑

以管理员身份运行
  1. @echo off
  2. rem 指定谷歌浏览器的安装程序
  3. set "exefile=D:\ChromeInstall.exe"
  4. rem 执行安装
  5. "%exefile%"
  6. rem 修改桌面快捷方式并添加到启动文件夹
  7. (echo;Set ws=CreateObject^("WScript.Shell"^)
  8. echo;Set fso=CreateObject^("Scripting.FileSystemObject"^)
  9. echo;inkfile="":t=ws.SpecialFolders^("DeskTop"^) ^& "\Google Chrome.lnk"
  10. echo;If fso.FileExists^(t^) Then inkfile=t
  11. echo;t=ws.SpecialFolders^("AllUsersDeskTop"^) ^& "\Google Chrome.lnk"
  12. echo;If fso.FileExists^(t^) Then inkfile=t
  13. echo;If inkfile="" Then WSH.Quit
  14. echo;Set a=ws.CreateShortcut^(inkfile^)
  15. echo;Set b=ws.CreateShortcut^(inkfile^)
  16. echo;b.TargetPath=a.TargetPath
  17. echo;b.WorkingDirectory=a.WorkingDirectory
  18. echo;b.Arguments=WSH.Arguments^(0^)
  19. echo;If fso.FileExists^(inkfile^) Then fso.DeleteFile inkfile,True
  20. echo;b.Save
  21. echo;WSH.echo inkfile ^& "|" ^& ws.SpecialFolders^("Startup"^) ^& "\Google Chrome.lnk"
  22. echo;WSH.Quit)>"%tmp%\#t.t"
  23. for /f "tokens=1* delims=|" %%a in ('cscript -nologo -e:vbscript "%tmp%\#t.t" "-参数"') do (
  24.     del /a /f /q "%%b"
  25.     copy "%%a" "%%b"
  26. )
  27. rem 禁用Tablet PC
  28. reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\TabTip.exe" /v debugger /t reg_sz /d debugfile.exe /f
  29. reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun" /v 1 /t REG_SZ /d "TabTip.exe" /f
  30. reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v DisallowRun /t REG_DWORD /d 1 /f
  31. taskkill /f /im explorer.exe
  32. start explorer
  33. pause
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表