wincc中使用vbs的常用函数
wincc中使用vbs的常用函数
1.函数array()
功能:创建一个数组变量
格式:array(list)
参数:list为数组变量中的每个数值列,中间用逗号间隔
例子:
<%i=array(“1”,”2”,”3”)%>
结果:i被赋予为数组
2.函数Cint()
功能:将一表达式/其它类型的变量转换成整数类型(int)
格式:Cint(expression)
参数:expression是任何有效的表达式/其它类型的变量
例子:
<%
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)
参数:expression是任何有效的表达式/其它类型的变量
例子:
<%
s=3+2
response.write”The result is:”&cStr(s)
%>
结果:函数Cstr()将整数5转换成字符”5”.
5.函数Date()
功能:返回当前系统(server端)的日期
格式:Date()
参数:无
例子<%date()%>
结果:05/10/00
6.函数Dateadd()
功能:计算某个指定的时间和
格式:dateadd(timeinterval,number,date)
参数:timeinterval是时间单位(月,日..);number是时间间隔值,date是时间始点.
例子:
<%
currentDate=#8/4/99#
newDate=DateAdd(“m”,3,currentDate)
response.write newDate
%><%
currentDate=#12:34:45PM#
newDate=DateAdd(“h”,3,currentDate)
response.write newDate
%>
结果:
11/4/99
3:34:45PM
其中
“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 from8/4/99.”
%>
结果:There are150days to millenium from8/4/99.
8.函数day()
功能:返回一个整数值,对应于某月的某日
格式:day(date)
参数:date是一个有效的日期表达式;
例子<%=date(#8/4/99#)%>
结果:4
9.函数formatcurrency()
功能:转换成货币格式
格式:formatcurrency(expression[,digit[,leadingdigit[,paren[,groupdigit]]]])
参数:expression是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit 是任意选项.
例子<%=FormatCurrency(34.3456)%>
结果34.35
10.函数Formatdatetime()
功能:格式化日期表达式/变量
格式:formatdatetime(date[,nameformat])
参数:date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称.
例子<%=formatdatetime(“08/04/99”,vblongdate)%>
结果:Wednesday,August04,1999
说明:
--------------------------------------------------------------------------------
描述
返回表达式，此表达式已被格式化为日期或时间。
语法
FormatDateTime(Date[,NamedFormat])
FormatDateTime函数的语法有以下参数：
参数描述
Date必选项。要被格式化的日期表达式。
NamedFormat可选项。指示所使用的日期/时间格式的数值，如果省略，则使用vbGeneralDate。
设置
NamedFormat参数可以有以下值：
常数值描述
vbGeneralDate0显示日期和/或时间。如果有日期部分，则将该部分显示为短日期格式。如果有时间部分，则将该部分显示为长时间格式。如果都存在，则显示所有部分。
vbLongDate1使用计算机区域设置中指定的长日期格式显示日期。
vbShortDate2使用计算机区域设置中指定的短日期格式显示日期。
vbLongTime3使用计算机区域设置中指定的时间格式显示时间。
vbShortTime4使用24小时格式(hh:mm)显示时间。
说明
下面例子利用FormatDateTime函数把表达式格式化为长日期型并且把它赋给MyDateTime: Function GetCurrentDate
“FormatDateTime把日期型格式化为长日期型。
GetCurrentDate=FormatDateTime(Date,1)
End Function
11.函数Isnumeric()
功能:返回一个布尔值,判断变量是否为数字变量,或者是可以转换成数字的其它变量.
格式:isnumeric(expression)
参数:expression是任意的变量.
例子:
<%
i=“234”
response.write isnumeric(i)
%>
结果:true.
12.函数Isobject()
功能:返回一个布尔值,判断变量是否为对象的变量,
格式:isobject(expression)
参数:expression是任意的变量.
例子:
<%
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!
15.函数left()
功能:截取一个字符串的前部分;
格式:left(string,length)
参数:string字符串,length截取的长度.
例子:<%=left(“this is a test!”,6)%>
结果:this i
16.函数len()
功能:返回字符串长度或者变量的字节长度
格式:len(string*varname)
参数:string字符串;varname任意的变量名称
例子:
<%
strtest=“this is a test!”
response.write left(strtest)
%>
结果:15
17.函数ltrim()
功能:去掉字符串前的空格.
格式:ltrim(string)
参数:string字符串.
例子:<%=ltrim(“this is a test!”)
结果:this is a test!
18.函数Mid()
功能:从字符串中截取字符串.
格式:mid(string,start[,length])
参数:string字符串,start截取的起点,length要截取的长度.例子:
<%
strtest=“this is a test,Today is Monday!”response.write mid(strtest,17,5)
%>
结果:Today
19.函数minute()
功能:返回一数值,表示分钟
格式:minute(time)
参数:time是时间变量
例子lt;%=minute(#12:23:34#)%>
结果:23
20.函数month()
功能:返回一数值,表示月份
格式:month(time)
参数:time是日期变量
例子<%=month(#08/09/99)%>
结果:9
[color=#1E90FF]21.函数monthname()[/color]
功能:返回月份的字符串(名称).
格式:Monthname(date[,abb])
参数:date是日期变量,abb=true时则月份的缩写,例子:
<%=monthname(#4/5/99#)%>
结果:April
22.函数Now()
功能:返回系统的当前时间和日期.
格式:now()
参数:无
例子:
<%=now()%>
结果:05/10/008:45:32pm
25.函数rnd()
功能:返回一个随机数值
格式:rnd[(number)]
参数:number是任意数值.
例子:
<%
randomize()
response.write rnd()
%>
结果:0/1数值之一,无randomize(),则不能产生随机数.
26.函数round()
功能:完整数值
格式:round(expression[,numright])
参数:expression数字表达式;numright任意选项.
例子:
<%
i=12.33654
response.write round(i)
%>
结果:12
27.函数rtrim()
功能:去掉字符串后的空格.
格式:rtrim(string)
参数:string是字符串
例子:
<%
response.write rtrim(“this is a test!”)
%>
结果:this is a test!
23.函数:replace()
功能:在字符串中查找,替代指定的字符串.
格式:replace(strtobesearched,strsearchfor,strreplacewith[,start[,count[,compare]]])
参数:strtobesearched是字符串;strsearchfor是被查找的子字符串;strreplacewith是用来替代的子字符串.start,count,compare是任意选项.
例子:
<%
strtest=“this is an apple.”
response.write replace(strtest,”apple”,”orange”)
%>
结果:this is an orange.
24.函数right()
功能:截取一个字符串的后部分
格式:right(string,length)
参数:string字符串,length截取的长度.
例子:
<%
strtest=“this is a test!”
response.write right(strtest,3)
%>
结果:st!
28.函数second()
功能:返回一个整数值.
格式:second(time)
参数:time是一个有效的时间表达式;
例子lt;%=second(#12:28:30#)%>
结果:30
29.函数strReverse()
功能:返回与原字符串排列逆向的字符串.
格式:strreverse(string)
参数:string是字符串
例子<%=strreverse(“this is a test!”)
结果:!tset a si siht
30.函数time()
功能:返回当前系统的时间值.
格式:time()
参数:无
结果:9:58:28Am
31.函数trim()
功能:删去字符串前,后的空格.
格式:trim(string)
参数:string字符串.
例子:
<%
strtest=“this is a test!”
response.write trim(strtest)
%>
结果:this is a test!
32.函数UBound()
功能:返回一个数组的上界.
格式:Ubound(expression[,dimension])
参数:expression是数组表达式/数组变量,dimension是任意项例子:
<%
i=array(“1”,”2”,”3”)
response.write ubound(i)
%>
结果:2
33.函数:UCase()
功能:将一字符类型变量的字符全部变换成大写字符.
格式:Ucase(string)
参数:string是字符串变量
例子:
<%
str=“THIS is Lcase!”
response.write Lcase(str)
%>
结果:THIS IS LCASE!
34.函数Vartype()
功能:返回变量的常量代码(整数)
格式:Vartype(varname)
参数:varname是任何类型的变量名称.
例子:
<%
i=5
response.write vartype(i)
%>
结果:2(2表示整数,须要参考ASP常量代码.)
35.函数Weekday()
功能:返回一个整数,对应一周中的第几天.
格式:Weekday(date[,firstofweek])
参数:date为日期变量,firstofweek为任选项.
例子:
<%
d=#5/9/00#
response.write weekday(d)%>
结果:3(3表示是星期二)
36.函数weekdayname()
功能:返回字符串,对应星期几.
格式:weekdayname(weekday[,abb[,firstdayofweek]])
参数:weekday为日期变量,abb,firstdayofweek为任选项.例
子:
<%
d=#8/4/99#
response.write weekdayname(d)
%>
结果:Wednesday
37.函数year()
功能:返回日期表达式所在的年份.
格式:year(date)
参数:date是有效的日期表达式
例子:
<%=year(#8/9/99#)%>
结果:1999
38.函数Mod()功能:取余数.
例子:3Mod2
结果:1
VBS函数的简单库
Abs 函数返回数的绝对值。 加法运算符(+) 两数相加。 And 运算符执行两个表达式的逻辑连接。 Array 函数返回含一数组的变体。 Asc 函数返回字符串首字母的ANSI 字符代码。 赋值运算符(=) 给变量或属性赋值。 Atn 函数返回数的反正切值。 调用语句将控制移交Sub 或Function 过程。 CBool 函数返回已被转换为Boolean 子类型的变体的表达式。 CByte 函数返回已被转换为字节子类型的变体的表达式。 CCur 函数返回已被转换为货币子类型的变体的表达式。 CDate 函数返回已被转换为日期子类型的变体的表达式。 CDbl 函数返回已被转换为双精度子类型的变体的表达式。 Chr 函数返回指定ANSI 字符码的字符。 CInt 函数返回已被转换为整数子类型的变体的表达式。 Class 对象提供对已创建的类的事件的访问。 Class 语句声明类名 Clear 方法清除Err 对象的所有属性设置。 CLng 函数返回已被转换为Long 子类型的变体的表达式。 颜色常数颜色常数列表。 比较常数用于比较运算的常数列表。 连接运算符(&) 强制两个表达式的字符串连接。 Const 语句声明用于字母值的常数。 Cos 函数返回角度的余弦值。 CreateObject 函数创建并返回对“自动”对象的引用。 CSng 函数返回已被转换为单精度子类型的变体的表达式。 CStr 函数返回已被转换为字符串子类型的变体的表达式。 日期和时间常数在日期和时间运算中用来定义星期几和其他常数的常数列表。 日期格式常数用于日期和时间格式的常数列表。 Date 函数返回当前系统日期。 DateAdd 函数返回加上了指定的时间间隔的日期。 DateDiff 函数返回两个日期之间的间隔。 DatePart 函数返回给定日期的指定部分。 DateSerial 函数返回指定年月日的日期子类型的变体。 DateValue 函数返回日期子类型的变体。 Day 函数返回日期，取值范围为 1 至31。 Description 属性返回或者设置说明某个错误的字符串。 Dictionary 对象存储数据键、项目对的对象。 Dim 语句声明变量并分配存储空间。 除法运算符(/) 两数相除并以浮点数格式返回商。 Do...Loop 语句当条件为True 或者当条件变为True 时，重复一语句块。 Empty 表示尚未初始化的变量值。 Eqv 运算符使两个表达式相等。 Erase 语句重新初始化固定数组的元素并重新分配动态数组的存储空间。
wincc中使用vbs常用函数.
wincc 中使用vbs 常用函数 1. 函数array() 功能: 创建一个数组变量 格式:array(list) 参数:list 为数组变量中的每个数值列,中间用逗号间隔 例子: <% i = array ( “1”, ”2”, ”3”) %> 结果: i 被赋予为数组 2. 函数Cint() 功能: 将一表达式/ 其它类型的变量转换成整数类型(int) 格式:Cin t(expressio n_r) 参数:expression」是任何有效的表达式/其它类型的变量 例子: <% 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」是任何有效的表达式/其它类型的变量例子: <% s = 3 + 2 response.write ”The result is: ” & cStr(s) %> 结果: 函数Cstr() 将整数 5 转换成字符” 5”. 5. 函数Date() 功能: 返回当前系统(server 端) 的日期 格式: Date() 参数:无 例子<% date () %> 结果:05/10/00
vbs经典脚本
Vbs脚本经典教材 Vbs脚本经典教材(最全的资料还是MSDN) —为什么要使用Vbs？ 在Windows中，学习计算机操作也许很简单，但是很多计算机工作是重复性劳动，例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除，也许你每天启动计算机第一件事情就是打开W ORD，切换到你喜爱的输入法进行文本编辑，同时还要播放优美的音乐给工作创造一个舒心的环境，当然也有可能你经常需要对文本中的某些数据进行整理，把各式各样的数据按照某种规则排列起来……。这些事情重复、琐碎，使人容易疲劳。 第三方软件也许可以强化计算机的某些功能，但是解决这些重复劳动往往事倍功半，我也尝试过使用计算机语言编写程序来解决这些问题，但是随之而来的命令、语法、算法、系统框架和类库常常让我觉得这样是否有必要，难道就是因为猪毛比较难拔，所以我就要去学习机械，为自己设计一个拔猪毛机（？）吗？ Vbs是一种Windows脚本，它的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版)，VBS是Visual Basic的的一个抽象子集，是系统内置的，用它编写的脚本代码不能编译成二进制文件，直接由Windows系统执行（实际是一个叫做宿主host的解释源代码并执行），高效、易学，但是大部分高级语言能干的事情，它基本上都具备，它可以使各种各样的任务自动化，可以使你从重复琐碎的工作中解脱出来，极大的提高工作效率。 我个人认为Vbs脚本其实就是一种计算机编程语言，但是由于缺少计算机程序设计语言中的部分要素，对于事件的描述能力较弱，所以称为脚本，它最方便的地方就是提供了对COM对象的简便支持。那么什么是COM对象呢？ 我这样理解，COM对象就是一些具有特定函数功能项程序模块，他们一般以ocx或者dll作为扩展名，你只要找到包含有你需要的功能的模块文件，并在脚本中规范的引用，就可以实现特定的功能，也就是说Vbs脚本就是调用现成的“控件”作为对象，用对象的属性和方法实现目的，完全免去了编写代码、设计算法等等麻烦。说白了，我不是觉得拔猪毛麻烦么？我发觉xx机（比如真空离心器）有一个功能可以实现脱毛，ok，我把它拿来给猪脱毛。什么？大材小用？太浪费资源了？天哪，那是计算机芯片的事情，死道友不死贫道，反正我的事情是方便快速的解决了，这就行了。 最方便的是它甚至不需要专门的开发环境，在你的计算机中，只要有notepad，就可以编写Vbs 脚本了，并且可以直接执行。
wincc中使用vbs的常用函数
wincc中使用vbs的常用函数 1.函数array() 功能:创建一个数组变量 格式:array(list) 参数:list为数组变量中的每个数值列,中间用逗号间隔 例子: <%i=array(“1”,”2”,”3”)%> 结果:i被赋予为数组 2.函数Cint() 功能:将一表达式/其它类型的变量转换成整数类型(int) 格式:Cint(expression) 参数:expression是任何有效的表达式/其它类型的变量 例子: <% 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) 参数:expression是任何有效的表达式/其它类型的变量 例子: <% s=3+2 response.write”The result is:”&cStr(s) %> 结果:函数Cstr()将整数5转换成字符”5”. 5.函数Date() 功能:返回当前系统(server端)的日期
格式:Date() 参数:无 例子<%date()%> 结果:05/10/00 6.函数Dateadd() 功能:计算某个指定的时间和 格式:dateadd(timeinterval,number,date) 参数:timeinterval是时间单位(月,日..);number是时间间隔值,date是时间始点. 例子: <% currentDate=#8/4/99# newDate=DateAdd(“m”,3,currentDate) response.write newDate %><% currentDate=#12:34:45PM# newDate=DateAdd(“h”,3,currentDate) response.write newDate %> 结果: 11/4/99 3:34:45PM 其中 “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 from8/4/99.” %> 结果:There are150days to millenium from8/4/99. 8.函数day() 功能:返回一个整数值,对应于某月的某日 格式:day(date)
很好的VBS教程(带实例)
很好的VBS教程（带实例） 推荐第一篇： 讲一下VBScript。主要面向菜鸟，懂得编程的朋友就不要浪费时间了，如果你想接触以下VBScript也可以。但既然有编程基础推荐直接去找一些参考书来读。会比较快。 什么是VBScript呢？VBScript的全称是：Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版)。正如其字面所透露的信息，VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言。我进一步解释一下，Microsoft Visual Basic是微软公司出品的一套可视化编程工具，语法基于Basic.脚本语言，就是不编译成二进制文件，直接由宿主(host)解释源代码并执行，简单点说就是你写的程序不需要编译成.exe，而是直接给用户发送.vbs 的源程序，用户就能执行了。 我知道菜鸟现在最关心的就是用什么工具来开发VBS程序了，答案是：记事本(Notepad).我不是开玩笑，其实任何一种文本编辑器都可以用来开发VBS开发，只不过记事本是由系统自带的，比较好找而已. 尽管如此，我还是建议你去下载一个专业的文本编辑器，因为这些工具可以提供"语法高亮"等功能，更加方便开发，用哪一个随你喜好，我比较喜欢Edit Plus (2.10). OK，我们先来写一个VBScript程序热热身. REM 输入并回显你的名字 '使用InputBox和Msgbox函数 Dim name,msg msg="请输入你的名字:" name=Inputbox(msg,"名称") Msgbox(name) 把上面的程序清单输入到记事本里面，然后保存为以.vbs为扩展名的文件("保存类型"里面选择"所有文件").然后双击运行，观察运行结果. 注意:请自己输入程序清单，不要复制->粘贴! 我来解释一下这个程序，第一行和第二行的开头分别是"REM"语句和" ' "，这两个东西的作用是相同的，表示本行是注释行，就是说这两行什么也不干,只是用来说明这段程序的功能，信息等等. 注释行是程序最重要的部分之一，尽管它不是必需的，但对于其他人阅读源代码，以及自己分析源代码是很有好处的. 好的习惯是在必要的地方加上清晰，简洁的注释。 Dim用来声明一个变量，在VBS中，变量类型并不是那么重要，就是说VBS会帮你自动识别变量类型，而且变量在使用前不一定要先声明，程序会动态分配变量空间. 在VBS 中你不用考虑name储存的是一个整数还是一个小数(学名叫"浮点数")，也不用考虑是不是字符串(一串字符，比如:"Hello World")，VBS会自动帮你搞定. 所以第三行语句可以删除，效果不会变，但我强烈反对这么做，一个变量的基本原则就是:先声明,后使用.变量名用字母开头,可以使用下划线,数字，但不能使用vbs已经定义的字，比如dim，也不能是纯数字。 下一行被称之为"赋值"，"="是赋值符号，并不是数学中的等于号，尽管看起来一样.这
vbs基础语法
一、变量 1、注释：(单引号) 2、变量的命名规则：不区分大小写的。用Dim声明变量，此时不能给变量赋值。但是允许在一行代码内同时对两个变量进行赋值，中间用冒号分隔。 3、你可以使用OptionExplicit来告诉宿主变量必须先声明后使用。 4、只有一种变量类型，使用类型转换函数来将变量转换成相应的变量类型。 布尔：Cbool函数将变量转换成布尔值； 整数：Cbyte函数将变量转换为0到255之间的整数。 浮点：Ccur函数、Cdbl函数和Csng函数将变量转换为浮点数值， 日期：Cdate函数将变量转换为日期值。 整数：Cint函数和Clng函数将变量转换为整数，后者的范围比前者要大的多。 字串：Cstr函数将变量转换为字符串。 －－－－－－－－－－－－－－－－－－－－－－－－－ 三、操作符 在VBScript运算符中，加减乘除都是我们常用的符号， 乘方使用的是^ ， 取模使用的Mod。 在比较操作符中，等于、小于、大于、小于等于、大于等于都与我们常用的符号是一致的，而不等于是小于和大于连用。 逻辑运算符为： 和操作—>AND 非操作—>NOT 或操作—>OR；
+ 和操作符 &来连接字符串， Is用来比较对象，例如按钮对象，如果对象是同一类型，结果就是真，－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ 四、条件语句 if……then语句， 其基本形式为： If 条件then 处理条件的语句； …… Endif Select case语句， 其基本形式为： Select case 变量 Case 条件值 处理条件语句 并对上两句进行重复 最后一句应为 case else 处理语句 End select 注意：在执行字符串比较时，需要特别注意大小写。
WINCC VBSCRIPT常用函数
WinCC VBscript常用函数 1.数值型函数： abs(num):返回绝对值 sgn(num):num>01;num=00;num<0-1;判断数值正负 hex(num):返回十六进制值直接表示：&Hxx最大8位 oct(num):返回八进制值直接表示：&Oxx最大8位 sqr(num):返回平方根num>0 int(num):取整int(99.8)=99;int(-99.2)=100 fix(num):取整fix(99.8)=99;fix(-99.2)=99 round(num,n):四舍五入取小数位round(3.14159,3)=3.142中点数值四舍五入为近偶取整round(3.25,1)=3.2 log(num):取以e为底的对数num>0 exp(n):取e的n次幂通常用num^n sin(num):三角函数，以弧度为值计算(角度*Pai)/180=弧度con(num); tan(num);atn(num) 2.字符串函数： len(str)：计算字符串长度中文字符长度也计为一！ mid(str,起始字符,[读取长度])：截取字符串中间子字符串 left(str,nlen)：从左边起截取nlen长度子字符串 right(str,nlen)：从右边起截取nlen长度子字符串 Lcase(str)：字符串转成小写 Ucase(str)：字符串转成大写 trim(str)：去除字符串两端空格 Ltrim(str)：去除字符串左侧空格 Rtrim(str)：去除字符串右侧空格 replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串 注：默认值：起始字符1；替代次数不限；比较方法区分大小写（0） InStr([起始字符,]str,查找字符串[,比较方法])：检测是否包含子字符串可选参数需同时选返回起始位置 InStrRev(str,查找字符串[,起始字符][,比较方法])：反向检测是否包含子字符串返回起始位置 space(n)：构造n个空格的字符串 string(n,str)：构造由n个str第一个字符组成的字符串 StrReverse(str)：反转字符串 split(str,分割字符串[,次数][,比较方法])：以分割字符串为分割标志将字符串转为字符数组可选参数需同时选 3.数据类型转换函数：
VBS常用函数
WinCC VBscript常用标准函数总结 在WinCC软件中使用VBS进行编程的时候常常使用的标准函数整理如下： 数值型函数： abs(num): 返回绝对值 sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负 hex(num): 返回十六进制值直接表示：&Hxx 最大8位 oct(num): 返回八进制值直接表示：&Oxx 最大8位 sqr(num): 返回平方根num>0 int(num): 取整int(99.8)=99; int(-99.2)=100 fix(num): 取整fix(99.8)=99; fix(-99.2)=99 round(num,n): 四舍五入取小数位round(3.14159,3)=3.142 中点数值四舍五入为近偶取整round(3.25,1)=3.2 log(num): 取以e为底的对数num>0 exp(n): 取e的n次幂通常用num^n sin(num): 三角函数，以弧度为值计算(角度*Pai)/180=弧度con(num); tan(num); atn(num) 2.字符串函数： len(str)：计算字符串长度中文字符长度也计为一！ mid(str,起始字符,[读取长度])：截取字符串中间子字符串 left(str,nlen)：从左边起截取nlen长度子字符串 right(str,nlen)：从右边起截取nlen长度子字符串 Lcase(str)：字符串转成小写 Ucase(str)：字符串转成大写 trim(str)：去除字符串两端空格 Ltrim(str)：去除字符串左侧空格 Rtrim(str)：去除字符串右侧空格 replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串注：默认值：起始字符1；替代次数不限；比较方法区分大小写（0）
wincc中使用vbs常用函数.
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/00
VBS的RUN函数本身带三个参数
VBS的RUN函数本身带三个参数-隐藏后台运行模式 VBS的RUN函数本身带三个参数-隐藏后台运行模式 1.代码事例： DIM objShell set objShell=wscript.createObject("wscript.shell") iReturn=objShell.Run("cmd.exe /C C:\addolcli\AddolC.exe", 0, TRUE) VBS的RUN函数本身带三个参数，第一个参数就是你要运行的程序 第二个参数就是用来控制运行窗口模式有0-9模式 其中0是隐藏后台运行，6是最小化运行 具体可以参数MSDN帮助文档 SW_HIDE 0 Hides the window and activates another window. SW_MINIMIZE 6 Minimizes the specified window and activates the next top-level window in the Z order. SW_RESTORE 9 Activates and displays the window. If the window is minimized or maximized, Windows restores it to its original size and position. An application should specify this flag when restoring a minimized window. Run的第三个参数将允许我们防止相关程序以并发方式运行。您可将第三个参数赋值为True，以便指示脚本停留在使用Run 方法的代码行并保持等待状态，直到已被激活的程序运行完毕。我们已经知道了因未设定该参数所产生的后果，该参数在缺省状态下被设定为False，而这种设置必将导致两个程序同时运行。也就是说TRUE值时必须等待这个脚本完成才运行其他程序，而false时可能还未运行完又执行另外一个脚本 还有一种方式的隐藏运行 set ws=wscript.createobject("wscript.shell") ws.run "bat.bat /start",0 将上面代码写在记事本里保存扩展名为**.vbs 。 以下是调用的批处理。即是上面中的bat.bat文件。 @ECHO OFF C:\addolcli\AddolC.exe @ECHO OFF
Vbs FSO 对象的常用方法
Vbs FSO 对象的常用方法 2011-06-27 23:03:34| 分类：Vbs | 标签：vbs |字号大中小订阅 文件系统是所有操作系统最重要的部分之一，脚本经常会需要对文件及文件夹进行访问和管理，在Vbs中对桌面和文件系统进行访问的顶级对象是FileSystemObject(FSO)，这个对象特别复杂，是vbs进行文件操作的核心。此节内容应了如指掌。 FSO包含的常见对象有： Drive对象：包含储存设备的信息，包括硬盘、光驱、ram盘、网络驱动器 Drives集合：提供一个物理和逻辑驱动器的列表 File 对象：检查和处理文件 Files 集合：提供一个文件夹中的文件列表 Folder对象：检查和处理文件夹 Folders集合：提供文件夹中子文件夹的列表 Textstream对象：读写文本文件 FSO的常见方法有： BulidPath：把文件路径信息添加到现有的文件路径上 CopyFile：复制文件 CopyFolder：复制文件夹 CreateFolder：创建文件夹 CreateTextFile：创建文本并返回一个TextStream对象 DeleteFile：删除文件 DeleteFolder：删除文件夹及其中所有内容 DriveExits：确定驱动器是否存在 FileExits：确定一个文件是否存在 FolderExists：确定某文件夹是否存在 GetAbsolutePathName：返回一个文件夹或文件的绝对路径 GetBaseName：返回一个文件或文件夹的基本路径 GetDrive：返回一个dreve对象 GetDriveName：返回一个驱动器的名字 GetExtensionName：返回扩展名 GetFile：返回一个file对象
VBS基础知识整理
VBScript VBScript 数据类型 ?VBScript 只有一种数据类型，称为Variant。Variant是一种特殊的数据类型，根据使用的方式，它可以包含不同类别的信息。因为Variant是VBScript 中唯一的数据类型，所以它也是VBScript 中所有函数的返回值的数据类型，包括Empty，Null 和Error 三种特殊类型。 ?最简单的Variant可以包含数字或字符串信息。Variant用于数字上下文中时作为数字处理，用于字符串上下文中时作为字符串处理。这就是说，如果使用看起来象是数字的数据，则VBScript 会假定其为数字并以适用于数字的方式处理。与此类似，如果使用的数据只可能是字符串，则VBScript 将按字符串处理。也可以将数字包含在引号(" ") 中使其成为字符串。 ?可以使用转换函数来转换数据的子类型。另外，可使用VarType()函数返回数据的Variant子类型。 VBScript 变量 ?声明变量 –声明变量的一种方式是使用Dim语句、Public语句和Private语句在脚本中显式声明变量。例如：Dim UserName –声明多个变量时，使用逗号分隔变量。例如：Dim Top, Bottom, Left, Right –另一种方式是通过直接在脚本中使用变量名这一简单方式隐式声明变量。这通常不是一个好习惯，因为这样有时会由于变量名被拼错而导致在运行脚本时出现意外的结果。因此，最好使用Option Explicit语句显式声明所有变量，并将其作为脚本的第一条语句。 ?命名规则 –第一个字符必须是字母。 –不能包含嵌入的句点。 –长度不能超过255 个字符。 –在被声明的作用域内必须唯一。 VBScript 常数 ?常数是具有一定含义的名称，用于代替数字或字符串，其值被创建后就不允许再被改变。VBScript 定义了许多内部常数。例如： MsgBox"提示信息：" & vbCrLf& "操作成功", vbInformation, "Title" ?创建常数 –使用Const语句在VBScript 中创建用户自定义常数。使用Const语句可以创建名称具有一定含义的字符串型或数值型常数，并给它们赋原义值。例如： Const conUserName= ”username” Const PI = 3.1415926535897 Const conOlympicDate= #08/08/08#
常用vbs脚本
1 VBS VBS脚本病毒的大量流行使我们对VBS的功能有了一个全新的认识，现在大家对它也开始重视起来。VBS代码在本地是通过Windows Script Host(WSH)解释执行的。VBS脚本的执行离不开WSH，WSH是微软提供的一种基于32位Windows平台的、与语言无关的脚本解释机制，它使得脚本能够直接在Windows桌面或命令提示符下运行。利用WSH，用户能够操纵WSH 对象、ActiveX对象、注册表和文件系统。在Windows 2000下，还可用WSH来访问Windows NT活动目录服务。 用VBS编写的脚本程序在窗口界面是由文件解释执行的，在字符界面由文件解释执行。是一个脚本语言解释器，正是它使得脚本可以被执行，就象执行批处理一样。关于VBS大家一定比我熟悉多了，所以再不废话，直接进入主题，看看我总结的VBS在系统安全中的八则妙用吧。 一、给注册表编辑器解锁 用记事本编辑如下内容： DIM WSH SET WSH=("") ’击活对象 ("解锁注册表编辑器!") ’显示弹出信息“解锁注册表编辑器!” "HKCU/Software/Microsoft/Windows/CurrentVersion /Policies/System/DisableRegistryTools",0,"REG_DWORD" ’给注册表编辑器解锁 ("注册表解锁成功!") ’显示弹出信息“注册表解锁成功!” 保存为以.vbs为扩展名的文件，使用时双击即可。 二、关闭Win NT/2000的默认共享 用记事本编辑如下内容： Dim WSHShell’定义变量 set WSHShell=CreateObject("") ’创建一个能与操作系统沟通的对象WSHShell Dim fso,dc Set fso=CreateObject("")’创建文件系统对象 set dc= ’获取所有驱动器盘符 For Each d in dc Dim str ("net share"& &"$ /delete")’关闭所有驱动器的隐藏共享 next ("net share admin$ /delete") ("net share ipc$ /delete")’关闭admin$和ipc$管道共享 现在来测试一下，先打开，输入net share命令就可以看到自己机子上的共享。双击执行后，会看见窗口一闪而过。然后再在cmd里输入net share命令，这时候没有发现共享列表了三、显示本机IP地址 有许多时候，我们需要知道本机的IP地址，使用各种软件虽然可以办到，但用VBS脚本也非常的方便。用记事本编辑如下内容： Dim WS Set WS=CreateObject("")
组态考试重点及答案.doc
组态网考试重点 一、简答题（4选3）15分 1、变量的分类 变量按照功能可分为：外部变量、内部变量、系统变量和脚本变量； 按照数据类型分类；二进制变量、有符号8位数、无符号8位数、有符号16位数、无符号16位数、有符号32位数、无符号32位数、32位浮点数、64位浮点数、8位字符集文本变量、16位字符集文本变量、结构类型变量、原始数据类型变量、文本参考。 2、函数，动作的功能（VB、C） Wincc可以通过使用函数和动作使Wincc项目中的过程动态化。C脚本有两种：函数和动作。 ●动作需要触发器（事件）来触发，没有触发器动作不会执行；函数则是作为动作的组件来使用。 ●动作用于独立于画面的后台任务，如打印日常报表、监控变量、执行确定的运算（如变量归档中），动作往往没有形参，动作的返回值只能是int型，返回值描述的是动作的执行状态（如正常与否），可用于故障判断；函数是对指定的对象（形参）进行一定的函数运算，其返回值是可变的，根据函数的实际输出值的类型而定，如double f(int x)。用于动作中、动态对话框中、报警回路功能中的报警记录、启动和释放归档时等。 ●动作可主要有全局脚本动作、对象属性的C动作和对象事件的C动作。其中对象事件的C动作，由于对象事件可触发，因此不必设置触发器。如上述实例中的按钮动作。前两者必须设置触发器。 ●函数可分为项目函数、标准函数和内部函数。其中内部函数是C语言常用函数（扩展名.icf），不可更改、编辑和删除，如上例中的GetTagSWord()函数，以及常用的sin()，floor()函数等；标准函数（扩展名.fct）不能创建，但可以修改，如使用内部函数补充功能，WinCC 自带的标准函数有Alam、Graphics、Report、TagLog、WinCC、Windows；内部函数和标准函数保存在WinCC安装目录的\aplib子目录中。项目函数是利用标准函数和内部函数，用户自己创建的函数（扩展名.fct）,保存在项目目录\library下。 3、Wincc自动化标准四层网络及主要通讯方式 Wincc自动化便准四层网络包括管理级、单元级、现场级和执行器—传感器级；功能：管理级：处理的是影响整个操作的任务；单元级：主要处理自动化任务；现场级：PLC和设备之间的连接链路；执行器—传感器级：主站与连接到其子网的执行器和传感器进行通讯。 主要通讯方式：？？？？ 通讯方式：：串口通讯，opc通讯，PROFIBU通讯，Ethernet通讯 4、全局脚本触发方式 周期性触发和变量触发
活动目录常用VBS脚本
以下脚本都在域控上发布使用过，都正常。每个脚本保存*.VBS即可。 --------------------------------------------------------------------------------------------------------------------------------- 加域脚本 On Error Resume Next dim domain set domain = createobject("wscript.shell") Const JOIN_DOMAIN = 1 Const ACCT_CREATE = 2 Const ACCT_DELETE = 4 Const WIN9X_UPGRADE = 16 Const DOMAIN_JOIN_IF_JOINED = 32 Const JOIN_UNSECURE = 64 Const MACHINE_PASSWORD_PASSED = 128 Const DEFERRED_SPN_SET = 256 Const INSTALL_INVOCATION = 262144 strDomain = "https://www.wendangku.net/doc/1718352626.html," strPassword = "密码" strUser = "域管理权限的帐户" Set objNetwork = CreateObject("https://www.wendangku.net/doc/1718352626.html,work") strComputer = https://www.wendangku.net/doc/1718352626.html,puterName Set objComputer = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\" & _ strComputer & "\root\cimv2:Win32_https://www.wendangku.net/doc/1718352626.html,='" & _ strComputer & "'") ReturnValue = objComputer.JoinDomainOrWorkGroup(strDomain, _ strPassword, strDomain & "\" & strUser, NULL, _ JOIN_DOMAIN + ACCT_CREATE) wscript.echo "计算机加入域成功" --------------------------------------------------------------------------------------------------------------------------------- 添加打印机 DIM objShell set objShell=wscript.createObject("wscript.shell") iReturn=objShell.Run("cmd.exe /C net use \\172.20.10.14\ipc$ ""https://www.wendangku.net/doc/1718352626.html,"" /user:""print""", 0,true) Set WshNetwork = CreateObject("https://www.wendangku.net/doc/1718352626.html,work") WshNetwork.AddWindowsPrinterConnection "\\172.20.10.14\4200" WshNetwork.SetDefaultPrinter "\\172.20.10.14\4200"
VBS入门教程(初学者适用)
VBS教程（文本版） 就像多数计算机教程一样，我们从“Hello World！”程序开始我们的练习。什么？不知道是什么意思？就是说大部分的计算机程序设计教程开篇入门都是编写一个小程序，执行这个程序的结果就是在计算机的屏幕上或者dos窗口中显示一行文字：Hello World！好了，我们开始吧。 打开你的“记事本”程序，在编辑窗口填写： msgbox "Hello World!" 然后用鼠标单击“文件”菜单，单击“保存”，把“保存在”一栏设为桌面，在“文件名”一栏中填写kk.vbs，单击“保存”就可以了。然后最小化“记事本”窗口，在桌面上寻找你刚刚保存的kk.vbs，然后双击。看到弹出的对话框了没有，单击“确定”，对话框消失了。[作者：临汾市外事旅游局薛靖澜，转载请注明出处]难看了点，不过确实是你编写的第一个脚本程序。 说明之一：上面的操作中，保存位置放在桌面，仅仅是为了执行方便，你保存到其他的地方完全没有问题，只要你知道你保存在什么地方就可以了，什么？是废话，自己保存的当然知道保存在那里了。不，自己保存的文件自己找不到的人我见的多了去了。文件名你可以随意填写，不一定非要写kk，只要符合Windows的文件命名规则就可以了，但是扩展名必须是vbs，什么?不知道什么是扩展名？就是文件名中“.”后的那部分，简单说，就是vbs脚本文件命名时必须是：xxx.vbs，其中xxx你随意。 说明之二：在记事本编辑窗口中写的这行是什么意思？ Msgbox是VBS内建的函数，每一个函数都可以完成一定的功能，你只需要按照语法要求，在函数的相应部分填写相应的内容就可以了，这部分内容我们称为参数，当然函数执行的结果我们称为返回值，一个函数可以有返回值也可以没有，可以有参数也可以没有。你不用了解函数是怎么运作的，只要了解这个函数能干什么就行了。 Msgbox语法：msgbox "对话框内容", , "对话框的标题" 你不妨用记事本打开刚才的文件在编辑窗口中输入： msgbox "Hello World!" , , "系统提示" 执行一下，看看效果和位置。 说明之三：如果执行失败，看看你的标点符号，所有的标点符号必须是在英文状态下输入的。当然，这个脚本实在是太简单了，甚至连最简单的交互都没有，所以你可以把脚本这样修改一下： Dim name name=Inputbox("请输入你的名字:","名称") Msgbox name, , "您的名字是"