Ciao a tutti
Ho un Array con al suo interno dei nomi doppi.
Vorrei pulirlo mantenendo un solo nome eliminando quelli doppi.

Ho provato cosi:

function NoDoppieArray(arrStrings)
intSize = 0 ' dimensioni dell'array
for ii = 0 to Ubound(arrStrings)
if arrStrings(ii) <> arrStrings(ii + 1) then
ArrayFile_Ok (intSize) = arrStrings (ii)
intSize = intSize + 1
end if
next
end function

Ma mi da errore:
Errore di run-time di Microsoft VBScript error '800a000d'
Tipo non corrispondente: 'ArrayFile_Ok'

Grazie anticipatamente