Moin Also habe mal getestet. Der Fehler tritt im Index vom Split auf. Für den geposteten Quellecode müsste die Zeile so aussehen:
ergebnis2 = Replace(Split(ergebnis, ">")(Y - 2), "Aufrufe</div", "") * 1
In Ergebnis2 steht dann die viewzahl von 3148 und in ergebnis3 wird entsprechend die 0 ausgegeben (der Code läuft dann bis dahin durch). Falls der Code sonst klappt und es nur in den Fällen mit 0 vorkommt, würde ich es so lösen. Die Ermittlung von Ergebnis3 vor deine Schleife. Dann weißt du schon, ob 0 war. In der Schleife bei Ergebnis2 dann eine if then bspw. so.
If ergebnis3 = 0 Then
ergebnis2 = Replace(Split(ergebnis, ">")(Y - 2), "Aufrufe</div", "") * 1
Else
ergebnis2 = Replace(Split(ergebnis, ">")(Y - 1), "Aufrufe</div", "") * 1
End If
Allgemein würde ich so wie im letzten Threat beschrieben dein Durchlauf für die Views kürzen. So durchläufst du ja jede Zeile im Quellcode. MIt der anderen Variante sollte es eigentlich schneller gehen. Das ist aber Geschmackssache und kein muss.
Probiere mal die Erläuterungen am Anfang.
VG
|