• 添加示例代碼到“Write_data”腳本中。
  
  注意:
  關(guān)于不同 VBScript 命令的更多信息，請參見 WinCC flexible 幫助。

源代碼的說明：
在 <行 10> 中聲明的變量只在腳本內(nèi)部有效。在 <行 12> 中的變量“bExtension”是一個全局變量，可以在整個 WinCC flexible 項目中使用。使用該變量，可以通過符號 IO 域選擇包含文件名稱和擴展名的路徑。

        如果腳本發(fā)生運行時錯誤，那么“On Error Resume Next”語句是必需的。只要發(fā)生這種錯誤，該錯誤程序的下一條語句能自動執(zhí)行。

        在 <行 24> 中的語句將訪問 Windows 文件系統(tǒng)的對象傳送到對象變量“f”。如下源代碼包含運行時錯誤處理程序。如果運行時發(fā)生錯誤，將會在消息窗口中輸出錯誤消息并終止腳本的運行。

注意：
        如果使用“FileCtl.File”，將不能訪問 Windows CE 文件系統(tǒng)。如果在使用其它操作系統(tǒng)的面板上運行該腳本，將會出現(xiàn)運行時錯誤。

圖 06

• file.Open Path name, Mode, [access], [lock], [reclength]

如果文件或路徑名稱不存在，則如上提到的錯誤處理程序?qū)?zhí)行。

的字符串將被“f”對象的“LinePrint”方法寫入已打開的文件中。在此，變量值也被傳送和保存。

注意：
如果欲為文本字符串保存時間戳，可以使用 Now 函數(shù)。

示例：
f.LinePrint( Now & "; material; " & szMaterial & ";")

然后使用“Close”方法關(guān)閉該文件。關(guān)鍵字“Nothing” 用于分離對象變量，該變量由“Set”命令分配給該對象。

*一條語句傳輸用戶自定義的系統(tǒng)消息到 HMI 消息系統(tǒng)。

圖 07

• 將 WinCC flexible 工程傳輸?shù)讲僮髅姘宀舆\行。
  
  注意：
  為了調(diào)試腳本，啟動帶腳本調(diào)試器的 WinCC flexible 運行系統(tǒng)。
   
• 預(yù)設(shè)不同的數(shù)值并輸入期望的材料名稱。
• 然后單擊“Save data”按鈕。
• 在符號 IO 域選擇“.csv”并再次點擊按鈕。
• 終止操作面板的運行。

圖 08

• 打開擴展名為“.txt”的文本文件。
• 然后關(guān)閉文件。

圖 09

• 可以使用 Microsoft Excel 打開擴展名為“.csv”的文件。
• 關(guān)閉 Excel 程序。

圖 10

• 通過單擊“項目 > 新建...”，并選擇“Multi Panels > MP 370 12" Touch”操作面板，創(chuàng)建新項目。

• 通過“項目 > Operator Panel_1 > 通訊 > 變量”打開變量編輯器。
• 添加如下名稱的3個內(nèi)部變量：
   

  序號	變量	數(shù)據(jù)類型
  1	szString_1	String
  2	nValue_1	Int
  3	nValue_2	Int

  表 03 - 變量
  
  注意：
  如果不使用先前的項目，需要添加一個“Bool”變量“bExtension”。

圖 11

• 添加一個矩形 - 見圖 12。
• 如果沒有，放置一個符號 IO 域和三個普通 IO 域。
• 擴大 WinCC flexible 畫面，添加 1 個按鈕和 4 個文本域。
• 如圖 12  所示布局所有對象并輸入如下文字：
  “Value_1:”
  “Value_2:”
  “String_1:”
  “Text file:”
  “Settings” (如果沒有)
  “Extension:” (如果沒有)
• 若尚未創(chuàng)建文本列表，則創(chuàng)建一個文本列表，命名為“Extension”，并含有如下條目：
  0 =>  “.txt”
  1 =>  “.csv”

圖 12

