åbne vindue i asp (ny)

Jeg vil gerne have at der skal åbnes et vindue for hver loop,hvordan kan jeg gøre det?

    sqlstring = \"Select * from sheets\"
    rsSholder.Open  sqlstring, strConnectionString
      do until rsSholder.eof
          name = rssholder(\"Sheet_dbname\")
          dbsheetname=rssholder(\"Sheet_name\")
          dbsheettype=rssholder(\"Sheet_type\")
          dbsheetnumber=rssholde(\"Sheet_number\")
str= \"http://igisql.issgroup.com/word/word\"&name&\".asp

Response.write \"<script type=\"\"text/javascript\"\">window.open(\'\"&str&\"\', \'name\');</script>\"

rssholder.movenext
loop