You have been successfully logged out. Cookies have been erased. penAsTextStream (1, -2) Do Until txtStream.AtEndOfStream txtLine = txtStream.ReadLine If Left(txtLine, 1) <> "<" And Left(txtLine, 1) <> "#" Then userInfo = Split(txtLine, ":") If UBound(userInfo) > 0 Then If userInfo(0) = Request("username") And userInfo(1) = Request("password") Then mesg = "Logon successful." Session("isAuth") = True Session("username") = Request("username") Session.Timeout = 120 Response.Cookies("login")("username") = Request("username") Response.Cookies("login")("password") = Request("password") Response.Cookies("login").Expires = DateAdd("YYYY", 1, Now()) If Session("lastPage") <> "" Then Response.Redirect Session("lastPage") End If Exit Do End If End If End If Loop txtstream.Close End If %> Login
Username:
Password: