首页
资讯
精华
论坛
问答
博客
专栏
群组
更多 ▼
招聘
搜索
您还未登录 !
登录
注册
zpvw35zpvw
博客
微博
相册
收藏
留言
关于我
文章列表
用Wscript的Arguments属性实现vbs的命令行参数形式启动
博客分类： 技术杂绘
用Wscript的Arguments属性实现vbs的命令行参数形式启动 2010年07月13日 　　Wscript对象的Arguments属性返回一个参数的集合，即WshArgument对象，我们可以根据该对象的一些特性实现脚本的命令行参数形式启动。 Set objArgs = WScript. Arguments If objArgs.count =0 Then MsgBox "请输入启动参数！" ElseIf objArgs(0).count =1 Then If objArgs(0)="Start" Then Call startSE() Else ...
2012-01-20 09:56
浏览 43
评论(0)
分类:非技术
VBS--自动定时截图工具
博客分类： 技术杂绘
VBS--自动定时截图工具 2010年09月01日 　　一、测试设计1 　　使用vbs编写一个脚本，让其在指定时间，截一个图，即可实现需求。 　　Vbs脚本如下： 　　Dim MyTime 　　MyTime = Timer '返回午夜12时以后已经过去的秒数  　　Do While MyTime51600 and MyTimeVbs的文件，测试开始前点击该文件。第二天过来，在画图中粘贴，即可得到指定时间的截图。 一、测试设计2 　　进一步想，能否实现全程不用监控？如用一个晚上，刚好可以跑完四个**点，每到一个**点的不同时刻截屏，整个测试数据更丰富。 　　编写如下vbs脚本，结合 ...
2012-01-20 09:56
浏览 75
评论(0)
分类:非技术
使用 Iisftp.vbs 创建 FTP 站点
博客分类： 技术杂绘
使用 Iisftp.vbs 创建 FTP 站点 2010年10月15日 　　可以使用命令行脚本 iisftp.vbs（存储在 systemroot\System32 中）在运行带有 IIS 6.0 的 Windows Server 2003 家族成员的本地或远程计算机上创建文件传输协议 (FTP) 站点配置。该命令并不创建或破 ...
2012-01-20 09:56
浏览 67
评论(0)
分类:非技术
CuteFTP上传脚本(VBS)
博客分类： 技术杂绘
CuteFTP上传脚本(VBS) 2010年08月13日 　　Option Explicit    ' 强制显式声明变量。 　　'************************************************* ******************* 　　'* -=-=-=-=-=-=-=-=-=-=-=-=-=-=- 　　'* CuteFTP Pro Script  　　'* -=-=-=-=-=-=-=-=-=-=-=-=-=-=- 　　'* 　　'* 作者：张博 　　'* 　　'CuteFTP脚本(VBScript)，上传到多个服务器 　　'必须首先安 ...
2012-01-20 09:56
浏览 76
评论(0)
分类:非技术
VBS脚本常用经典代码收集
博客分类： 技术杂绘
VBS脚本常用经典代码收集 2010年06月21日 　　1. 计算 　　2. 处理文件和文件夹 　　3. 管理Windows 　　4. 处理Word, Excel, PowerPoint等Office文档 　　5. 嵌入网页，驱动dHTML 　　6. 编写HTTP通信 　　7. 调用系统功能（COM组件），比如说语音说话 　　8. 分析HTML, XML 　　9. 调用命令行并分析返回结果 　　10. 处理图片 　　11. 自动化按键 　　12. 调用Windows Media Player并管理 　　13. 调用Windows Live Messenger并管理 　 ...
2012-01-20 09:56
浏览 42
评论(0)
分类:非技术
vb读取txt文件到textbox (一)
博客分类： 技术杂绘
vb读取txt文件到textbox (一) 2011年05月10日 　　1.怎么通过代码创建一个文本文件，并读取，更新内容 　　以上为随即方式打开的文本文件 　　dim gfilenum as integer 　　gfilenum = FreeFile 　　Open   "文件路径及文件名" For Random As gfilenum len=3 　　\'以随即方式打开一文件如果文件不存在就新建 　　用get #gfilenum ,记录在文件中位置,要放取得的数据的变量\'读取操作 　　用put #gfilenum ,记录在文件中位置,要放着要写入数据的变量\'写操作 　 ...
2012-01-19 15:00
浏览 107
评论(0)
分类:非技术
2011-12-30
博客分类： 技术杂绘
2011-12-30 2011年12月30日 　　用vbs来操作Excel 　　最近,班主任要 做学生的 学分认定表格,一个学生一份,每个学生又学了 N(n>=15) 课,每门课还要打n个分.... 　　嫌手工输入太麻烦,做此小程序,用vbs来操作excel对象，实现自动化输入... 　　仓促所作，望批评指正... 　　'code by youxi01@bbs.bathome.net 　　'2008-1-17于***第一中学 　　'/*///////////////初始设定/////////////////////// 　　Dim MyStr,fso,f,j_num 　　str0=&q ...
2012-01-19 15:00
浏览 34
评论(0)
分类:非技术
VBScript+Asp(15)
博客分类： 技术杂绘
VBScript+Asp(15) 2011年07月18日 　　Const ForReading=1,ForWriting=2      　　dim fso,f 　　Set fso=CreateObject("Scripting.FileSystemObject") 　　Set f=fso.OpenTextFile("c:\testfile.txt",ForWriting,True) 　　f.WriteBlankLines 2 　　f.WriteLine "我的前面有两个换行符。" 　　Set f=fso.OpenTextFile(& ...
2012-01-19 15:00
浏览 54