想写一段代码真的不容易,先不说写不来吧,还不会写.于是网络上一顿狂搜,都不太完美,于是有了现在的文章和现在的代码.所以现丑了.请大家指正 ‘以下代码需编译成EXE运行才OK,不知为何,大神可以提一下意见 set oDOM = WScript.GetObject(“http://city.ip138. … 继续阅读“VBS获取外网IP并复制到剪切板”
分类： 脚本
脚本，都懂的！
修改计算机器名
[code] @echo off echo 修改计算机器名ing… set Hostname= set /p Hostname=请输入计算机名（如：001） set NV Hostname=SHDN%Hostname% echo Windows Registry Editor Versi … 继续阅读“修改计算机器名”
最近广告清除方法
根据自己的情况修改下面代码：
VBS延时静默运行程序
Dim Wsh Set Wsh = WScript.CreateObject(“WScript.Shell”) WScript.Sleep(15000) Wsh.Run “ins.bat”,,False Set Wsh=NoThing WScript.quit
VBS创建桌面快捷方式
近段时间学习VBS,配合教程作了一个小脚本.留作记号 Set oFSO = CreateObject(“Scripting.FileSystemObject”) Set oShell = CreateObject(“Wscript.Shell”) If rtnVal = vbYES Then sDe … 继续阅读“VBS创建桌面快捷方式”
优化穿越火线ping值为1
[code] # 优化CF的PING值 /ip firewall address-list add address=121.11.152.87 comment="cf icmp" disabled=no list=games add address=58.51.144.15 co … 继续阅读“优化穿越火线ping值为1”
去掉I8客户端广告
将以下代码另存为bat文件运行即可。（本人尚为测试） @echo off IF NOT EXIST C:\i8client MD C:\i8client taskkill /f /im i8gylive.exe del /f /q C:\i8client\i8gylive.exe md C:\i8c … 继续阅读“去掉I8客户端广告”
Leejoa说：AU3简单判断本地连接
使用脚本后判断断网后做某事比如关机，重启，锁定，注销等等。完全自己发挥。 代码如下： $net = DllCall(“sensapi.dll”, “int”, “IsNetworkAlive”, “str”, “0x1”) ;将返回一个数组，$net [0]=0 表示本地连接中断，$net [0]= … 继续阅读“Leejoa说：AU3简单判断本地连接”
调用顺网输入法
顺网的输入法做得很好，将以下代码另存为*.bat文件，只要把这个bat文件放在网维输入法资源文件夹里面，就能点击bat调用安装输入法了 为求方便的朋友可以发送快捷方式到桌面让客人们直接调用 start clientime.exe -show 0 -delotherime -logout
VBScript创建快捷方式
Option Explicit Dim wshShell, Shortcut Dim strDir, strName strName = “命令提示符” Set wshShell = WSH.CreateObject(“WScript.Shell”) strDir = wshShell.Specia … 继续阅读“VBScript创建快捷方式”
再谈ARP
今天接到一个客户打来的电话说ARP又作怪了，其实这类的话题也说得太多了，对于现在还有ARP疯狂作乱的环境里面我们其它可以尝试用一个循环绑定脚本，用其第6秒绑定一次。其实也就是常驻内存占用一点内存。所以我个人以为，实时绑定比较适合用在arp“受灾”比较严重的环境里，可以立刻缓解频繁掉线的痛苦。