|
| Add bruger til login Fra : tj_cuper | Vist : 180 gange 20 point Dato : 06-05-06 21:20 |
|
hej kan jeg få en af jer til at lave en session mere hvor der er en bruger der hedder "demo3"
kan ikke rigtig selv finde ud af hvor jeg skal sætte det ind så hvis en af jer gider ville det være mega nice.
Scriptet ::
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Untitled Document</title>
<link href="../Layout/design.css" rel="stylesheet" type="text/css">
</head>
<%
If Request.QueryString("action") = "login" Then
strUID = Trim(Replace(Request.Form("Brugernavn"),"'","''"))
strPWD = Trim(Replace(Request.Form("Adgangskode"),"'","''"))
If (Len(strUID) > 0) And (Len(strPWD) > 0) Then
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM protect WHERE (Username = '" & strUID & "') AND (Password = '" & strPWD & "')", database
If (Not rs.BOF) And (Not rs.EOF) Then
intUID = rs("id")
intTRAN = rs("transfer")
'********************* admin koden sidder her ************
'Login OK
session("userID") = rs("id")
if rs("id") = 1 then
session("demo1") = true
else
session("demo1") = false
end if
Else
strERR = "Access Denied"
End If
If Len(intUID) > 0 Then
Session("id") = intUID
response.write session("id")
Response.Redirect intTRAN
End If
Else
strErr = "Access Denied"
End If
If Len(strErr) > 0 Then
strErr = "<p><font color=""red"">" & strErr & "</font></p>"
End If
End If
%>
<!-------------------------------------------------------- Login formularen ------------------------------------------------------------>
<form method="post" action="default.asp?action=login">
<table class="Text" border="0" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2" class="Overskrift">Login ::</td>
</tr>
<tr>
<td>
<a href="reg.asp"><img style="margin-top:2px;" src="../layout/register.gif" border="0"></a>
</td>
<td>
<a href="#"><img style="margin-top:2px;" src="../layout/password.gif" border="0"></a>
</td>
</tr>
<tr>
<td width="50%">ID:</td>
<td width="50%"><input class="logFelt" type="text" name="Brugernavn"></td>
</tr>
<tr>
<td width="50%">Pass:</td>
<td width="50%"><input class="logFelt" type="password" name="Adgangskode"></td>
</tr>
<tr>
<td colspan="2" align="right"><input class="logGo" type="submit" value="Login" name="Action"></td>
</tr>
<tr>
<td colspan="2">
<%=strErr%>
</td>
</tr>
</table>
</form>
<!--#include file="../cgi-bin/db_siker/md5.asp" -->
<%
dim Adgangskode
Adgangskode = "E807F1FCF82D132F9BB018CA6738A19F"
if Adgangskode = md5(Request.Form("Adgangskode")) then
Response.Write ""
end if
%>
</body>
</html>
på forhånd tak :)
| |
| Du har følgende muligheder | |
|
Dette spørgsmål er blevet annulleret, det er derfor ikke muligt for at tilføje flere kommentarer.
| |
|
|