1 reply to this topic

[brarei200]

Function

Private Function ReadTextFile(ByVal strFileLocation As String) As String
    	Dim srReader As New System.IO.StreamReader(strFileLocation)
    	Dim strContent As String = srReader.ReadToEnd
    	srReader.Close()
    	Return strContent
	End Function

Usuage

SomeObject = ReadTextFile("Location of Text File")
TextBox1.Text = ReadTextFile("C:\Desktop\File.txt")

[AOE]

Sweet man thanks for this one as well, You got any more source you would like to share? haha

Edited by Nick, 17 January 2011 - 05:30 AM.