搭配 VBScript 繫結使用 Synergy API 時,建議您從以下樣板開始。
您最好在指令碼的上方加入說明性註解。
下面會對以下五行及其功能進行概述。
Option Explicit
Option Explicit 運算式對於減少程式設計錯誤非常有用。當指令碼中包含此行時,在宣告之前使用的變數將會導致發生錯誤。
SetLocale("en-us")
SetLocale 選項會迫使非英制系統以美國的方式來解譯數值。如果未包含此設定,則會以系統的原始語言解譯數值。在用逗號取代句號的地區 (如在德國),便會發生問題。
Dim Synergy Set Synergy = CreateObject("synergy.Synergy")
這兩行可建立 OLE 自動作業物件,此物件可啟動最近執行的 Synergy (Autodesk Simulation Moldflow 使用者介面) 版本。
Synergy.SetUnits "METRIC"
依預設,會用 "ENGLISH" 取代 "METRIC",以便使用美國單位。
'@ '@ DESCRIPTION '@ '@ '@ SYNTAX '@ TheFirstLines '@ '@ PARAMETERS '@ none '@ '@ DEPENDENCIES/LIMITATIONS '@ none '@ '@ History '@ Created DRA 9/8/2006 '@@ Option Explicit SetLocale("en-us") Dim Synergy Set Synergy = CreateObject("synergy.Synergy") Synergy.SetUnits "METRIC" ' ' Put remainder of code here. ' MsgBox "Script Complete" Wscript.Quit