急！！！ 列出1~100之间的质数用VBScript怎么写

<script language="javascript">
  var status,i,j;
  for(var i=1;i<100;i++)
  {
      status=true;
      for(var j=2;j<i-1;j++)
      {
          if(i%j==0)
          {
              status=false;
              break;
          }
      }
      if(status==true)
      {
          document.write(i+" ");
      }
  }
</script>