mmmmm ma così facendo

do while not ilfile.AtEndOfStream
illine=ilfile.readline
rs1("Note") = illine
loop

memorizzi solo l'ultima riga! dovresti usare .ReadAll