Sería algo así:
Código ASP:
Ver originalSub WriteToFile(sender As Object, e As EventArgs)
Dim fp As StreamReader
Try
fp = File.OpenText(Server.MapPath(".\Upload\") & "test.txt")
txtMyFile.Text = fp.ReadToEnd()
lblStatus.Text = "File Succesfully Read!"
fp.Close()
Catch err As Exception
lblStatus.Text = "File Read Failed. Reason is as follows
" & err.ToString()
Finally
End Try
End Sub
O bien
Código ASP:
Ver originalDim StreamReader1 As New System.IO.StreamReader(Server.MapPath("test.txt"))
TextBox2.Text = StreamReader1.ReadToEnd()
StreamReader1.Close()