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自动化应用】欢迎添加关注！文章转载请注明出处。