烟台为师教育通过率:请问在vbs中如何根据用户对MsgBox的选择而执行不同的命令?代码要如何写?

来源:百度文库 编辑:高考问答 时间:2024/04/29 10:01:33
----------------------------------------------
我想写一个关于删除数据库记录的页面,要求用户选择好要删除的记录并提交后,出现MsgBox对话框,根据用户点击"确定"或"取消"来执行删除或不删除的代码。
----------------------------------------------
望高手们能指点迷津为感!

<html>
<head>
</head>
<body>
<script language="vbscript">
sub del()
dim yesno
yesno=MsgBox("确定要删除吗?",vbYesNo,"确定删除")
Select case yesno
case 6
window.navigate("http://www.awenai.com")
case 7
history.back()
end select
end sub
</script>
<span onclick="del()">sadfjshflsjhfd</span>
<body>
</html>

if MsgBox("是否删除?",VBOkCannel,"询问")=VBOk then 删除

< html>
< body>
< script language="vbscript">
sub del()
dim yesno
yesno=MsgBox("确定要删除吗?",vbYesNo,"确定删除")
Select case yesno
case 6
window.navigate("http://baidu.com")
case 7
history.back()
end select
end sub
< /script>
< span onclick="del()">sadfjshflsjhfd< /span>
< body>
< /html>