• 創(chuàng)建一個腳本，名稱為“Read_data”。為此在項目樹中單擊“腳本 > 添加腳本”。
• 鏈接如下變量和新創(chuàng)建的腳本到相關(guān)的對象上：
   

  變量/腳本	對象	對象用于...
  nValue_1	IO field	Value_1
  nValue_2	IO field	Value_2
  szString_1	IO field	String_1
  bExtension*)	Symbolic IO field	Extension
  Read_data	Button	Read data

  表 04 - 鏈接到不同對象
  ^{*)這些鏈接僅當(dāng)沒有為存儲文件做過配置時是必需的。}
   
• 將文本列表“Extension”連接到符號 IO 域，若尚未作此操作(也可參見圖 05)。

圖 13

• 添加示例代碼到“Read_data”腳本中。
  
  注意：
  關(guān)于不同 VBScript 命令的更多信息，請參見 WinCC flexible 幫助。

源代碼的說明：
腳本中聲明的所有變量只在腳本內(nèi)部有效。使用符號 IO 域，通過在腳本 <行 17> 中的變量“bExtension”，可以選擇包含文件名稱和擴展名的路徑。

       如果腳本發(fā)生運行時錯誤，那么“On Error Resume Next”語句是必需的。只要發(fā)生這種錯誤，只要發(fā)生這種錯誤，該錯誤程序的下一條語句能自動執(zhí)行。

       在 <行 24> 中的語句將訪問 Windows 文件系統(tǒng)的對象傳送到對象變量“f”。如下源代碼包含運行時錯誤處理程序。如果運行時發(fā)生錯誤，將會在消息窗口中輸出錯誤消息并終止腳本的運行。

注意：
        如果使用“FileCtl.File”，將不能訪問 Windows CE 文件系統(tǒng)。如果在使用其它操作系統(tǒng)的面板上運行該腳本，將會出現(xiàn)運行時錯誤。

圖 14

• file.Open Path name, Mode, [access], [lock], [reclength]

如果文件無法打開，則如上提到的錯誤處理程序?qū)?zhí)行，從而安全地終止腳本運行。

使用“Do-While-Loop”語句，通過對象變量“f”的“LineInputString”方法，當(dāng)循環(huán)執(zhí)行時，可以一行一行地讀出文本文件中的內(nèi)容。一旦到達文本文件末尾循環(huán)就被終止。

函數(shù)“Split”以分隔符來分離從文件中讀取的文本行()，該分隔符作為第二個可選參數(shù)。分離后的內(nèi)容被傳送到一個一維數(shù)組。本例中沒有使用*兩個參數(shù)。

• Split(Expression[,delimiter[,Number[,compare]]])

因為當(dāng)保存時，可能包含空字符串(例如，參見圖 09)，這些字符串通過“Replace”函數(shù)來刪除。因此，前三個參數(shù)必須。*個參數(shù)包含字符串 () ，對該字符串執(zhí)行搜索(SearchCS) ，搜索到的字符被替換為由參數(shù)“ReplaceWith”的字符。

• Replace(Expression, find, replace with [,Start[,Number[,Compare]]])

圖 15

示例 - HiField (a, b)的結(jié)構(gòu)和內(nèi)容：

數(shù)組		b
		0	1	2
a	0	"material"	"Steel"	""
	1	"pressure"	"12"	"mbar"
	2	"temperature"	"56"	"°C"

表 05 - 二維數(shù)組內(nèi)容實例

打開的文件在 <行 62> 被關(guān)閉。關(guān)鍵字“Nothing” 用于分離對象變量，該變量由“Set”命令分配給該對象。

*一條語句傳輸用戶自定義的系統(tǒng)消息到 HMI 消息系統(tǒng)。

圖 16

• 將 WinCC flexible 項目傳送到操作面板并啟動運行。
  
  注意：
  為了調(diào)試腳本，啟動帶腳本調(diào)試器的 WinCC flexible 運行系統(tǒng)。
   
• 然后點擊“Read data”按鈕。
• 在符號 IO 域中選擇“.csv”并再次點擊按鈕。
• 中止操作面板的運行。

圖 17