Hur kolla behörighet mot RFA-medlemsdatabas i ASP?
Jag har en superenkel inloggningsformulär i ASP där jag vill använda mig av
RFAs medlemsdatabas för att kolla om en medlem verkligen är medlem. Hur gör
jag? Jag bifogar min superenkla ASP-sida...:
<%
' Här vill jag kolla om användaren är behörig eller inte...
dim strUsername
dim strPassword
strUsername = request.form("username")
strPassword = request.form("password")
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
if IsValidMember(strUsername, strPassword) then
' Valid User
else
' Invalid User
endif
endif
function IsValidMember(byval strUsername, byval strPassword)
if ... then
' Valid User
IsValidMember = TRUE
else
' Invalid User
IsValidMember = FALSE
endif
end function
%>
<HTML>
<HEAD>
<TITLE>Logga in</TITLE>
</HEAD>
<BODY>
<H1>Logga in</H1>
<HR>
<P>Du måste först logga in...</P>
<FORM METHOD="POST" ACTION="login.asp" name="FrontPage_Form1">
<BLOCKQUOTE>
<table border="0" width="100">
<tr>
<td width="19%">
Ange ditt användarnamn.
</td>
<td width="31%">
<INPUT NAME="CurrentUser"
SIZE=50 maxlength="50">
</td>
</tr>
<tr>
<td width="19%">
Ange ditt lösenord:</td>
<td width="31%">
<INPUT TYPE=password
NAME="CurrentPassword" SIZE=50 maxlength="50">
</td>
</tr>
</table>
</BLOCKQUOTE>
<INPUT TYPE=SUBMIT VALUE="Logga in">
<INPUT TYPE=RESET VALUE="Rensa">
</FORM>
<HR>
</BODY>
</HTML>
/Conny Westh
"Buy quality, cry once"
--
Conny Westh, Verimentor AB, 070-752 22 51
[EMAIL PROTECTED], www.verimentor.se
Kvalitetsmedvetna IT-konsulter http://www.rfa.se
---
Avsändare: http://cv.rfa.se/index.php/[EMAIL PROTECTED]
Sponsor: - ASSAR CMS - Open Source CMS-system http://www.assar.nu
