![](https://img-blog.csdnimg.cn/20201014180756928.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
VBScript
markinlqx
这个作者很懒,什么都没留下…
展开
-
VBScript Sub and Function Demo
Option ExplicitGreetUser GetUserNameSub GreetUser(strUserName) If IsNumeric(strUserName) Or IsDate(strUserName) Then MsgBox "That is not a legal name." Exit Sub End If MsgBox "H原创 2013-04-06 16:24:42 · 648 阅读 · 0 评论 -
VBscript常用函数
原文地址:http://www.360doc.com/content/06/0501/21/3123_108694.shtmlVBscript常用函数: 1.数值型函数: abs(num): 返回绝对值 sgn(num): num>0 1; num=0 0; numhex(num): 返回十六进制值 直接表示:&Hxx 最大8位 oct(num): 返回八进制值 直接表示:转载 2013-03-26 08:44:29 · 619 阅读 · 0 评论 -
Vbscript data type
VbScript is loosely typed language.You can use a variant with out define like this:MyVar = 50 or MyVar = "UserName"The only one data type in vbscript is Variant. There are subtypes such as Int原创 2013-04-06 10:51:57 · 520 阅读 · 0 评论 -
vbScript 读取xml
有 E:\Script.xml 内容如下: <![CDATA[ SELECT columna, columnb, FROM Table WITH(NOLOCK) ]]> 执行下面的Script:msgbox(GetMyS原创 2012-09-09 08:29:51 · 972 阅读 · 0 评论 -
VBScript Empty, Null, Nothing
Dim MyVarMsgBox MyVarMsgBox TypeName(MyVar)MsgBox IsEmpty(MyVar)Dim MyVarMyVar=NullMsgBox "" & MyVarMsgBox TypeName(MyVar)MsgBox IsNull(MyVar)Dim MyObjSet MyObj = CreateObject("Scr原创 2013-04-06 16:05:43 · 1089 阅读 · 0 评论 -
Vbscript 获取随机数
'Get Rand Number'Writer Markin.Q.Li'Create Date 2013-4-28'min min'max max'Example GetRandNumber(5,10)Public Function GetRandNumber(min, max) Randomize G原创 2014-02-08 15:35:30 · 2731 阅读 · 0 评论 -
Vbscript 将数组转换为字符串
'Convert array to string'Writer Markin.Q.Li'Create Date 2013-4-28'arrayName arrayName'separator separator'Example ConvertArrayToString(arrayName, ",")Public Function原创 2014-02-08 15:37:57 · 3461 阅读 · 0 评论 -
Vbscript在DataGridView中折半查找某一行
'Binary search an item in a certain table's certain column'Writer Markin.Q.Li'Create Date 2013-4-24'Return RowIndex'min The min row index'max The max row原创 2014-02-08 15:44:27 · 673 阅读 · 0 评论