vbs脚本教程二(b)

vbs脚本教程二(b)

ID:6033931

大小:44.00 KB

页数:33页

时间:2017-12-31

vbs脚本教程二(b)_第1页
vbs脚本教程二(b)_第2页
vbs脚本教程二(b)_第3页
vbs脚本教程二(b)_第4页
vbs脚本教程二(b)_第5页
资源描述:

《vbs脚本教程二(b)》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、VBS脚本教程二(B)例五:关机菜单立刻显身打开记事本,输入以下命令,并将其保存为1.vbs:setWshShell=CreateObject("WScript.Shell")WshShell.SendKeys"^{ESC}u"双击运行它,你会发现关机菜单立刻出现了。将“WshShell.SendKeys"^{ESC}u"”改为“WshShell.SendKeys"^+{ESC}"”,运行一下看看是否打开了任务管理器妙用SendKeys自动上网并登陆网志将下面的脚本复制到一个文本文件中,并将其文件名命名为:自动登陆.vbs,然后将

2、拨号软件及本脚本一起复制到程序——启动项中,就可以实现自动拨号上网,并登陆到网志上。代码如下:Setwshshell=CreateObject("wscript.shell")wshshell.AppActivate"连接MAE-301U拨号连接"wscript.Sleep20000wshshell.SendKeys"{enter}"wshshell.Run"iexplore"WScript.Sleep2000wshshell.AppActivate"hao123网址之家---实用网址,搜索大全,尽在www.hao123.com-

3、MicrosoftInternetExplorer"'引号中的内容修改为你的浏览器打开后标题栏中的内容wshshell.SendKeys"%d"wshshell.SendKeys"http://passport.baidu.com/?login"wshshell.SendKeys"{enter}"WScript.Sleep2000wshshell.SendKeys"此处修改为网志帐号"wshshell.SendKeys"{tab}"wshshell.SendKeys"此处修改为网志密码"wshshell.SendKeys"{ent

4、er}"'wshshell.SendKeys"%d"◎Vbs脚本编程简明教程之十—Vbs脚本编程常用的编辑器1、VBSEDit汉化版2、primalscript汉化版,可以对30多种脚本进行编辑◎Vbs脚本编程简明教程之十一—FSO中文件的基本操作一、文件属性:在windows中,文件的属性一般用数字来表示:0代表normal,即普通文件未设置任何属性。1代表只读文件。2代表隐藏文件。4代表系统文件。16代表文件夹或目录。32代表存档文件。1024代表链接或快捷方式。例如:setfs=wscript.createobject(“s

5、cripting.filesystemobject”)setf=fs.getfile(“d:index.txt”)msgboxf.Attributes‘attributes函数的作用是显示文件属性需要说明的是:msgbox显示的结果往往不是上面说明的数字,而是有关属性代表数字的和。[作者:临汾市外事旅游局薛靖澜,转载请注明出处]二、创建文件:object.createtextfile方法,注意创建前一般需要检查文件是否存在。例如:setfso=wscript.createobject(“scripting.filesystemo

6、bject”)iffso.fileexists(“c:kk.txt”)thenmsgbox“文件已存在”elsesetf=fso.createtextfile(“c:kk.txt”)endif如需要强制覆盖已存在的文件,则在文件名后加true参数。三、复制、移动、删除文件:使用copyfile方法、movefile方法、deletefile方法。例如:setfso=wscript.createobject(“scripting.filesystemobject”)fso.copyfile“c:kk.txt”,”d:1kk

7、.txt”,true//如上文说述,true代表强制覆盖fso.movefile“c:kk.txt”,“d:”//移动文件fso.deletefile“c:kk.txt”//删除文件四、文件的读写:1、打开文件:使用opentextfile方法如:setts=fso.opentextfile(“c:kk.txt”,1,true)说明:第二个参数为访问模式1为只读、2写入、8为追加第三个参数指定如文件不存在则创建。2、读取文件:read(x)读x个字符;readline读一行;readall全部读取如:setffile=fs

8、o.opentextfile(“c:kk.txt”,1,true)value=ffile.read(20)line=ffile.readlinecontents=ffile.readall3、常见的指针变量:atendofstream属性:当处于

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。