File Handling! Reading Text File!

[vincent85]

<%@Import Namespace="System.IO"%>
<script language="vb" runat="server">
Sub page_load(Sender As Object,e As EventArgs)
   Dim filetoread as string
   filetoread=server.mappath("Output.txt")
   dim filestream as StreamReader
   filestream = File.Opentext(filetoread)
   Dim read as String=fileStream.ReadToEnd()
   dim str1, s as string
   dim i,k as integer 
	dim str1, str2(), s as string
	dim i,k as integer
		for k=0 to (read.count)-1
			str1=read.item(k)
			str2=str1.split("~")
			dim r As New TableRow()
			dim c11 As New TableCell() 
			dim chkbox11 as new checkbox
			c11.Controls.Add(chkbox11)
			r.Cells.Add(c11)
			
                                                for i=0 to 5
			     dim c As New TableCell() 
			     c.Controls.Add(New LiteralContro(str2(i)))
			     r.Cells.Add(c)
			next
			table.Rows.Add(r)
		next

end sub

All i want to do is read the text file , split it , and display it in the Web page!
However , i have some trouble with it , can any one help me plz!