批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程
[批处理文件精品]批处理版照片整理器[批处理文件精品]纯批处理备份&还原驱动在线第三方下载
返回列表 发帖

[原创] 【HTA源码】默认脚本宿主更改工具

本帖最后由 老刘1号 于 2017-6-13 20:23 编辑
自制小工具~
个人感觉有一丝丝用……
  1. <!--Code BY 老刘-->
  2. <html>
  3. <head>
  4. <title>默认脚本宿主更改工具</title>
  5. <HTA:APPLICATION
  6.   APPLICATIONNAME="更改VBS/JScript默认脚本宿主"
  7.   ID="ChangeHostOfVbscriptAndJscript"
  8.   VERSION="1.0"
  9.   BORDER="thin"
  10.   MAXIMIZEBUTTON="no"
  11.   SCROLL="no"
  12.   SCROLLFLAT="yes"
  13.   SINGLEINSTANCE="yes"/>
  14. </head>
  15. <script language="VBScript">
  16. Set objApp = Createobject("shell.application")
  17. Sub Window_OnLoad
  18. window.resizeTo 270,120
  19. End Sub
  20. Sub OnClickButtonWscript()
  21. objApp.shellexecute "Wscript.EXE","-H:WSCRIPT","","",1
  22. End Sub
  23. Sub OnClickButtonCscript()
  24. objApp.shellexecute "Wscript.EXE","-H:CSCRIPT","","",1
  25. End Sub
  26. </script>
  27. <body bgcolor="green">
  28. <center><input type="button" name="Wscript" id="Wscript" value="将默认宿主更改为Wscript" onclick="OnClickButtonWscript"></center>
  29. <center><input type="button" name="Cscript" id="Cscript" value="将默认宿主更改为Cscript " onclick="OnClickButtonCscript"></center>
  30. <!--{{InsertControlsHere}}-Do not remove this line-->
  31. </body>
  32. </html>
复制代码
附件: 您需要登录才可以下载或查看附件。没有帐号?注册
1

评分人数

返回列表