API 範例:指令碼的前幾行

搭配 VBScript 繫結使用 Synergy API 時,建議您從以下樣板開始。

您最好在指令碼的上方加入說明性註解。

下面會對以下五行及其功能進行概述。

Option Explicit

Option Explicit 運算式對於減少程式設計錯誤非常有用。當指令碼中包含此行時,在宣告之前使用的變數將會導致發生錯誤。

SetLocale("en-us")

SetLocale 選項會迫使非英制系統以美國的方式來解譯數值。如果未包含此設定,則會以系統的原始語言解譯數值。在用逗號取代句號的地區 (如在德國),便會發生問題。

Dim Synergy
Set Synergy = CreateObject("synergy.Synergy")

這兩行可建立 OLE 自動作業物件,此物件可啟動最近執行的 Synergy (Autodesk Simulation Moldflow 使用者介面) 版本。

註: 只有一個版本的 Synergy 可以隨時執行。
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