1.CreateFolder創(chuàng)建文件夾

如果指定的文件夾已經(jīng)存在，則會(huì)發(fā)生錯(cuò)誤!

以下示例說明了“創(chuàng)建文件夾”方法的使用：

樣例:

Dim fso, f

Set fso = CreateObject("Scripting.FileSystemObject")激活創(chuàng)建功能

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.實(shí)例:建立一個(gè)車號(hào)記錄文檔 test

建立一個(gè)現(xiàn)實(shí)RFID讀入信息的IO域,使用變量”RFID_strVisuText1_0”

變量與RFID 讀取的DB塊相關(guān)聯(lián)

新建腳本CreateAfile

Dim MyFile 聲明變量

Dim fso,f, ts, path 聲明變量

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

變量path里寫入要存儲(chǔ)的地址是“D: est” ，文件名是變量FID_strVisuText1_0的顯示值和文件屬性.CSV

Set fso = CreateObject(“Scripting.FileSystemObject”) 標(biāo)準(zhǔn)語句

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))) 在生成的文件中寫入的內(nèi)容是系統(tǒng)時(shí)間

MyFile.Close語句結(jié)束

通過對每一臺(tái)車的記錄,形成了一個(gè)車身數(shù)據(jù)庫.

3.Int和Fix整數(shù)，固定函數(shù)

數(shù)參數(shù)可以是任何有效的數(shù)值表達(dá)式。

如果數(shù)字包含空值，則返回空值。

Int和Fix都刪除數(shù)字的小數(shù)部分，并返回結(jié)果整數(shù)值。

INT和修復(fù)之間的差異在于，如果數(shù)是負(fù)的，int返回第一負(fù)整數(shù)小于或等于數(shù)，而修復(fù)返回第一負(fù)整數(shù)大于或等于數(shù)量。例如，詮釋將-8.4轉(zhuǎn)換成-9 ，并且Fix將-8.4轉(zhuǎn)換為-8。

例如:

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

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

責(zé)任編輯：xj

原文標(biāo)題：WINCC flexible 腳本函數(shù)實(shí)例

文章出處：【微信公眾號(hào)：機(jī)器人及PLC自動(dòng)化應(yīng)用】歡迎添加關(guān)注！文章轉(zhuǎn)載請注明出處。