<%
Dim mavariable_string_asp, mavariable_int_asp
mavariable_string_asp = "Ceci est un test"
mavariable_int_asp = 50
%>

<script type="text/javascript">
var mavariable_string_javascript = "<% Response.Write mavariable_string_asp %>" ;
var mavariable_int_javascript = <% Response.Write mavariable_int_asp %> ;
</script>

<%
Dim montab_asp ' déclaration de la variable qui va recevoir le tableau vbscript
montab_asp = Array("élément 1", "élément 2", "élément 3") ' définition du tableau
%>

<script type="text/javascript">
var montab_javascript = new Array ; { déclaration de la variable tableau javascript}
<%
Dim cpt ' déclaration de la variable qui va servir à incrémenter le tableau javascript et à parcourir le tableau asp
For cpt=0 to Ubound(montab_asp) ' Ubound(montab_asp) renvoit la limite sup du tableau
%>
  montab_javascript[<%= cpt %>] = "<%= montab_asp(cpt) %>" ;
<%
Next
%>
</script>