JAVASCRIPT与VBSCRIPT怎么交互使用?最好能举例说明!谢谢

Question

可以交互使用的比如你用vbscript写了一个sub你可以在javascript中调用它!
sub A
''.....
end sub
<p onclick="A()">sdfsdf</p>
如此

Answer 1

<script language=javascript><!--
/*@cc_on @*/
/*@if (@_win32 && @_jscript_version>=5)
function window.confirm(str)
{
    str=str.replace(/\'/g, "'&chr(39)&'").replace(/\r\n|\n|\r/g, "'&VBCrLf&'");
    execScript("n = msgbox('"+ str +"', 289, 'confirm')", "vbscript");
    return(n == 1);
}
@end @*/
alert(confirm('1.\'第一行\';\r\n2.第二行;\r\n'));
// --></script>

Answer 2

<% dim aa
aa = Request.QueryString("formname") %>
<script>
alert("<%=aa%>");
</script>

Answer 3

同一个页面的js和vbs脚本块可以互相调用函数,共有变量,甚至vbs可以调用js的对象以及对象的成员
<script language=javascript>
<!--
function test(){
this.value = "test"
}
var obj = new test();
//-->
</script>
<script language=vbscript>
<!--
msgbox obj.value
//-->
</script>

Answer 4

<script language="javascript">
    var BoolJs = false ;
</script>
<script language="vbscript">
    if BoolJs = true then msgbox "這是一個測試 ... ..."
</script>