请教如何用VBS编写屏蔽IE右键,以窗口模式打开IE

xykot

<script language="JavaScript">
<!--
var ftr = "status=no,scrollbars=yes,resizable=yes,menubar=no,**=no,titlebar=no";
window.open(" http://www.qq.com","啊",ftr);

//-->
</script>

以上代码是JAVA的，保存为 html 后缀名即可打开，我用IE7但是打开的时候总是提示拦截，所以想请教下各位如果用VBS脚本达到同样目的，要怎么编写呢？
我就是想以窗口模式打开指定的网页，然后屏蔽右键使用，达到效果就是让别人不知道该网页地址是什么，但不影响使用！ 诚心求教，谢谢！

xykot

set http=createobject("Microsoft.XMLHTTP")
http.open "get","http://www.qq.com",false
http.send
w=zhuanghuan(Http.responsebody)
http.open "get","http://www.qq.com",false
http.send
h=zhuanghuan(Http.responsebody)
Function zhuanghuan(vIn)
    strReturn = ""
    For i = 1 To LenB(vIn)
        ThisCharCode = AscB(MidB(vIn,i,1))
        If ThisCharCode < &H80 Then
            strReturn = strReturn & Chr(ThisCharCode)
        Else
            NextCharCode = AscB(MidB(vIn,i+1,1))
            strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
            i = i + 1
        End If
    Next
    zhuanghuan = strReturn
End Function
Set http=Nothing
Set Objie=CreateObject("InternetExplorer.application")
Objie.Visible=True
Objie.Navigate "http://www.qq.com"
Objie.menubar=0
Objie.AddressBar=1
Objie.ToolBar=0
Objie.StatusBar=0
Objie.Resizable=1
Objie.height=h
Objie.width=w
Set Objie=Nothing


以上VB脚本打开的效果显示是 窗口模式的，但是打开速度太慢了，而且点击内容时会弹出另一个窗口,另一个窗口还是会显示出IE地址栏,我要怎么设置让它每次打开都在同一个页面呢?