Script gibt fehler aus

[Bensen83]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo Habe in einen Flexible 2008 skript folgenden code:

        While Zeile < 10000
            Zeilenstring = CStr(f.ReadLine)
            Zeile = Zeile + 1
            On Error Resume Next
            If Err <> 0 Then
                Zeile = 1000
            Else
            
                If Zeilenstring = "Band_1" Then
                    SmartTags("Handling_Intern\testwert") = CInt(f.ReadLine)
                    If Err <> 0 Then
                        Zeile = 1000
                    End If
                    Zeile = Zeile + 1
                Else If Zeilenstring = "Ende" Then
                        Zeile = 1000
                End If
            End If
        Wend

das script wirft folgenden fehler aus: "Anweisung erwartet" und springt bei anklicken des Fehlers auf die Zeile wo Wend steht.
Was ist denn daran falsch? Habe es in vielen scripten genau so gemacht und es hat bis jetzt immer funktioniert.

 

[Bensen83]

Erledigt

OK habe was gefunden. das else if muss ein elseif sein ;-)

 

[volker]

Zuviel Werbung?
-> Hier kostenlos registrieren

was bezweckst du hiermit?
If Err <> 0 Then

soll das eine fehlerauswertung sein?

dann muss das so aussehen
If Err.number <> 0 Then