- 1、本文档共32页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
很好的VBS教程二
很好的VBS教程 二2008-06-25 02:53
例五:关机菜单立刻显身打开记事本,输入以下命令,并将其保存为1.vbs:set WshShell = CreateObject(WScript.Shell)WshShell.SendKeys ^{ESC}u双击运行它,你会发现关机菜单立刻出现了。将“WshShell.SendKeys ^{ESC}u”改为“WshShell.SendKeys ^+{ESC}”,运行一下看看是否打开了任务管理器妙用SendKeys自动上网并登陆网志将下面的脚本复制到一个文本文件中,并将其文件名命名为:自动登陆.vbs,然后将拨号软件及本脚本一起复制到程序——启动项中,就可以实现自动拨号上网,并登陆到网志上。代码如下:Set wshshell=CreateObject(wscript.shell)wshshell.AppActivate 连接 MAE-301U 拨号连接wscript.Sleep 20000wshshell.SendKeys {enter}wshshell.Run iexploreWScript.Sleep 2000wshshell.AppActivate hao123网址之家---实用网址,搜索大全,尽在 - Microsoft Internet Explorer 引号中的内容修改为你的浏览器打开后标题栏中的内容wshshell.SendKeys %dwshshell.SendKeys /?loginwshshell.SendKeys {enter}WScript.Sleep 2000wshshell.SendKeys 此处修改为网志帐号wshshell.SendKeys {tab}wshshell.SendKeys 此处修改为网志密码wshshell.SendKeys {enter}wshshell.SendKeys %d◎Vbs脚本编程简明教程之十 —Vbs脚本编程常用的编辑器1、VBSEDit汉化版2、primalscript汉化版,可以对30多种脚本进行编辑◎Vbs脚本编程简明教程之十一 —FSO中文件的基本操作一、文件属性:在windows中,文件的属性一般用数字来表示:0代表normal,即普通文件未设置任何属性。 1代表只读文件。2代表隐藏文件。 4代表系统文件。 16代表文件夹或目录。32代表存档文件。 1024代表链接或快捷方式。例如:set fs=wscript.createobject(“scripting.filesystemobject”) set f=fs.getfile(“d:\index.txt”) msgbox f.Attributes‘attributes函数的作用是显示文件属性需要说明的是:msgbox显示的结果往往不是上面说明的数字,而是有关属性代表数字的和。[作者:临汾市外事旅游局薛靖澜,转载请注明出处]二、创建文件:object.createtextfile方法,注意创建前一般需要检查文件是否存在。例如:set fso=wscript.createobject(“scripting.filesystemobject”) if fso.fileexists(“c:\kk.txt”) thenmsgbox “文件已存在”elseset f=fso.createtextfile(“c:\kk.txt”) end if如需要强制覆盖已存在的文件,则在文件名后加true参数。三、复制、移动、删除文件:使用copyfile方法、movefile方法、deletefile方法。例如:set fso=wscript.createobject(“scripting.filesystemobject”) fso.copyfile “c:\kk.txt”,”d:\1\kk.txt”,true //如上文说述,true代表强制覆盖fso.movefile “c:\kk.txt”, “d:\”//移动文件fso.deletefile “c:\kk.txt”//删除文件四、文件的读写:1、打开文件:使用opentextfile方法如:set ts=fso.opentextfile(“c:\kk.txt”,1,true) 说明:第二个参数为访问模式1为只读、2写入、8为追加第三个参数指定如文件不存在则创建。2、读取文件:read(x)读x个字符;readline读一行;readall全部读取如:set ffile=fso.opentextfile(“c:\kk.txt”,
文档评论(0)