/new/administrator/login.asp

https://github.com/akabeko/fusionexcel · ASP · 78 lines · 71 code · 7 blank · 0 comment · 5 complexity · 6540f13a0e822f8df8dafbdc977eb9ad MD5 · raw file 

    

  1. <!--#include file="../libraries.asp" -->
    2. 

  2. <%
    3. 

  3. if not Session("login") = "" then
    4. 

  4. 	Response.Redirect("Default.asp")
    5. 

  5. end if
    6. 

  6. 

  7. if Request("submit") = "Login" then
    8. 

  8. 	username = Request("username")
    9. 

  9. 	password = Request("password")
    10. 

  10. 	
    11. 

  11. 	call SetConnection(GetUserDbPath())
    12. 

  12. 	call OpenDatabase()
    13. 

  13. 	sql = "SELECT * FROM tbl_users WHERE username='" & username & "' AND password='" & password & "'"
    14. 

  14. 	
    15. 

  15. 	call CreateRecordSet(RecordSet, sql)
    16. 

  16. 	
    17. 

  17. 	if not RecordSet.EOF then
    18. 

  18. 		Session("login") = username
    19. 

  19. 		Session.Timeout = 360
    20. 

  20.         if Request("redirect_url") <> "" then
    21. 

  21.             Response.Redirect(Request("redirect_url"))
    22. 

  22.         else
    23. 

  23.             Response.Redirect("Default.asp")
    24. 

  24.         end if
    25. 

  25. 	else
    26. 

  26.         Dim query_string
    27. 

  27.         query_string = "msg=" & Server.URLEncode("Invalid username or password")
    28. 

  28.         if Request("redirect_url") <> "" then
    29. 

  29.             query_string = query_string & "&redirect_url=" & Server.URLEncode(Request("redirect_url"))
    30. 

  30.         End if
    31. 

  31. 		Response.Redirect("login.asp?" & query_string)
    32. 

  32. 	end if
    33. 

  33. 	
    34. 

  34. 	call CloseRecordSet(RecordSet)
    35. 

  35. 	call CloseDatabase()
    36. 

  36. end if
    37. 

  37. 

  38. 

  39. %>
    40. 

  40. <html xmlns="http://www.w3.org/1999/xhtml">
    41. 

  41. <head>
    42. 

  42. 	<title><%= title %></title>
    43. 

  43. 	<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
    44. 

  44. 	<link href="css/style.css" rel="stylesheet" type="text/css" />
    45. 

  45. </head>
    46. 

  46. <body>
    47. 

  47. 	<div id="wrap">
    48. 

  48. 		<div id="main">
    49. 

  49. 			<div id="login_wrap">
    50. 

  50. 				<div id="login_box">
    51. 

  51. 					<form method="post">
    52. 

  52. 						<table width="100%" cellpadding="0" cellspacing"0" border="0">
    53. 

  53. 							<tr>
    54. 

  54. 								<td colspan="2"><h1>Fusion Excel Content Management</h1></td>
    55. 

  55. 							</tr>
    56. 

  56. 							<tr>
    57. 

  57. 								<td><label>Username: </label></td>
    58. 

  58. 								<td><input type="text" name="username" id="username" maxlength="20" /></td>
    59. 

  59. 							</tr>
    60. 

  60. 							<tr>
    61. 

  61. 								<td><label>Passsword: </label></td>
    62. 

  62. 								<td><input type="password" name="password" id="password" maxlength="20" /></td>
    63. 

  63. 							</tr>
    64. 

  64. 							<tr>
    65. 

  65. 								<td colspan="2" class="error"><%= Request("msg") %></td>
    66. 

  66. 							</tr>
    67. 

  67. 							<tr>
    68. 

  68. 								<td>&nbsp;</td>
    69. 

  69. 								<td><input type="submit" value="Login" name="submit" /></td>
    70. 

  70. 							</tr>
    71. 

  71. 						</table>
    72. 

  72. 					</form>
    73. 

  73. 				</div>
    74. 

  74. 			</div>
    75. 

  75. 		</div>
    76. 

  76. 	</div>
    77. 

  77. </body>
    78. 

  78. </html>
    79.