SHELLEXECUTEINFO shei;
shei.cbSize=sizeof(shei);
shei.fMask = SEE_MASK_INVOKEIDLIST;
shei.lpFile = _T("explore.vbs");//假设这个VB脚本程序名字叫explore.vbs
shei.lpVerb = _T("open");
ShellExecute(NULL,shei.lpVerb,shei.lpFile,_T(""),_T(""),SW_SHOW);