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

[已解决]VBS用jscript.dll突破网页限制和恢复

有些网页加了java代码使别人不能复制相关文本,通过regsvr32 /u /s jscript.dll后即可复制,重新regsvr32 /s jscript.dll并关闭IE再打开后可以实再使用javasc。期间只用做个文件或者注册表标记就可以了。我用批处理写了个,如果改成vbs应该怎么使用呢?
bat代码:
@echo off
if not exist c:\windows\system32\javascrun.log (
regsvr32 /u /s jscript.dll
echo uninstall >c:\windows\system32\javascrun.log
) else regsvr32 /s jscript.dll&&del c:\windows\system32\javascrun.log&rem taskkill /f /im ie.....

exit

[ 本帖最后由 9zhmke 于 2009-3-30 21:33 编辑 ]
1

评分人数

    • Batcher: 感谢主动给标题标注[已解决]字样PB + 2

看来这个功能还是用bat来做好些了,调用regsvr32还是要用cmd。毕竟是命令行的东西。谢谢巡查指教,辛苦了。

TOP

  1. Set WshShell = WScript.CreateObject("WScript.Shell")
  2. Set objFSO = CreateObject("Scripting.FileSystemObject")
  3. Set objDstFile = objFSO.OpenTextFile("c:\windows\system32\javascrun.log",2,True)
  4. If objFSO.FileExists("c:\windows\system32\javascrun.log") Then
  5.     WshShell.Run "cmd.exe /c regsvr32 /s jscript.dll"
  6.     WshShell.Run "cmd.exe /c del c:\windows\system32\javascrun.log"
  7.     'taskkill /f /im ie.....
  8. Else
  9.     WshShell.Run "cmd.exe /c regsvr32 /u /s jscript.dll"
  10.     objDstFile.Write "uninstall"
  11. End If
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表