文字链接

来源：百度知道 编辑：UC知道 时间：2024/09/22 12:37:26
点击一个文字链接，
就弹出一个对话框.
点是就进入1.htm页面
点否就进入2.htm页面
- -我说的是
<script language=vbscript>

<html>
<body>
<script language=vbscript>
sub LJ()
dim yesno
yesno = msgbox("点是就进入1.htm页面,点否就进入2.htm页面",vbYesNo,"是否")
Select case yesno
case 6
window.navigate("1.htm")
case 7
window.navigate("2.htm")
end select
end sub
</script>
<span onclick="LJ()">点击链接</span>
</body>
</html>