Unbegreifliches Scriptproblem

Hallo!
Erst einmal.. Ich kenne mich weder mit BASIC, noch mit AutoIt oder sonst einer Programmier- / Scriptsprache aus, deswegen fiel es mir schwer einen passenden Threadtitel für das Problem zu wählen...

Ich habe mir von einem Bekannten ein Script schreiben lassen, das automatisch eine beliebig lange Liste von Links (Liste wird als .txt genutzt, Trennung der einzelnen Links ist per Enter, also neue Zeile) abarbeitet und den Quelltext der Seiten einzeln als .txt in einen beliebigen Ordner speichert.

Das läuft soweit gut, der Quelltext der ersten 5 Links der insgesamt 762 Links langen Liste wird korrekt gespeichert... Danach werden zwar weiterhin .txt-Files im dafür angegeben Ordner erstellt, in denen steht aber nur noch eine 0.

Das Script sieht so aus:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <Array.au3>
#include <File.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Quellcode Schreiber", 343, 206, 192, 124)

$Group1 = GUICtrlCreateGroup("Speicherpfad", 0, 80, 337, 65)
$Input1 = GUICtrlCreateInput("Ordner", 8, 96, 297, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))
$Button1 = GUICtrlCreateButton("Browse", 8, 120, 97, 17, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group2 = GUICtrlCreateGroup("Liste", 0, 8, 337, 65)
$Input2 = GUICtrlCreateInput("Datei", 8, 24, 297, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))
$Button2 = GUICtrlCreateButton("Browse", 8, 48, 97, 17, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Button3 = GUICtrlCreateButton("In .txt Dateien exportieren", 192, 176, 139, 25, 0)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$File = FileSelectFolder("Ordner, in dem die Dateien gespeichert werden sollen", "")
GUICtrlSetData($Input1, $File)
Case $Button2
$File2 = FileOpenDialog("Datei mit den Links", "", "Text files (*.txt)")
GUICtrlSetData($Input2, $File2)
Case $Button3
Dim $links
_FileReadToArray($File2, $links)
$name = ""
For $i = 1 to $links[0]
$Objekt = _IECreate($links[$i], 0, 0)
$HTML = _IEBodyReadHTML($Objekt)
$name = StringSplit($links[$i], "=", 0)
FileWrite($File & "\" & $name[2] & ".txt", $HTML)
Next
MsgBox(0, "Erfolg", "Der Quellcode wurde erfolgreich in TXT abgespeichert!")
EndSwitch
WEnd

Die Linkliste ist in diesem Format als txt abgelegt:

http://anime-loads.org/page.php?id=1123
http://anime-loads.org/page.php?id=483
http://anime-loads.org/page.php?id=1735
http://anime-loads.org/page.php?id=1663
http://anime-loads.org/page.php?id=1392
http://anime-loads.org/page.php?id=484
http://anime-loads.org/page.php?id=485
http://anime-loads.org/page.php?id=486
http://anime-loads.org/page.php?id=487
http://anime-loads.org/page.php?id=488
http://anime-loads.org/page.php?id=489
http://anime-loads.org/page.php?id=490
http://anime-loads.org/page.php?id=491
http://anime-loads.org/page.php?id=1669
http://anime-loads.org/page.php?id=492
http://anime-loads.org/page.php?id=493
http://anime-loads.org/page.php?id=494
http://anime-loads.org/page.php?id=1388
http://anime-loads.org/page.php?id=495
http://anime-loads.org/page.php?id=496


usw.

Es wäre wirklich genial, wenn jemand den Fehler finden könnte, da mein Bekannter jetzt erstmal für 3 Wochen auf Geschäftsreise ist.. :-/

Freundliche Grüsse
Dabrax

Vielen Dank für eure schnellen Antworten

Dein Änderungsvorschlag hat funktioniert, funkey, zumindest bis Link 54, ab da waren meine 6gb RAM komplet ausgelastet und ich konnte meinen Computer nochmal mit Müh und Not vor dem Aufknüpfen bewahren. Da würde wohl die Änderung von Water weiterhelfen, aber wo genau füge ich das im Script ein? Wie gesagt, meine Kenntnisse auf dem Gebiet tendieren gegen Null. :wacko: Tut mir leid, dass ich einer der "schwierigeren Kunden" bin!

Perfekt perfekt perfekt! Vielen vielen Dank! Funktioniert einwandfrei!
Wirklich superschnelle Hilfe hier!