Создание пользователя войти в систему персистентный с ASP.Net Membership

Я думаю, что Вы были бы богатым использованием FormsAuthentication.SetAuthCookie метод вместо того, чтобы написать много кода самостоятельно.

Я полагаю, что Ваши настройки поставщика членства в web.config могут конфликтовать с настройками, которые Вы обеспечиваете в коде, плюс Вы не обеспечиваете имя cookie.

Попробуйте следующее:

if (Membership.ValidateUser(userName, password))
{
    FormsAuthentication.SetAuthCookie(userName, true); //Creates a cookie named "XXXAuth" - see settings in web.config below
}

В сочетании со следующими настройками в web.config:

<authentication mode="Forms">
    <forms cookieless="UseCookies" loginUrl="~/SignIn.aspx" name="XXXAuth" slidingExpiration="true" timeout="432000"/>
</authentication>


<membership defaultProvider="XXXMembershipProvider">
    <providers>
        <clear />
        <add name="XXXMembershipProvider" type="System.Web.Security.SqlMembershipProvider" applicationName="XXX" connectionStringName="XXX" enablePasswordRetrieval="false" enablePasswordReset="true" requiresQuestionAndAnswer="false" requiresUniqueEmail="true" minRequiredPasswordLength="5" minRequiredNonalphanumericCharacters="0" passwordFormat="Hashed" maxInvalidPasswordAttempts="5" passwordAttemptWindow="10" passwordStrengthRegularExpression=""/>
    </providers>
</membership>

Просто измените значение "тайм-аута" в блоке аутентификации, чтобы быть более длинным значением, если Вы действительно хотите создать неопределенный период входа в систему. Я верю 432000 = 5 дней.

Если Вы хотите, чтобы Ваши пользователи смогли явно выйти из системы, просто назовите следующий метод в ответ на нажатие кнопки (или безотносительно):

FormsAuthentication.SignOut();

Надеюсь, это поможет.

При чтении кода Вы, возможно, случайно обнулили значение тайм-аута FormsAuthenticationTicket. Строка в Вашем коде, где Вы создаете чтения билета: -

Dim authTicket As FormsAuthenticationTicket = New FormsAuthenticationTicket(Username, True, Expiration.Subtract(Expiration).TotalMinutes)

Значение Expiration.Subtract(Expiration).TotalMinutes всегда будет "0".

Можно лучше использовать рукописный формат для создания тикета следующим образом, который привел бы к меньшей неоднозначности.

Public Shared Sub AuthenticateUser(ByVal Username As String)
    Dim Expiration As DateTime = DateTime.Now.AddMonths(3)
    Dim userData As String = String.Empty

    Dim authTicket As FormsAuthenticationTicket = _
       New FormsAuthenticationTicket( _
         Username, _
         DateTime.Now, _
         Expiration, _
         true, _
         userData, _
         FormsAuthentication.FormsCookiePath)
    Dim EncryptedTicket As String = FormsAuthentication.Encrypt(authTicket)
    Dim AuthCookie As New HttpCookie(FormsAuthentication.FormsCookieName, EncryptedTicket)
    AuthCookie.Expires = Expiration
    HttpContext.Current.Response.Cookies.Add(AuthCookie)
End Sub

Существует также хорошая статья Microsoft KB здесь о "Понимании Билета Аутентификации Форм и Cookie"

.