关于BHO技术,截获Navigation2方法后，用什么方法跳到新的地址???(60分)

例如
在IE地址栏中输入 一任何地址，均转换到 http://www.yahoo.com.cn 我试着调用
IDispatch 的 Translate方法，不行。调用 ShellExecute 执行. IE over 掉了！
请问高手，该如何实现，

直接调Iwebbrowser2的Navigation2

procedure DoBeforeNavigate2(const pDisp: IDispatch
var URL: OleVariant
var Flags: OleVariant
var TargetFrameName: OleVariant
var PostData: OleVariant
var Headers: OleVariant
var Cancel: WordBool);
var
UrlEnable :boolean;
TempURL :string;
begin
TempURL :=URL;

if not CheckUrl(TempURL) then exit;

UrlEnable :=false;
if Pos(LowerCase('szwnx.com'), LowerCase(TempURL))>0 then UrlEnable :=true ;
if Pos(LowerCase('szgky.com'), LowerCase(TempURL))>0 then UrlEnable :=true ;

if not UrlEnable then
begin
ShowMessage('受限制的站点,请与管理员联系!');
Cancel:=True;
URL:='http://www.szgky.com';
(pDisp as IWebbrowser2).Navigate2(URL,Flags,TargetFrameName,PostData,Headers);
end;
end;

//if not CheckUrl(TempURL) then exit;//注释掉

谢谢！验证一下！可以的话马上发分！

谢谢！