请问window.createPopup创建的窗口如何实现关闭呢,
<html>
<head />
<body>
<script language="vbscript">
dim imagewidth,imageheight,speed,poptext,x,y,oPopup,oPopupBody,pop_TC,startani_A
mypop
function mypop()
imagewidth=218
imageheight=98
speed=40
poptext="<a onclick='window.close()'>关闭</a>"
x=screen.width-imagewidth
y=0
set oPopup = window.createPopup()
set oPopupBody = oPopup.document.body
oPopupBody.style.cursor="hand"
oPopupBody.innerHTML = poptext
pop_TC=200
'oPopup.document.body.onclick=kk()
pop( )
end function
function pop( )
if pop_TC=200 then
oPopup.show x,y,imagewidth, imageheight
end if
startani_A=setTimeout("pop",100)
if pop_TC<0 then
dismisspopup()
end if
pop_TC=pop_TC-1
end function
function dismisspopup()
clearTimeout startani_A
oPopup.hide()
end function
function kk()
oPopup.hide()
end function
</script>
</body>
</html>
poptext="<a onclick='window.close()'>关闭</a>"
这样关闭又有提示关闭框