Array

Array Fehler
Ich habe hier mal wieder einen Fehler den ich nicht beheben kann

#include "WebTcp.au3"
#include <Array.au3>
#Include <File.au3>

TCPStartup()
_AutoITObject_Startup()

Global $oWebTcp = _WebTcp_Create(False,False)

$seite= "http://sternenmailer.de/"

$user = ""
$pw = ""

$oWebTcp.Navigate("http://sternenmailer.de/")
;$oWebTcp.Referer ="http://sternenmailer.de/"
$oWebTcp.Navigate("http://sternenmailer.de/index.php?mod=login","username="&$user&"&password= "&$pw&"&area=site&mod=login&do=do_login") ; ihr deine logindaten rein
$oWebTcp.Navigate('http://sternenmailer.de/index.php?area=user&mod=start')

;ClipPut($oWebTcp.body) ; kann auskommentiert werden
;msgbox(64,"Seitenwquellcode","in Zwischenablage") ; kann auskommentiert werden

for $m =1 to 10 ; anzahl der paidbanner durchgänge
;$oWebTcp.Referer ="http://www.paiduniversum.de/index.php?page=user.login&schritt=weiter"
$oWebTcp.Navigate("http://sternenmailer.de/index.php?area=user&mod=paidbanner")

;ClipPut($oWebTcp.body) ; kann auskommentiert werden
;msgbox(64,"Seitenwquellcode_banner","in Zwischenablage") ; kann auskommentiert werden

$bannerlinks= StringRegExp($oWebTcp.body,'([Only registered and activated users can see links. Click Here To Register...][^"]*)',3)
sleep(1000)
$filter_Verguetung= StringRegExp($oWebTcp.body,'Vergütung:.([^P]*)',3)

;_ArrayDisplay($bannerlinks,"Paidbanner") ; kann auskommentiert werden
;_arraydisplay($filter_Verguetung,"Vergütung") ; kann auskommentiert werden

if IsArray($bannerlinks) then
dim $array_paidbannerlink[1]
For $i = 0 To UBound($bannerlinks)-1
If $filter_Verguetung[$i] < 1 Then ; das ist die abfrage für minusbanner wenn minus -50 vorhanden ist dann nicht aufnehmen in den array

Else
_ArrayAdd($array_paidbannerlink, $bannerlinks[$i])
endif
Next
endif
_ArrayDelete($array_paidbannerlink,0)
;_ArrayDisplay($array_paidbannerlink,"array_paidba nnerlink") ; kann auskommentiert werden




for $i =0 to UBound($array_paidbannerlink)-1
$oWebTcp.navigate($array_paidbannerlink[$i])
sleep(1000)
;ClipPut($oWebTcp.body) ; kann auskommentiert werden
;msgbox(64,"Paidbanner1","in Zwischenablage") ; kann auskommentiert werden
$paidbannerlink=StringRegExp($oWebTcp.body,'([Only registered and activated users can see links. Click Here To Register...][^"]*)',3)
;_ArrayDisplay($paidbannerlink,"paidbannerlinks") ; kann auskommentiert werden
if IsArray($paidbannerlink) then
$oWebTcp.Referer=$array_paidbannerlink[$i]
$oWebTcp.navigate($paidbannerlink[0])
sleep(1000)
;ClipPut($oWebTcp.body) ; kann auskommentiert werden
;msgbox(64,"Paidbanner2","in Zwischenablage") ; kann auskommentiert werden
else
EndIf
$paidbannerlinkfertig=StringRegExp($oWebTcp.body,' ([Only registered and activated users can see links. Click Here To Register...][^"]*)',3)
;_ArrayDisplay($paidbannerlinkfertig,"paidbannerli nkfertig")
sleep(1000)
$oWebTcp.Referer=$bannerlinks[$i]
$oWebTcp.navigate($paidbannerlinkfertig[0])

;ClipPut($oWebTcp.body) ; kann auskommentiert werden
;msgbox(64,"Paidbanner fertig","in Zwischenablage") ; kann auskommentiert werden
Next

next
msgbox(64,"alle Paidbanner","fertig")
_AutoITObject_Shutdown()
TCPShutdown()

hier der fehler
C:\Dokumente und Einstellungen\Feuerfrau\Desktop\Mailer\Sternenmail er.au3 (47) : ==> Variable used without being declared.:
_ArrayDelete($array_paidbannerlink,0)
_ArrayDelete(^ ERROR
Mal läuft es ohne Probleme und manschmal gehts gar nicht, das finde ich seltsam, weiß aber nicht wie ich den Fehler umgehen soll.