<html>
<body>

<script type="text/vbscript">
dim names(2)
names(0) = "George"
names(1) = "John"
names(2) = "Thomas"

for each x in names
  document.write(x & "<br />")
next
</script>

</body>
</html>