如何将vbscript中要输出提示信息在同一新窗口输出

[Antoinette]

<SCRIPT LANGUAGE="VBScript">
<!--
if ....then
msgbox "aaaaaaaaaaaaaaaaaaaaaa"
end if
......

if ....then
msgbox "bbbbbbbbbbbbbbbbbbbbbbb"
end if
......

-->
</SCRIPT>
没学过web，不知道如何将这些msgbox全部在一个新的IE窗口输出。

[hookee]

<SCRIPT LANGUAGE= "VBScript">   
<!--
dim win
sub btn_onclick()
   Set win = window.open("about:blank","win","")
   win.document.writeln "xxxx"
end sub
--> 
</SCRIPT>
<input type="button" name="btn" value="click">

[Antoinette]

thanks.
如何在当前窗口显示呢？最好不要把那个按钮给覆盖掉。

[toury]

【如何在当前窗口显示呢】？什么意思？把“aaaaaaaaaaaaaaaaaaaaaa ”，“bbbbbbbbbbbbbbbbbbbbbbbb”显示在本页面？

[toury]

<SCRIPT LANGUAGE= "VBScript ">
<!--
if ....then
document.getElementById("a").innerHTML="aaaaaaaaaaaaaaaaaaaaaa"
msgbox "aaaaaaaaaaaaaaaaaaaaaa "
end if
......

if ....then
document.getElementById("a").innerHTML="bbbbbbbbbbbbbbbbbbbbbbb"
msgbox "bbbbbbbbbbbbbbbbbbbbbbb "

end if
......

-->
</SCRIPT>
<div id=a></div>
<div id=b></div>
是这个意思吗？

[zdp417]

恩，学习了，
<SCRIPT LANGUAGE= "VBScript">
<!--
dim win
sub btn_onclick()
Set win = window.open("about:blank","win","")
win.document.writeln "xxxx"
end sub
-->
</SCRIPT>
<input type="button" name="btn" value="click">

[孤独剑_LPZ]

路过

[new2008man]

<SCRIPT LANGUAGE= "VBScript ">
<!--
dim win
sub btn_onclick(value)
Set win = window.open("about:blank","win","")
win.document.writeln "aaaaaaaaaaaaaaaaaaaaaa"
end sub

if ....then
msgbox btn_onclick("aaaaaaaaaaaaaaaaaaaaaa ")
end if
......

if ....then
msgbox btn_onclick("bbbbbbbbbbbbbbbbbbbbbbb ")
end if
......

-->
</SCRIPT>