<script language="vbscript"> function conf(str) dim ss ss = MsgBox (CStr(str),257,"标题") if ss = 1 then conf = "true" else conf = "false" end function </script><script language=javascript> function window.confirm(s) { if(conf(s) == "true")return true; else return false; }alert(confirm("ok")); </script>
<script language=javascript> function window.confirm(str) { execScript('s = msgbox("'+str+'",257,"标题")','vbscript') return s == 1; }alert(confirm("ok")); </script>
function conf(str)
dim ss
ss = MsgBox (CStr(str),257,"标题")
if ss = 1 then conf = "true" else conf = "false"
end function
</script><script language=javascript>
function window.confirm(s)
{
if(conf(s) == "true")return true;
else return false;
}alert(confirm("ok"));
</script>
function window.confirm(str)
{
execScript('s = msgbox("'+str+'",257,"标题")','vbscript')
return s == 1;
}alert(confirm("ok"));
</script>