wincc中使用vbs常用函数

　　功能:计算某个指定的时间和

　　格式:　dateadd(timeinterval,number,date)

　　参数:timeinterval是时间单位(月,日..);　number是时间间隔值,date是时间始点.

　　例子:

　　%

　　currentDate　=　#8/4/99#

　　newDate　=　DateAdd(“m”,3,currentDate)

　　response.write　newDate

　　%>　%

　　currentDate　=　#12:34:45　PM#

　　newDate　=　DateAdd(“h”,3,currentDate)

　　response.write　newDate

　　%>

　　结果:

　　11/4/99

　　3:34:45　PM

　　其中

　　“m”　=　”month”;

　　“d”　=　”day”;

　　如果是currentDate　格式,则,

　　“h”　=　”hour”;

　　“s”　=　”second”;

　　7.函数Datediff()

　　功能:计算某量个指定的时间差

　　格式:　datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear]])

　　参数:　timeinterval　是时间单位;　date1,date2是有效的日期表达式,firstdayofweek,firstdayofyear　是任意选项.

　　例子:

　　%

　　fromDate　=　#8/4/99#

　　toDate　=　#1/1/2000#

　　response.write　”There　are　”　　_

　　DateDiff(“d”,fromDate,toDate)　　_

　　“　days　to　millenium　from　8/4/99.”

　　%>

　　结果:There　are　150　days　to　millenium　from　8/4/99.

　　8.函数day()

　　功能:返回一个整数值,对应于某月的某日

　　格式:　day(date)

　　参数:　date是一个有效的日期表达式;

　　例子%　=date(#8/4/99#)　%>

　　结果:4

　　9.函数formatcurrency()

　　功能:转换成货币格式

　　格式:　formatcurrency(expression_r　[,digit[,leadingdigit[,paren[,groupdigit]]]])

　　参数:　expression_r　是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项.

　　例子%=FormatCurrency(34.3456)%>

　　结果34.35

　　10.函数Formatdatetime()

　　功能:格式化日期表达式/变量

　　格式:　formatdatetime(date[,nameformat])

　　参数:　date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称.

　　例子%　=formatdatetime(“08/04/99”,vblongdate)　%>

　　结果:Wednesday,August　04,1999

　　说明:

　　--------------------------------------------------------------------------------

　　描述

　　返回表达式，此表达式已被格式化为日期或时间。

　　语法

　　FormatDateTime(Date[,　NamedFormat])

　　FormatDateTime　函数的语法有以下参数：

　　参数　描述

　　Date　必选项。要被格式化的日期表达式。

　　NamedFormat　可选项。指示所使用的日期/时间格式的数值，如果省略，则使用　vbGeneralDate。

　　设置

　　NamedFormat　参数可以有以下值：

　　常数　值　描述

　　vbGeneralDate　0　显示日期和/或时间。如果有日期部分，则将该部分显示为短日期格式。如果有时间部分，则将该部分显示为长时间格式。如果都存在，则显示所有部分。

　　vbLongDate　1　使用计算机区域设置中指定的长日期格式显示日期。

　　vbShortDate　2　使用计算机区域设置中指定的短日期格式显示日期。

　　vbLongTime　3　使用计算机区域设置中指定的时间格式显示时间。

　　vbShortTime　4　使用　24　小时格式　(hh:mm)　显示时间。

　　说明

　　下面例子利用　FormatDateTime　函数把表达式格式化为长日期型并且把它赋给　MyDateTime:

　　Function　GetCurrentDate

　　“FormatDateTime　把日期型格式化为长日期型。

　　GetCurrentDate　=　FormatDateTime(Date,　1)

　　End　Function

　　11.函数Isnumeric()

　　功能:返回一个布尔值,判断变量是否为数字变量,或者是可以转换成数字的其它变量.

　　格式:isnumeric(expression_r)

　　参数:expression_r　是任意的变量.

　　例子:

　　%

　　i=“234”

　　response.write　isnumeric(i)

　　%>

　　结果:　true.

　　12.函数Isobject()

　　功能:返回一个布尔值,判断变量是否为对象的变量,

　　格式:　isobject(expression_r)

　　参数:　expression_r　是任意的变量.

　　例子:

　　%

　　set　con　=server.creatobject(“adodb.connection”)

　　response.write　isobject(con)

　　%>

　　结果:　true

　　13.函数:Lbound()

　　功能:返回一个数组的下界.

　　格式:Lbound(arrayname[,dimension])

　　参数:arrayname　是数组变量,dimension　是任意项

　　例子:

　　%

　　i　=　array(“1”,”2”,”3”)

　　response.write　lbound(i)

　　%>

　　结果:0

　　14.函数Lcase()

　　功能:将一字符类型变量的字符全部变换小写字符.

　　格式:Lcase(string)

　　参数:string是字符串变量

　　例子:

　　%

　　str=“THIS　is　Lcase!”

　　response.write　Lcase(str)

　　%>

　　结果:this　is　lcase!