w1100n
This site is best viewed in Google Chrome
3/6/2012 12:17 | Tag:

标题: VBS实现 “多线程” 作者: Demon 链接: http://demon.tw/programming/vbs-multithreading.html 版权: 本博客的所有文章,都遵守“署名-非商业性使用-相同方式共享 2.5 中国大陆”协议条款。 今天有人发邮件问我一个问题: 想请教一下VBS中INPUTBOX函数能否超时关闭? 如果可以的话,应该如何超时关闭输入框? 万分感谢 乍一看这是不可能实现的,因为InputBox函数本身没有超时关闭的参数,而且程序会一直等待InputBox返回才继续运行,后面的语句不可能在InputBox返回之前执行。 如果VBS能实现高级语言的多线程的话……只可惜VBS不可能实现多线程,但是可以用setTimeout方法模拟“多线程”。 Dim IE Set IE = CreateObject(“InternetExplorer.Application”) IE.Navigate “about:blank” Set window = IE.Document.parentWindow id = window.setTimeout(GetRef(“on_timeout”),3000,”VBScript”) name = InputBox(“Please enter your name”,”InputBox Timeout”) window.clearTimeout id … Continue reading

12/16/2011 6:39 | Tag:

Abs (数值)绝对值。一个数字的绝对值是它的正值。空字符串 (null) 的绝对值,也是空字符串。未初始化的变数,其绝对为 0例子:ABS(-2000) 结果:2000Array (以逗点分隔的数组元素)Array 函数传回数组元素的值。例子: A=Array(1,2,3) B=A(2) 结果: 2 说明:变量B为A数组的第二个元素的值。 Asc (字符串)将字符串的第一字母转换成 ANSI (美国国家标准符号)字码。例子:Asc("Internet") 结果:73 说明:显示第一字母 I 的 ANSI 字码。 CBool(表达式)转换成布尔逻辑值变量型态(True 或False )例子:CBool(1+2) 结果:True CDate (日期表达式)换成日期变量型态。可先使用 IsDate 函数判断是否可以转换成日 期。例子: CDate (now( )+2) 结果:2000/5/28 10:30:59 CDbl(表达式)转换成DOUBLE变量型态。Chr ( ANSI … Continue reading

12/14/2011 10:10 | Tag:

Set myArrayList = CreateObject( “System.Collections.ArrayList” )  myArrayList.Add “F”  myArrayList.Add “B”  myArrayList.Add “D”  myArrayList.Add “C” #get the value dim tmp tmp = myArrayList(0) Set DataList = CreateObject(“System.Collections.ArrayList”) DataList.Add “B” DataList.Add “C” DataList.Add “E” DataList.Add “D” DataList.Add “A” DataList.Sort() For Each strItem … Continue reading

12/9/2011 2:24 | Tag:

Dictionary 对象 Dictionary 对象用于在结对的名称/值中存储信息((等同于键和项目)。Dictionary 对象看似比数组更为简单,然而,Dictionary 对象却是更令人满意的处理关联数据的解决方案。 比较 Dictionary 和数组: 键用于识别 Dictionary 对象中的项目 无需调用 ReDim 来改变 Dictionary 对象的尺寸 当从 Dictionary 删除一个项目时,其余的项目会自动上移 Dictionary 不是多维,而数组是 Dictionary 与数组相比,有更多的内建对象 Dictionary 在频繁地访问随机元素时,比数组工作得更好 Dictionary 在根据它们的内容定位项目时,比数组工作得更好 下面的例子创建了一个 Dictionary 对象,并向对象添加了一些键/项目对,然后取回了键 bl 的值: Dictionary 属性 CompareMode 设置或返回用于在 Dictionary 对象中比较键的比较模式。 Count 返回 … Continue reading

12/9/2011 1:44 | Tag:

vbscript 数组的使用   数组变量和动态调整数组大小。 VBScript数组变量 有时候,将多个相关值赋给一个变量更为方便,因此可以创建包含一系列值的变量,称为数组变量。数组变量和标量变量是以相同的方式声明的,唯一的区别是声明数组变量时变量名后面带有括号 ( )。 下例声明了一个包含 11 个元素的一维数组: Dim A(10) 虽然括号中显示的数字是 10,但由于在 VBScript 中所有数组都是基于 0 的,所以这个数组实际上包含 11 个元素。在基于 0 的数组中,数组元素的数目总是括号中显示的数目加 1。这种数组被称为固定大小的数组。 在数组中使用索引为数组的每个元素赋值。从 0 到 10,将数据赋给数组的元素,如下所示: A(0) = 256 A(1) = 324 A(2) = 100 . . . A(10) … Continue reading

11/11/2011 8:53 | Tag:

算术运算符         比较运算符         逻辑运算符 描述    符号      描述    符号       描述   符号 求幂    ^       等于     =        逻辑非   Not 负号    -       不等于    <>       逻辑与   And 乘     *       小于     <        逻辑或   Or 除     /       大于     >        逻辑异或  Xor 整除           小于等于   <=       逻辑等价  Eqv 求余    Mod       大于等于   >=       逻辑隐含  Imp 加     +       对象引用比较 Is 减     - 字符串连接 &

11/11/2011 8:51 | Tag:

do loop Do While i>10 some code Loop For…Next 使用 For…Next 循环语句 For…Next 语句用于将语句块运行指定的次数。在循环中使用计数器变量,该变量的值随每一次循环增加或减少。以下是个简单示例: Dim i for i = 0 to 10 ‘do some thing next

8/9/2011 2:44 | Tag:

Trim(string) Len   函数 描述 返回字符串内字符的数目,或是存储一变量所需的字节数。 语法 Len(string   |   varname) Len   函数语法有以下参数: 参数   描述 string   任意有效的字符串表达式。如果   string   参数包含   Null,则返回   Null。 varname   任意有效的变量名。如果   varname   参数包含   Null,则返回   Null。 … Continue reading

8/8/2011 3:41 | Tag:,

set objElement = objPage.WebElement(“html tag:=TD”,”innertext:=xxxxxx”, “index:=1”).object logger(objElement.outerHtml) Set objElement = objElement.parentElement logger(objElement.outerHtml) Set objElement = objElement.firstChild logger(objElement.outerHtml) Set objElement = objElement.firstChild logger(objElement.outerHtml) logger(objElement.status) objElement.checked=true logger(objElement.status)

辽ICP备14012896