wincc中使用vbs常用函数

1.函数array()

功能:创建一个数组变量

格式:array(list)

参数:list　为数组变量中的每个数值列,中间用逗号间隔

例子:

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

结果:　i　被赋予为数组

2.函数Cint()

功能:将一表达式/其它类型的变量转换成整数类型(int)

格式:Cint(expression_r)

参数:expression_r　是任何有效的表达式/其它类型的变量

例子:

%

f　=　”234”

response.write　cINT(f)　+　2

%>

结果:　236

函数Cint()将字符”234”转换　成整数234.如果表达式为空,　或者无效时,返回值为0;

3.函数:Creatobject()

功能:创建及返回一个ActiveX对象.

格式:Creatobject(obname)

参数bname　是对象的名称

例子:

%

Set　con　=　Server.CreateObject(“ADODB.Connection”)

%>

结果:

4.函数Cstr()

功能:将一表达式/其它类型的变量转换成字符类型(string)

格式:Cstr(expression_r)

参数:expression_r是任何有效的表达式/其它类型的变量

例子:

%

s　=　3　+　2

response.write　”The　result　is:　”　　cStr(s)

%>

结果:函数Cstr()将整数　5　转换　成字符”5”.

5.函数Date()

功能:返回当前系统(server端)的日期

格式:　Date()

参数:无

例子%　date　()　%>

结果:05/10/006.函数Dateadd()

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

格式:　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()

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

格式:is