代码人生的小狗窝

一行行枯燥的代码,却描绘出人生的点点滴滴

推荐文章

VBscript(2)Working with Folders

    VBscript(二)Working with FoldersWorking with Folders Creating the Basic Folder Just the Steps To create a folder 1. Create a file system object by using CreateObject. 2. Use the CreateFolder command to create the folder. CreateBasicFolder.vbs Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.CreateFolder("c:\fso1")  

    阅读全文>>

作者:coody分类:【_vbScript浏览(1177

2019-09-28

Vbscript 编纂SecureCRT脚本

    Vbscript 编写SecureCRT脚本Creating ActiveX Scripts ActiveX script engines communicate with SecureCRT via standard interfaces. Therefore, SecureCRT can host any compliant script engine to run your scripts. The advantage of this approach is that you can script SecureCRT using the language of your choice. If an ActiveX script engine is available for your preferred scripting language, you can write sc

    阅读全文>>

作者:coody分类:【_vbScript浏览(1836

2019-09-26

利用VBScript在暗藏窗口中运行应用程序

    利用VBScript在隐藏窗口中运行应用程序 起因   使用MoinMoin Desktop Edition已经有一段时间了,每次开机都得运行wikiserver.py,而且总会有一个命令行的黑框,很碍眼。折腾了半晌,终于可以干掉黑框,让wikiserver.py在后台运行了。   其实这种方法同样可以用于其它需要保持运行,但又不想看见窗口的软件。   原理   利用VBScript创建wscript.shell对象,运行一个应用程序,设置窗口为不可见。   createobject("wscript.shell").run "要运行程序的路径",vbhide   方案一:批处理BAT   新建一个文件moin-start.bat,编辑内容如下:   @echo off if not "%1" == "h" mshta vbscript:createobject("wscript.

    阅读全文>>

作者:coody分类:【_vbScript浏览(1021

2019-09-26

Vbscript(三) Adding Intelligence

    Vbscript(3) Adding IntelligenceAdding Intelligence If...Then Just the Steps To implement If...Then 1. On a new line in the script, type If some condition Then. 2. On the next line, enter the command you want to invoke. 3. On the next line, type End If. If...Then...Else Just the Steps To use If...Then...Else 1. On a new line in the script, type If s

    阅读全文>>

作者:coody分类:【_vbScript浏览(1478

2019-09-27

VBscript (1) Working with files

    VBscript (一) Working with filesWorking with files Scripting 允许用FileSystemObject (FSO)对象模式来处理驱动器、文件夹和文件   要用 FileSystemObject (FSO) 对象模式来编程,则: 使用 CreateObject 方法来创建 FileSystemObject 对象。 在新创建的对象上使用适当的方法。 访问对象的属性。 FSO 对象模式包含在 Scripting 类型库中,该库位于 Scrrun.dll 文件中。 ListFiles.vbs Option Explicit On Error Resume Next Dim FolderPath        'path to the folder to be

    阅读全文>>

作者:coody分类:【_vbScript浏览(863

2019-09-26

在VBScript中应用对象

    在VBScript中使用对象 工作需要,用vbs写了个小工具,回归原始了一把。 鉴于本人长期使用java,与对象异常亲热。 今天也试了下在VBScript中使用对象,感觉不错!有兴趣的朋友可以自己试试   [一] VBScript对象声明   Class ClassName ' Fields, Functions, Properties go here. End Class   其中ClassName为类名,创建对象的语句也很简单,即: Set obj = new ClassName       [二] 对象中的成员   常用的即public成员与private成员,private成员只能在类内部可见。 以Person类为例,我们定义了如下4个成员变量。私有变量前加"m_"为VBScript通常的命名规约。         Class Person pub

    阅读全文>>

作者:coody分类:【_vbScript浏览(1721

2019-09-27

计算日期替当年的第几周(vbscript 可以定义为excel函数)

    计算日期为当年的第几周(vbscript 可以定义为excel函数) 和上一篇的javascript是一样的算法***********VbScript************Function mweek(datestr As Date) As String'zhangsen foxconn 2008-05Dim strdatestrdate = datestrDim pweek, numdate, nowyear, nowmonth, firstdate, lastday, weeknum, upstrdatenumdate = Day(strdate)nowyear = Year(strdate)nowmonth = Month(strdate)firstdate = DateValue(nowyear & "-" & nowmonth & "-" &am

    阅读全文>>

作者:coody分类:【_vbScript浏览(1499

2019-09-28

[QTP]vbscript对资料或文件夹进行打包与解包

    [QTP]vbscript对文件或文件夹进行打包与解包vbscript对文件或文件夹进行打包与解包 在自动化测试工作中,有时会用到对文件或文件夹进行打包或解包,经过一番研究,我们可以通过CreateObject非常轻松地实现所需要的功能。 首先,需要在操作系统中注册XZip.dll,以管理员身份:Regsvr32 "XZip.dll文件路径" 在http://www.xstandard.com/en/documentation/xzip/地址可以下载到该DLL,这里也有它的使用范例讲解,目前可以支持以下平台: •For Windows 2000, XP, Vista, Windows 7: IE 5.0+, Firefox 1.0+, Safari 3.0+ or Opera 9.0+ •For OS X 10.3.9+: Fir

    阅读全文>>

作者:coody分类:【_vbScript浏览(906

2019-09-26

[QTP]透过vbscript往文本文件中指定位置插入指定内容

    [QTP]通过vbscript往文本文件中指定位置插入指定内容'作者:席飞剑 '日期:2013-1-25 '功能:往文本文件中指定位置插入指定内容 '参数:txtFile为需要读取的文件,可以根据需要将以下操作封装成一个函数。 '>>>>>>>>>>>>>>>>>尝试往文本文件中指定位置插入指定的文本内容<<<<<<<<<<<<<<<<<<<< 假设:"C:\Users\xifeijian\Desktop\test.txt"存在,并且文件内容为: 111111111 222222222 333333333 444444444 目标:希望在 333333

    阅读全文>>

作者:coody分类:【_vbScript浏览(516

2019-09-27

vbScript惯用运算符与函数

    vbScript常用运算符与函数   基本运算   + 数字加法及字符串连接   - 数字减法   * 数字乘法   / 数字除法   Mod 求余数   \ 求商数   & 字符串连接   ^ 次方   = 相等   <> 不相等   >= 大于或等于   > 大于   <= 小于或等于   < 小于   Not 非   And 且   Or 或   Xor 异或   循环及决策   if ....then 若...则...   if ...then...else 若...则...非   else if... 非若   select case... 群组选择条件   end select   for ... next 计数循环   while...wend 条件循环(一)   do

    阅读全文>>

作者:coody分类:【_vbScript浏览(1351

2019-09-28

VBScript 小札记

    VBScript 小笔记Set updateSession = CreateObject( "Microsoft.Update.Session" ) Set updateSearcher=updateSession.CreateupdateSearcher() WScript.Echo "正在扫描系统漏洞..." & vbCRLF Set searchResult=updateSearcher.Search("IsInstalled=0 and Type='Software' and IsHidden=0") WScript.Echo "系统漏洞列表:" J=0 str_info="" For I=0 To searchResult.Updates.Count-1 Set updat

    阅读全文>>

作者:coody分类:【_vbScript浏览(760

2019-09-27

一个展示Grid的VBScript对象

    一个显示Grid的VBScript对象一个显示Grid的VBScript对象 是根据MS提供的代码修改而成,目前还不支持编辑,可以排序、查询、分页显示 <%@ Language=VBScript %> <% Option Explicit %> <% Class classDataGrid Private m_strSQL Private m_strConn Private m_strRowColor1 Private m_strRowColor2 Private m_strMode Private m_strProcessPage Private m_strTitle Private m_strRSName Private m_strFindFields Public Property Get SQL() SQL = m_strSQL End Proper

    阅读全文>>

作者:coody分类:【_vbScript浏览(1410

2019-09-26

VBScript/QTP 的惯用COM对象列表

    VBScript/QTP 的常用COM对象列表众所周知,我们经常在脚本中创建一些对象来实现某些特定的功能。尤其是当我们使用QTP的描述性编程时,需要创建这些对象。 下边是我们经常在QTP或VBScript中用到的对象列表: Set objEmail = CreateObject("CDO.Message" ) Set objIE = CreateObject("InternetExplorer.Application" ) Set objInet = CreateObject("InetCtls.Inet.1" ) Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1" ) Set objExcel =CreateObject("Excel.Ap

    阅读全文>>

作者:coody分类:【_vbScript浏览(897

2019-09-26
上一页 1/7页 下一页