请教高手，在CB中打开IE怎么解决这个异常"Variant does not reference an automation object"

请教高手，在CB中打开IE怎么解决这个异常：
       "Variant does not reference an automation object"
      代码如下：
        Variant all_IE;
        my_IE = Variant::CreateObject("InternetExplorer.Application");
        my_IE.OlePropertySet("Visible",(Variant)true);
        all_IE =my_IE.OlePropertyGet("      ");--我知道要通过该语句得到一个引用，但不知该写什么，请大家帮帮忙！
        Procedure Open("Open");
        all_IE.Exec(Open <<"E:\图片2\computer\computer1.htm");

4 个解决方案

#1

OleInitialize(NULL);
OleUninitialize();

#2

用这段
OleInitialize(NULL);
OleUninitialize();
取代all_IE =my_IE.OlePropertyGet(" “）就可以了是么？

#3

程序执行到
Procedure Open("Open");
还是会报以下的错误：Methed "Open" not supported by automation object.
请问是什么原因？

#4

要用IE打开指定网页，如下即可：
ShellExecute(0, "Open", "E:\\图片2\\computer\\computer1.htm", NULL, NULL, SW_SHOW);

#1