请问这段asp代码怎么改成vbscript的?

特急特急,请帮我改一下连接的代码和清除的连接代码

我点了文字的"点一下"连接之后,,变成只能跳出一次msgbox了,

好像会被刷掉,不能隔两秒跳出来了,急急急.

改成文字的连接就可以了.

<script language="vbscript">

dim a1,b2

sub aa()

msgbox("欢迎")

a1=setTimeout("aa()", 2000,"vbscript")

end sub

sub bb()

cleartimeout(a1)

end sub

</script>

<p align=center>

<a href="http://127.0.0.1/l.asp" onclick="aa()">点一下</a>

<a href="http://127.0.0.1/l.asp" onclick="bb()">清除</a>

</p>

<script language="vbscript">

dim a1,b2

sub aa()

msgbox("欢迎")

a1=setTimeout("aa()", 2000,"vbscript")

aa()

end sub

sub bb()

cleartimeout(a1)

end sub

</script>

<p align=center>

<a href="" onclick="aa()">点一下</a>

<a href="" onclick="bb()">清除</a>

</p>

• ·高一物理
• ·PHOTO SHOP
• ·翻译句子
• ·急求神界男人类攻略！
• ·老婆让我选择家庭和工作，到底哪个重要？
• ·注册完域名后怎么样使用啊？
• ·成都中医药大学06，05，04年针灸推拿在川的
• ·请高手帮忙翻一下，用翻译软件者免进，急！！！{
• ·一只猪以一百八十迈的速度向前奔去，“梆及”一下
• ·黄的五笔码是多少