一。客户端 To 客户端
1.VBS To JS
dim jstovbs
jstovbs="jstovbs"
document.writeln("我是VBS:" & jstovbs)
</script>
<br />
<script language="javascript" type="text/javascript">
document.writeln("我是JS:" + jstovbs); //这里的jstovbs变量,是在VBS中定义并赋值的
</script>
2.JS To VBS
var jstovbs="jstovbs";
document.writeln("我是JS:" + jstovbs);
</script>
<br />
<script language="vbscript" type="text/vbscript">
document.writeln("我是VBS:" & jstovbs) //这里的jstovbs变量,是在JS中定义并赋值的
</script>
二。服务器端 To 客户端
1.VBS To JS
<%
Dim vbstojs
vbstojs="vbstojs"
%>
<script language="javascript" type="text/javascript">
var js='<%=vbstojs%>';
document.writeln("我是JS:" + js);
</script>
2.JS To VBS
<%
var jstovbs="jstovbs"
%>
<script language="vbscript" type="text/vbscript">
dim vbs
vbs="<%=jstovbs%>"
document.writeln("我是VBS:" & vbs)
</script>
三。客户端 To 服务器端
1.VBS To JS
参见2
2.JS To VBS
(1) cookies (同一页面提交、接收,需要刷新)
function setCookie(name,value,expires,path,domain,secure)
{
var myCookie = name + "=" + encodeURIComponent(value);
if (expires)
{
myCookie += "; expires=" + expires.toGMTString();
}
if (path)
{
myCookie += "; path=" + path;
}
if (domain)
{
myCookie += "; domain=" + domain;
}
if (secure)
{
myCookie += "; secure";
}
document.cookie = myCookie;
}
setCookie('jstovbs','jstovbs cookies',false,false,false,false);
</script>
<%
Dim vbs
vbs=Request.Cookies("jstovbs")
Response.Write(vbs)
%>
(2) 自动提交 (Get方式,两个页面)
A. JS.html (客户端)
//可以定义一个函数,在需要时自动提交
location.href = "ASP.asp?jstoasp=此变量由客户端JS传递而来";
</script>
B. ASP.asp (服务器端)
Dim vbs
vbs = Request.QueryString("jstoasp")
Response.Write(vbs)
%>