19.07.2014 Views

e-TEST suite 入門 - エンピレックス

e-TEST suite 入門 - エンピレックス

e-TEST suite 入門 - エンピレックス

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

e-Tester チュートリアル<br />

DLL へのアクセス<br />

ここでは、 登 録 された COM DLL 内 のメソッドにアクセスする 方<br />

法 を 説 明 します。この 例 では、Empirix Utilities の Random メソッド<br />

にアクセスし、 結 果 ウィンドウとログの Summary カラムに randam<br />

day を 生 成 します。<br />

1. Visual Script の [2] Kitchens - Home SuperStores ページを 展 開 し<br />

ます。<br />

2. カスタム ページ プログラム ノードを 選 択 し、マウスの 右 ボタンをク<br />

リックします。<br />

3. [VBA コードの 編 集 ] を 選 択 します。e-Tester から VBA 開 発 環 境 が<br />

開 き、ページのコード ウィンドウが 表 示 されます。<br />

4. [ツール] [ 参 照 設 定 ] を 選 択 し、EmpirixUtilities を 選 択 します。<br />

5. [OK] をクリックします。<br />

6. 以 下 のコードを、 RSWVBAPage オブジェクトの afterPlay イ<br />

ベントに 入 力 します。<br />

Dim m_util As EmpirixUtilities.Random<br />

Set m_util = New EmpirixUtilities.Random<br />

Dim rday As String<br />

rday = m_util.randomDay()<br />

Call RSWApp.WriteToLog("", "", rday)<br />

Set m_util = Nothing<br />

75

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!