2020-02-16 标签:vbs,路由,重启,脚本,实现,代码,如下,set,sh,wscript,shell,run,telnet,192,168,sleep,1000,sendkeys

实现代码如下：Set sh=WScript.CreateObject("WScript.Shell") sh.Run "telnet 192.168.1.1" WScript.Sleep 1000 sh.SendKeys "admin{ENTER}" WScript.Sleep 1000 sh.Se

2020-02-16 标签:vbscript,wscript,shell,对象,run,exec,使用,心得,分享,set,exers,objws,pscp,r,scp,pw,password,loginid,host,data

Set exeRs = objws.Exec("pscp -r -scp -pw " & password & " " & loginid & "@" & host & ":" & data_path & fileName &

2020-02-16 标签:vbscript,读取,xml,格式,配置文件,实现,代码,如下,class,private,rootdoc,not,null

实现代码如下：Class clsGetProfile ' ルートドキュメント Private rootDoc ' xmlファイル名とセクション名をセットする ' 引数：　「1」ファイル名 NOT NULL ' 戻り値：なし Public Sub setProfile(strFileName) Set

2020-02-16 标签:vbscript,include,办法,实现,代码,任何,真正,实用,工程,开发,必然,文件,创建,麻烦,它对,用的,支持,并不是,太好

任何真正实用的工程开发都必然是多文件的。但是VBScript创建多文件工程要麻烦一点，它对多文件工程，代码复用的支持并不是太好。在C/C++工程里，我们已经习惯了通过一个include语句，并且声明一个函数原形的方式来使用其它模块中的函数，这样一个复杂的工程可以比较容易地分解成一些小的模块，以更容易

2020-02-16 标签:vbscript,error,resume,n,ext,容错,使用,心得,错误处理,完成,如果在,代码,里加,这一句,在这,其他,出现,错误,系统

vbscript中，错误处理使用on error resume next来完成，如果在你的代码里加入这一句，在这句之后的其他代码如果出现错误，系统将忽略这些错误继续运行后面的代码，同时，我们可以使用下面的代码来捕获错误实现代码如下：If err.number<>0 then errNum

2020-02-16 标签:vbscript,作用,简单说,有事没事,vbs,采集,别人,网站,上的,部分,全部,数据,进行,分析,写入,数据库,文本文件,有时

有事没事用VBS采集别人网站上的部分或全部数据进行分析，然后写入数据库或存到文本文件里，有时还会用VBScript做一些移动光标及输入的操作，比如批量添加远程桌面，有时还会用VBScript还管理Windows服务器，如设置IIS，还有做一些定时提醒工具，多久执行一次，然后用声音控件提醒，很好用。。

2020-02-16 标签:vbscript,使用,adsi,iis,批量,添加,屏蔽,允许,访问,ip,实现,代码,如下,intro,filename,add,deny,grant,change,metabase

实现代码如下：'/*========================================================================= ' * Intro VBScript使用ADSI为IIS批量添加屏蔽或允许访问的IP ' * FileName VBScript-A

2020-02-16 标签:vps,配置,优化,笔记,过程中,分区,swap,交换,内存,不大,我为,增加了,文件,进入,目录,cd,var

配置过程中的一些笔记： 　　一、VPS只有一个根分区，没有swap交换分区。VPS内存不大，于是，我为其增加了一个swap交换文件。 　　1、进入一个目录 cd /var/ 　　2、获取256M的文件块： dd if=/dev/zero of=swapfile bs=1024 count=26214