怎么新打开一个IE，代码有错

[nik_Amis]

HRESULT hret;
hret=CoInitialize(NULL); assert(SUCCEEDED(hret));
VARIANT_BOOL bBusy;

CLSID clsid;

hret=CLSIDFromProgID(L"InternetExplorer.Application",&clsid); assert(SUCCEEDED(hret));


IUnknown *pUnknown=0;
hret=CoCreateInstance(clsid,NULL,CLSCTX_ALL,IID_IUnknown,reinterpret_cast<void**>(&pUnknown));
assert(SUCCEEDED(hret));


IWebBrowser2 *pWeb=0; // Query for IWebBrowser2 Interface
hret=pUnknown->QueryInterface(IID_IWebBrowser2,reinterpret_cast<void**>(&pWeb));
assert(SUCCEEDED(hret));

pUnknown->Release(); // Release the interface

// Display IE full screen for 10 seconds
pWeb->put_Visible(true); // Hidden usage of Variant class!!!
pWeb->put_FullScreen(false);
BSTR bstr;
VARIANT arg;
arg.vt = VT_ERROR;
arg.scode = DISP_E_PARAMNOTFOUND;
char url[256];
// unsigned short *curl=
sprintf(url,"http://aaa/oa/launch.aspx");
ECHO(url)
pWeb->Navigate((BSTR)url, &arg, &arg, &arg, &arg);
pWeb->put_StatusBar(false);
do
{
Sleep (500);
pWeb->get_Busy (&bBusy);
}
while (bBusy);

// Sleep(10000);
pWeb->put_Visible(true); // Hidden usage of Variant class!!!
pWeb->Release();
CoUninitialize();

上面的代码能新打开一个IE，却不能Navigate到指定的页面，请问怎么修改，谢谢
或者有没有别的不用CoCreateInstance方法打开一个新的IE的办法，ShellExecute就算了

[vcmute]

不能这么强制转化((BSTR)url,
用SysAllocString或CComBStr

[蒋晟]

http://blog.joycode.com/jiangsheng/archive/2005/10/20/65489.aspx

[nik_Amis]

那位大师给个完整的代码

[goodboyws]

bstr不是那么转化的
BSTR bstr = SysAllocString(L"http://aaa/oa/launch.aspx");
pWeb->Navigate(bstr , &arg, &arg, &arg, &arg);

[nik_Amis]

ShellExecute的方法不要

[N_thread]

ShellExecute(NULL,NULL,"http://www.nnu.edu.cn", NULL, NULL,SW_SHOWNORMAL);