Ciao ragazzi ho un problema...tramite uno script estraggo dei dati da un file di testo e li carico nel DB.

Il problema è il seguente, alcuni articoli hanno come dato Categoria una stringa di questo tipo:

Informatica;computer;celeron

con il seguente script:

codice:
If INSTR(strCategoria, ";") then

Dim arrCategoria
    arrCategoria = Split(strCategoria, ";")
    strCategoria= arrCategoria(2)

else

end If
estraggo solo l'ultimo dato (celeron) e fin qui tutto ok...quando però ho ad esempio un articolo con solo due campi nel dato Categoria ad esempio:

Informatica;computer

lo script giustamente mi genera l'errore:

codice:
Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A0009)
Indice non incluso nell'intervallo: '[number: 2]'
line 75
Come posso risolvere?

Grazie