API の例: スクリプトの最初の行

次のテンプレートは、VBScript バインディング (開始宣言) で Synergy API を使用するために推奨する記述開始ポイントです。

スクリプトの上部には説明コメントを入れることをお勧めします。

次の 5 つの行とその機能の概要を説明します。

Option Explicit

Option Explicit 文はプログラミング エラーを低減するのに効果的です。この行がスクリプトに含まれている場合で、その宣言がされる前に変数が使われた場合はエラーが発生します。

SetLocale("en-us")

SetLocale オプションは、英語以外のシステムに US(アメリカの)システムとして数値を認識させます。この設定が含まれていない場合、数値はそのシステムのネイティブ言語で認識されます。これは、ピリオドの代わりにコンマが使用される国 (ドイツなど) では問題になります。

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

これら 2 行は、最後に実行された Synergy (Autodesk Simulation Moldflow ユーザー インターフェース)のバージョンを開始する OLE オートメーション オブジェクトを作成します。

注: Synergy のバージョンは一度につき 1 つのバージョンのみ開くことができます。
Synergy.SetUnits "METRIC"

既定で US 単位系を使用するには、"METRIC" の代わりに "ENGLISH" を使用します。 

'@
'@ 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
親トピック: 例