<script language="javascript" >
<!--
var qwe=new Array(5)
<% dim i as integer=0 %>
<% for i=0 to 5 %>
qwe["<%= i %>"]= "<%=qw(i)%>";//qw()为在VB下定义的数组，0-5
window.alert (qwe["<%= i %>"])
<% next i %>
-->
</script>

网络上查找没有此类帮助，经过自己苦思冥想，终于找到答案，
版主加精品

望给需要的网友以参考。