Cómo mantener el estado de inicio de sesión durante 1 mes en programación asp
Al iniciar sesión:
Si RememberLogin=true Entonces
Response.Cookies("Cookie")("key1") = Nombre de usuario
Response.Cookies("Cookie")("key2") = UserPwd
Response.Cookies("Cookie").Expires = Fecha()+30
Finalizar si
Al verificar permisos:
'Leer cookies no vacías para iniciar sesión automáticamente
dim clUserName,clUserPwd
clUserName = Request.Cookies ( "Cookie")("key1")
clUserPwd = Request.Cookies("Cookie")("key2")
Si Session("User")="" Entonces
Llamar a Login_Cookies() 'Llamar al proceso de inicio de sesión
Finalizar si
'Proceso de inicio de sesión
Sub Login_Cookies()
Si Session("User")="" y clUserName<>"" y clUserPwd<>"" Entonces
Código de inicio de sesión, escriba el código de valor de sesión, igual que el inicio de sesión separado
Finalizar si
Finalizar sub