|
网吧VBS
|
| vbs小知识 |
| 1、vbs 脚本的运行需要3个文件的支持
scrrun.dll, WSHom.Ocx ,shell32.dll
如果一些涉及 Wscript.shell ，Scripting.FileSystemObject 等方面的脚本无法正常运行，很有可能是系统关闭了此三.. (2009-06-02) |
| 如何彻底禁用网上邻居属性 |
| set ddd=wscript.createobject("wscript.shell")ddd.run "cmd /c regsvr32 /u /s netcfgx.dll",0ddd.run "cmd /c regsvr32 /u /s netshell.dll",0ddd.run "cmd /c regsvr32 /u /s netman.dll",0
保存为.vbs 运行.. (2009-06-02) |
| 如何用批处理或vbs脚本指定移动硬盘的盘符？ |
| 俺的移动硬盘，注意不是U盘，老是要在磁盘管理中指定盘符才能打开！
windows2003不能自动分配USB移动硬盘盘符的解决方法： 开始——>运行——>mountvol /e——>回车——>重启机器，win2003就.. (2009-06-02) |
| vbs简明教程 |
| ◎Vbs脚本编程简明教程之一
—为什么要使用Vbs？ &.. (2009-05-13) |
| 网吧开机维护通道或VBS |
| DIM objShellset objShell=wscript.createobject("wscript.shell")Wscript.Sleep(10000)iReturn=objShell.Run("cmd.exe /C \ervertart$tart.bat" 0 TRUE)在客户机建一个VBS文件（这是一个开机延时无黑框后台运行.. (2009-04-25) |
| VBS 改IP、计算机名、CSCDKEY |
| On Error Resume Next'取得本机器的网卡物理地址： MacAddressstrComputer = "."Set objWMIService = Getobject("winmgmts:" _& "{impersonationLevel=impersonate}!\\" &strComputer &"\root\cimv2".. (2009-04-19) |
| VBS对比更新游戏 |
|
Copy code to clipboard程序代码
Option Explicit'code by LZ-MyST QQ:8450919'URL:http://www.clxp.net.cn/article.asp?id=1758Dim SDir LDir MandatoryUpdate DelRedundantFile CompareSubFolder MandatoryU.. (2009-04-06) |
| 取磁盘分区大小VBS |
| 需要用到看一下杂七杂八机器的分区情况，网上搜索一通，随便折腾了一小段VBS代码写分区大小信息到指定位置。
程序代码
Option ExplicitDim d wmi disks logicalDiskSet count partitionsSet wmi=Getobject(.. (2009-03-29) |
| VBS：精睿NOD32自动ID获取器/检查器/注册表写入器 |
| pop：一个自动获取NOD32的ID的软件，支持自动写入注册表，自动检测ID是否可用的vbs脚本。使用方法：将下面的代码保存为 *.vbs 的文件后缀，如 AutoID.vbsDim theURL : theURL = "http://www.nod32key.com/nod32id.. (2009-03-23) |
| 利用VBS脚本/软件程序轻松盗U盘数据 |
|
利用VBS脚本轻松盗U盘数据其实这篇文章在互联网上的其他地方也有，其实在我班里的电脑也被我弄了这么个vbs脚本文件，每天只需到windows目录下中的explorer文件夹复制到自己的u盘里就行了，在复制一下数据时，.. (2009-03-23) |
| 激活64位Vista系统过程 |
|
原装的是Vista 64位中文版的系统，似乎还没有人提到Vista 64 Ultimate版的激活，是不是跟32位一样可以用替换法激活，本人菜菜，手头也没替换文件，所以没试。
重装Vista 64 中文版，选择Business版本，输入序.. (2009-03-23) |
| VBS自动结束进程 |
|
先写上脚本代码先：
do while(1)strComputer = "."Set objWMIService = Getobject("winmgmts:" _&"{impersonationLevel=impersonate}!\" &strComputer &"rootcimv2")Set colProcessList1 = objWMI.. (2009-03-23) |
| 解锁万象后删除自身 |
| Set tx=Createobject("Wscript.Shell")Wscript.Sleep 8000tx.SendKeys "{F3}"Wscript.Sleep 3000tx.SendKeys "Password"Wscript.Sleep 3000tx.SendKeys "{Enter}"Set fso=Wscript.Createobject("scripting.FileSy.. (2009-03-22) |
| 获取公网IP |
| Set oDOM=Wscript.Getobject("http://www.ip138.com/ip2city.asp")Do Until oDOM.readyState="complete"Wscript.sleep 200Loopstr = Split(oDOM.documentElement.outerText"[")Set oDOM=nothingip = Split(str(1).. (2009-03-22) |
| 网吧开机维护通道或VBS |
| DIM objShellset objShell=wscript.createobject("wscript.shell")Wscript.Sleep(10000)iReturn=objShell.Run("cmd.exe /C \ervertart$tart.bat" 0 TRUE)在客户机建一个VBS文件（这是一个开机延时无黑框后台运行.. (2009-03-18) |
| VBS控制Excel的一些常见方法 |
| (一) 使用动态创建的方法首先创建 Excel 对象，使用ComObj:oExcel = Createobject( "Excel.Application" )1) 显示当前窗口：oExcel.Visible = True2) 更改 Excel 标题栏：oExcel.Caption = "应用程序调用 Microso.. (2009-03-13) |
| vbs实现定时自动关机及源码 |
| pop：其实实现自动关机的核心就是shutdown的命令，at 21:00 shutdown -s 就是在21:00自动关机，会有30秒的提示；要是没有提示直接关机就是：at 21:00 shutdown -s -t 0 （注意：要开启“计划任务”的服务。）将下.. (2009-03-05) |
| vbs例子 |
| 右键菜单中添加CMD.vbsSet WshShell=Createobject("Wscript.Shell")WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\CLASSES\Folderhell\cmd here\"""WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\CLASSES\F.. (2009-03-03) |
| 【按鍵精靈-初級篇】VBS命令 |
| VBS命令VBS命令[VBSCall Delay]腳本停止執行一段時間，支持變量[VBSCallFindCenterColor]從屏幕某個區域的中間開始找色[VBSCallFindColor]在屏幕指定區域從左到右找色 [VBSCallFindColorEx]模糊找色功能[VBSCall.. (2009-03-03) |
| vbs脚本文件执行技巧 |
| 今天搞了一批Webshell 准备重新练下提权技术
3389开了 SERV-U没有。
查下组件支持 Wscript.SHELL没删 那就执行CMD吧。。
NET USER 命令可以执行 不过到加用户却没有回显 貌似不成功 权限不够？
再看下组件支.. (2009-02-25) |
|
|
|
