עזרה בבקשה

יש לי את הקוד הבא



<%
path1 = "Check.txt"
response.write path1
Dim FSO, File, File1, tohen1, i, path
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set File = FSO.OpenTextFile(path1,1,false)
for i = 0 to 350
tohen1 = File.ReadLine
response.write "<script language='JavaScript'>"
response.write "window.open('http://" & tohen1 & "', 'width=400,height=20" & i & "')"
response.write "</script>"
Next
File.Close
Set File = Nothing
Set FSO = Nothing
Set tohen1 = Nothing
Set i = Nothing
%>


', 'mywin" & i & "',





הקוד נועד לשלוף כתובות של אתרים מקובץ טקסט ולפתוח אותם בטאבים חדשים. אני עובד עם פיירפוקס 2.

הכל עובד טוב עד ה20 השליפות הראשונות,
זה פותח לי 20 טאבים עם הכתובת הנכונות, אבל את שאר האתרים הוא מכניס לתוך חלון האזהרה שנפתחו פופאפים.
יש למישהו מושג מה הבעיה?

הערות:
א. אני ידוע שלא ציינתי שם חלון, אבל לפי מה שאני יודע זאת הדרך היחידה לגרום לחלונות להיפתח בטאבים ולא בחלונות חדשים.
ב. ביטלתי את חוסם הפופאפים , אני לא מבין למה זה עדיין חוסם.

אשמח לכל עזרה,

תודה מראש