hi all again.
when i am loading my favourites(in my browser) i do the method below.
is there a loop that will do all of the below code?

--- in the form the button order is button1,2,5,3,4,7, that is why the order is the way it is----------------
<code>
Private Sub favourites_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Dim fileExists As Boolean
fileExists = My.Computer.FileSystem.FileExists("c:\Program files\WeBrowz\favourite1.text")
If fileExists = True Then
Dim fileContents1 As String
fileContents1 = My.Computer.FileSystem.ReadAllText("c:\Program files\WeBrowz\favourite1.text")
Button1.Text = fileContents1
Dim fileContents2 As String
fileContents2 = My.Computer.FileSystem.ReadAllText("c:\Program files\WeBrowz\favourite2.text")
Button2.Text = fileContents2
Dim fileContents3 As String
fileContents3 = My.Computer.FileSystem.ReadAllText("c:\Program files\WeBrowz\favourite3.text")
Button5.Text = fileContents3
Dim fileContents4 As String
fileContents4 = My.Computer.FileSystem.ReadAllText("c:\Program files\WeBrowz\favourite4.text")
Button3.Text = fileContents4
Dim fileContents5 As String
fileContents5 = My.Computer.FileSystem.ReadAllText("c:\Program files\WeBrowz\favourite5.text")
Button4.Text = fileContents5
Dim fileContents6 As String
fileContents6 = My.Computer.FileSystem.ReadAllText("c:\Program files\WeBrowz\favourite6.text")
Button7.Text = fileContents6
End If
<Code>

cheers,
patrick