WINCC flexible脚本函数实例

1.CreateFolder 创建文件夹

如果指定的文件夹已经存在，则会发生错误!

以下示例说明了“创建文件夹”方法的使用：

样例:

Dim fso, f

Set fso = CreateObject("Scripting.FileSystemObject")  激活创建功能

Set f = fso.CreateFolder("c:New Folder") 建立文件New Folder

reateFolderDemo= f.Path

事例:

Dim fso, f 

Set fso = CreateObject("Scripting.FileSystemObject") 

Set f = fso.CreateFolder("C:UserszsDesktopNew Folder") 

2.实例:建立一个车号记录文档 test

建立一个现实RFID读入信息的IO域,使用变量”RFID_strVisuText1_0”

变量与RFID 读取的DB块相关联

新建脚本CreateAfile

Dim MyFile             声明变量

Dim fso,f, ts, path     声明变量

path =“D: est” & SmartTags(“Detail_RFIDRFID_strVisuText1_0”) & “_”  & “.csv”        写入变量信息

变量path里写入要存储的地址是“D: est” ，文件名是变量FID_strVisuText1_0的显示值和文件属性.CSV

Set fso = CreateObject(“Scripting.FileSystemObject”)  标准语句

Set MyFile = fso.CreateTextFile (path,True)    启用生成文件

MyFile.WriteLine(“time :;” & CStr(DatePart(“h”,Time))&“:” & CStr(DatePart(“n”,Time))& “:” & CStr(DatePart(“s”,Time))&“ ” & CStr(DatePart(“d”,Date))& “.” & CStr(DatePart(“m”,Date))& “.” & CStr(DatePart(“yyyy”,Date)))      在生成的文件中写入的内容是系统时间

MyFile.Close   语句结束

通过对每一台车的记录,形成了一个车身数据库.

3. Int和Fix   整数，固定函数

数参数可以是任何有效的数值表达式。

如果数字包含空值，则返回空值。

Int和Fix都删除数字的小数部分，并返回结果整数值。

INT和修复之间的差异在于，如果数是负的，int返回第一负整数小于或等于数，而修复返回第一负整数大于或等于数量。例如，诠释将-8.4转换成-9 ，并且Fix将-8.4转换为-8。

例如: 

MyNumber = Int(99.8) ' Returns 99. MyNumber = Fix(99.2) ' Returns 99.

 

MyNumber = Int(-99.8) ' Returns -100.

责任编辑：xj

原文标题：WINCC flexible 脚本函数实例

文章出处：【微信公众号：机器人及PLC自动化应用】欢迎添加关注！文章转载请注明出处。