Blogging on ZF

问题：要求用脚本完成一个ping通文件所有逐行IP地址，并将结果输出到新的文件中。版本一：（exec——不显示在cmd页面上，后台操作） Set WshShell = WScript.CreateObject("WScript.Shell") Set pingShell = WshShell.exec ("cmd /c ping 192.168.1.105") i

一开始的想着的是根据asc码进行加密解密操作。不难，所以直接贴代码：加密：Filename = CreateObject("WScript.Shell").Exec("mshta vbscript:""f.click();new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(f.value

之前写过一个由文件抓取账号密码和ip，实现secureCRT到远程登录。但是因为是从文件读取，考虑到安全因素上的问题，所以我们选择和之前一天写的加密脚本融合的方式达到文件一次读取后，销毁文件，达到加密。当然加密效果姑且不论，演示效果还是可以一看的。话不多说，直接上代码。加密部分：'本工具用于加密vbs的脚本'采用ASCII,hex+xor,Encoder 三重加密。'第三重En

说是要做，也不知道是什么，照着需求分析写了一版，先扔上来吧，最近忙成傻子了。'需求分析: '登陆9.181.2.111 用户名：caof 密码：Gs1l2hab 'cd 到 /var/GSNIlogs/ir-syslog01/logs '然后more var:log:messages.2015-8-28-4:0 | egrep "710003|710005|710006|1060[0-

话不多说，直接po代码。程序代码C:\Schedule.batat 17:10 time /every:date(M,T,W,Th,F,S,Su) cmd /c C:\pingScheme.vbspauseC:\pingScheme.vbs'引用函数 Const conErr = -2 Function Ping(ByVal Server) ''''''''''''''''''

Problem：在cmd下执行at 批量命令时显示拒绝访问。Solution：所以，事实证明： 1. 必须在所有程序->附件下，以管理员身份打开命令提示符； 2. 或者进入C:\Windows\System32\目录下，以管理员身份运行cmd.exe。当然两种方法的逻辑相同。