alla fine ho fatto in un altro modo:
codice:
Do While prova.Peek >= 0
            a = prova.ReadLine
            b = Split(a, "|")
            c = b(2)
            d = b(3)
            Dim cmd As New MySqlCommand("update clienti set dataa = " & c.ToString("yyyyMMdd") & ", datap = " & d.ToString("yyyyMMdd") & " where controllo = 12345 and codice = " & b(0), cn)
            cmd.ExecuteNonQuery()
            cmd = Nothing
        Loop
Solo che è incredibilmente lento come potrei ottimizzare il tutto?

Grazie