Keeping visitors logged into members area.

I am redoing my website and now the "membersarea" part has three pages instead of just one. The following code I had was fine for it:

Dim breturn As Boolean

breturn = verifyuser(loginname.Text, password.Text)

If breturn = True Then
Dim ticket As FormsAuthenticationTicket = New FormsAuthenticationTicket(loginname.Text, False, 500000)
< ...