スクリプト間でのパラメータの作成と受け渡し

1. ファイル > 新規作成 を選択します。
   資産の新規作成 ダイアログ ボックスが開きます。
2. [資産の種類] リストから .NET スクリプト を選択し、資産名 テキスト ボックスにスクリプトの名前を入力します。
   

   たとえば、スクリプトに「NameParameters」という名前を付けることができます。

3. OK をクリックして、スクリプトを保存します。 Silk Test Workbench によってスクリプトが資産として保存され、スクリプト テンプレートが表示されます。
4. 作成して子スクリプトに渡すパラメータが含まれるように、Main() サブを変更します。 たとえば、以下の親スクリプトは、テスト アプリケーションで姓名の文字列を渡します。

   Public Sub Main()
               Dim args As New Dictionary(Of String, Object)
               args("FName") = "Chris"
               args("LName") = "Smith"           
   

5. 子スクリプトの呼び出しと作成したパラメータの名前指定を行う、RunScript コマンドを組み込みます。 たとえば、以下の親スクリプトは、テスト アプリケーションで姓名の文字列を渡し、childscript という名前の子スクリプトを args というパラメータを使用して呼び出します。

   Public Module Main
         Dim _desktop As Desktop = Agent.Desktop
   
         Public Sub Main()
               Dim args As New Dictionary(Of String, Object)
               args("FName") = "Chris"
               args("LName") = "Smith"
               
               Workbench.RunScript("childscript", args)
   
         End Sub
   End Module
   

MsgBox("Hello, " + args("FName") + "!")
MsgBox ("Hello, " + args("FName") + " " +  args("LName") + "!")

Imports SilkTest.Ntf.XBrowser
Public Module Main
	Dim _desktop As Desktop = Agent.Desktop

	Public Sub Main()
		With _desktop.BrowserWindow("/BrowserApplication[1]//BrowserWindow")
			.DomButton("@id='login-form:signup'").Select()
			.DomTextField("@id='signup:fname'").SetText("first")
			.DomTextField("@id='signup:lname'").SetText("last")
	  .DomElement("@src='http://extjs.com/s.gif'").DomClick(MouseButton.Left, 
     New Point(8, 16))
			.DomButton("@textContents='Today'").Select()
			.DomTextField("@id='signup:email'").SetText("test@test1.com")
			.DomTextField("@id='signup:street'").SetText("123 street rd")
			.DomTextField("@id='signup:city'").SetText("Marlton")
			.DomListBox("@id='signup:state'").Select("Massachusetts")
			.DomTextField("@id='signup:zip'").SetText("09876")
			.DomTextField("@id='signup:password'").SetText("test")
			.DomButton("@id='signup:signup'").Select()
			.DomButton("@id='signup:continue'").Select()
		End With
		
	End Sub
End Module