アプリ起動 (ID:69381)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 vbsでやるなら、ScriptControlで直接スクリプト実行って手もありです。 void ExecuteVBScript(System::String^ statement) { Type^ t = Type::GetTypeFromProgID("MSScriptControl.ScriptControl"); Object^ obj = Activator::CreateInstance(t); try { t->InvokeMember( "Language", System::Reflection::BindingFlags::SetProperty, nullptr, obj, gcnew array<Object^>{"vbscript"}); t->InvokeMember( "ExecuteStatement", System::Reflection::BindingFlags::InvokeMethod, nullptr, obj, gcnew array<Object^>{statement}); } finally { System::Runtime::InteropServices::Marshal::ReleaseComObject(obj); } } 使用例 String^ statement = "Dim excel\n" "Set excel = CreateObject(\"Excel.Application\")\n" "excel.Visible = True\n" "excel.Workbooks.Open \"c:\\test.xls\"\n" "excel.Run \"macro\"\n"; ExecuteVBScript(statement);