<< 前へ        次へ >>

ID : 1513

書式サンプル1

NetwoRCプロバイダを使用し、PACプログラムの開始を行う例を示します。

Task.pcs

'!TITLE "Task"

Sub Main 

	Dim g_ctrl as Object	' CaoControllerオブジェクト用
	Dim g_task as Object	' CaoTaskオブジェクト用

	' 接続
	g_ctrl = cao.AddController("RC", "CaoProv.DENSO.NetwoRC",
					 "", "conn=eth:10.6.235.60")

	' Taskの生成
	g_task =  g_ctrl.AddTask("Pro1", "")

	' Taskの開始
	g_task.Start 2


	' 切断
	g_ctrl.Tasks.Remove g_task.Index
	g_task = Nothing
	cao.Controllers.Remove g_ctrl.Index
	g_ctrl = Nothing

End Sub

解説

接続と切断は、RC7Mコントローラの変数値の取得、設定の場合と同じです。

まず、CaoControllerオブジェクトのAddTaskメソッドでcaoTaskオブジェクトを生成し、次にCaoTaskオブジェクトのStartメソッドでTaskを開始します。

上の例では、プログラムPro1のTaskを開始します。

AddTaskメソッドの詳細は、「NetwoRCプロバイダ ユーザズガイド」の「4.2.5.CaoController::AddTaskメソッド」の項を参照してください。

Startメソッドについての詳細は、「NetwoRCプロバイダ ユーザズガイド」の「4.2.42.CaoTask::Startメソッド」の項を参照してください。

ID : 1513

<< 前へ        次へ >>