JS是可以访问VBS的数组的,new VBArray(vbArray)即可生成一个对象用来访问VB数组,可以参考以下: <html> <Body> <SCRIPT LANGUAGE="vbscript"> <!-- Function createArray() Dim vbarr(9) Dim i For i = 0 To 9 vbarr(i) = i*i Next createArray = vbarr End Function --> </SCRIPT><SCRIPT LANGUAGE="javascript"> <!-- document.write("Use safe Array<br>"); var safeArray = new VBArray(createArray()); for(var i = 0; i < safeArray.ubound(); i++){ document.write(safeArray.getItem(i)); document.write("<br>"); } document.write("Use js Array<br>"); var jsArray = safeArray.toArray(); for(var i = 0; i < jsArray.length; i++){ document.write(jsArray[i]); document.write("<br>"); } --> </SCRIPT> </BODY> </html>
<html>
<Body>
<SCRIPT LANGUAGE="vbscript">
<!--
Function createArray()
Dim vbarr(9)
Dim i
For i = 0 To 9
vbarr(i) = i*i
Next
createArray = vbarr
End Function
-->
</SCRIPT><SCRIPT LANGUAGE="javascript">
<!--
document.write("Use safe Array<br>");
var safeArray = new VBArray(createArray());
for(var i = 0; i < safeArray.ubound(); i++){
document.write(safeArray.getItem(i));
document.write("<br>");
}
document.write("Use js Array<br>");
var jsArray = safeArray.toArray();
for(var i = 0; i < jsArray.length; i++){
document.write(jsArray[i]);
document.write("<br>");
}
-->
</SCRIPT>
</BODY>
</html>
<% redim test(100)
for i=0 to ubound(test)-1
response.write "arr["+i+"]="""+test(i)+""";"
next%><script>