Kunne dette login script gøres bedre ?!?
Kunne dette login script gøres bedre ?!?---------------Login.asp----------------
<%
if Request.Form("action") = "Login" then
password = Request.Form("password")
username = Request.Form("username")
Session("username") = username
set rs = Server.CreateObject("ADODB.Connection")
rs.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("sub.mdb") & ";DriverId=25;FIL=MS Access"
sqlLogin="select Id from seb where (seb='"& username &"') AND (pwd='"& password &"')"
Set userSet = rs.Execute(sqlLogin)
If Not (userSet.BOF Or UserSet.EOF) then
Session("usrID") = userSet("Id")
Response.Redirect "subopdater.asp"
else
Response.Redirect "login.asp?action=fejl"
End if
rs.Close
Set rs = Nothing
end if
%>
<HTML>
<HEAD>
<style type="text/css">
<!--
.text { font-family: Arial; font-size: 8pt; font-weight: bold; color: #000000; border: #000000; border-style: solid; border-top-width: thin; border-right-width: thin; border-bottom-width: thin; border-left-width: thin; background-color: #CCCCCC}
-->
</style>
</HEAD>
<body bgcolor="DimGray" leftmargin="0" topmargin="0">
<form method="post" action="login.asp" name="login">
<font face="Arial" size="2" color="#FFFFFF">Indtast dit brugernavn og password </font>
<% if Request("action") = "fejl" then %>
<font face=Arial color="LightGoldenrodYellow"><b><br>Der
opstod en fejl, der er enten fejl i brugernavn eller password.</b><br></font>
<% end if %>
<table width="148" border="0" cellspacing="0" cellpadding="0" height="44">
<tr>
<td width="71"><font face="Arial" size="2" color="#FFFFFF">Brugernavn</font></td>
<td width="77">
<input type="text" class="text" name="username" size="10">
</td>
</tr>
<tr>
<td width="71" height="9" valign="top"><font size="2" color="#FFFFFF" face="Arial">Password</font></td>
<td width="77" height="9" valign="top">
<input type="password" class="text" name="password" size="10">
</td>
</tr>
</table>
<input type="submit" name="action" value="Login">
</form>
<p> </p>
</BODY>
</HTML>
---------------login.asp---------------
