How To Stop It Read The Datas In The Next Line In .csv File

i wrote this code to read the datas from excel(.csv file). but it read all the datas as 1 line. i don't undestand why.is there any function that i can use to stop it read the datas in the next line?? can anyone help me?? thanks a lot.

Do While Not TextStream.AtEndOfStream
line = TextStream.readline

if line <> "" then
arr_User(i) = trim(line)
splitline = split(arr_User(i), ",")

for j=0 to 5
response.Write splitline(j) &"nbsp;nbsp;"
next

i = i + 1
redim preserve arr_User(i)

end if
Loop