wincc VBS問題
劉玉蓉
發(fā)布于2014-11-21 17:14
165
0
標簽:
Dim vbbb
Set vbbb=CreateObject("wscript.shell")
vbbb.Run "C:\WINDOWSsystem32calc.exe"
Set vbbb=Nothing
可以打開程序cale.exe,現(xiàn)在我想在wincc預先判斷這個程序是否打開,求相關代碼。
佳答案
提供用C的思路, 就是查找程序的窗口有沒有在計算機窗口已經(jīng)顯示,如果沒有則激活,有則不激活
HWND h=NULL;
h=FindWindow(NULL,"計算器"); //查找標題為“計算器”的窗口
if (h==0) //如果沒找到,那么打開計算器程序
{ ProgramExecute("calc");
h=FindWindow(NULL,"計算器");
}
ShowWindow(h, SW_NORMAL);