fai una cosa... il tuo file excel salvalo come FORMATO TESTO CON TABULAZIONI
e provaci questo codice sopra...
vedi un po' quanto ci mette a scorrerlo...
Dim io As IO.StreamReader = New IO.StreamReader("C:\temp\toanalize.txt")
Dim firstFilter As String = "Aaa"
Dim secondFilter As String = "25/03/2010"
Dim filter1 As ArrayList = New ArrayList
'# read all the line
Dim tmp As String
While Not io.EndOfStream
tmp = io.ReadLine
'# APPLICA I DUE FILTRI. (IPOTIZZO CHE LA DATA CHE CONSIDERI SIA LA TERZA COLONNA?)
'# qua va ottimizzato... chiamata 2 volte split
If tmp.Split(vbTab)(0) = firstFilter And tmp.Split(vbTab)(2) = secondFilter Then
'# linea da considerare poiché matcha col filtro
'# qui va il check per i doppioni prima di inserire
'# nell'array
End If
End While
Luigi Di Biasi
http://www.dibiasi.it/
http://netsell.dibiasi.it - ecomm software -
http://blogs.dotnethell.it/luigidibiasi/
http://yadamp.unisa.it/ - YADAMP CMS -