JS與VBS傳遞變量

一。客戶端 To 客戶端

1.VBS To JS

 

<script language="vbscript" type="text/vbscript">
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

 

<script language="javascript" type="text/javascript">
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

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<%
Dim vbstojs
vbstojs="vbstojs"
%>

<script language="javascript" type="text/javascript">
var js='<%=vbstojs%>'; 
document.writeln("我是JS：" + js); 
</script>

 

2.JS To VBS

 

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>

<%
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 (同一頁面提交、接收，需要刷新)

<script language="javascript" type="text/javascript">
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 (客戶端)

 

<script language="javascript" type="text/javascript">
//可以定義一個函數，在需要時自動提交
location.href = "ASP.asp?jstoasp=此變量由客戶端JS傳遞而來";
</script>

 

B. ASP.asp (服務器端)

 

<%
Dim vbs
vbs = Request.QueryString("jstoasp")
Response.Write(vbs)
%>