その他 Tips
Sponsored Link

引数を渡す
2013/02/12
  受け取った引数を渡すサンプル
Option Explicit
	Dim oParam

	Set oParam = WScript.Arguments
	Call Query_Exec(oParam(0),oParam(1))

Sub Query_Exec(Param1,Param2)
	
	WScript.Echo Param1 & " " & Param2

End Sub

関連コンテンツ
 
Tweet