3,245
社区成员
发帖
与我相关
我的任务
分享
BOOL ret=CreateProcess(
NULL,
"c://program files//internet explorer//iexplore.exe http://www.baidu.com",
NULL,
NULL,
FALSE,
CREATE_NEW_CONSOLE,
NULL,
NULL,
&si,
&pi);
if(0==::WaitForInputIdle(pi.hProcess,INFINITE))
{
// HWND hWnd=::FindWindow(_T("IEFrame"),NULL);
HWND w=::FindWindowEx(NULL,NULL,_T("IEFrame"),NULL);
while(w)
{
DWORD pid=0;
::GetWindowThreadProcessId(w,&pid);
char pText[128];
::GetWindowText(w,pText,128);
if(pi.dwProcessId==pid)
{
Sleep(5000);
::SendMessage(w,WM_CLOSE,0,0);
break;
}
w=::FindWindowEx(NULL,w,_T("IEFrame"),NULL);
}
if (SUCCEEDED(OleInitialize(NULL)))
{
IWebBrowser2* pBrowser2;
CoCreateInstance(CLSID_InternetExplorer, NULL, CLSCTX_LOCAL_SERVER,
IID_IWebBrowser2, (void**)&pBrowser2);
if (pBrowser2)
{
VARIANT vEmpty;
VariantInit(&vEmpty);
BSTR bstrURL = SysAllocString(L"http://microsoft.com");
HRESULT hr = pBrowser2->Navigate(bstrURL, &vEmpty, &vEmpty, &vEmpty, &vEmpty);
if (SUCCEEDED(hr))
{
pBrowser2->put_Visible(VARIANT_TRUE);
}
else
{
pBrowser2->Quit();
}
SysFreeString(bstrURL);
pBrowser2->Release();
}
OleUninitialize();
}