markinlqx的专栏

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

原文地址：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): 返回八进制值 直接表示：

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

有 E:\Script.xml 内容如下： <![CDATA[ SELECT columna, columnb, FROM Table WITH(NOLOCK) ]]>  执行下面的Script：msgbox(GetMyS

Dim MyVarMsgBox MyVarMsgBox TypeName(MyVar)MsgBox IsEmpty(MyVar)Dim MyVarMyVar=NullMsgBox "" & MyVarMsgBox TypeName(MyVar)MsgBox IsNull(MyVar)Dim MyObjSet MyObj = CreateObject("Scr

'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

'Convert array to string'Writer Markin.Q.Li'Create Date 2013-4-28'arrayName arrayName'separator separator'Example ConvertArrayToString(arrayName, ",")Public Function

'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