"Michael Petersen" <michael@hifiimport.dk> wrote
> Thygesen metode virker fint, TAK. er der nogle udlemper med
> denne metode? (nem at hacke eller lign?)
Ja, den beskytter _kun filer med Session tjecket i toppen, og kan derfor kun
beskytte ASP filer og ikke f.eks. HTML og mediefiler.
> Men jeg har en database, hvor jeg henter brugernavn og
> password fra, hvordan kan man lave det, så man kan
> hente/test adgangskoden med samtlige navne og password som
> der står i databasen?
Ofte vil man gerne have brugerID'et med rundt på siden således at man kan
udtrække brugerspecifikke data det får i nedenstående script du laver blot
noget ala nedenstående:
<%
Dim Brugernavn, Password
Brugernavn = Replace( Request.Form( "brugernavn" ) & "","'","''" )
Password = Replace( Request.Form( "password" ) & "", "'", "''" )
Dim objConn
Set objConn = Server.CreateObject( "ADODB.Connection" )
objConn.Open "<DIN CONNECTIONSTRING>"
Dim objRS
Set objRS = objConn.Execute( "SELECT BrugerID FROM <table> WHERE
Brugernavn = '" & Brugernavn & "' AND Password = '" & Password & "'")
If Not objRS.EOF
'Brugeren er godkendt og hans ID ligges i en session
Session( "BrugerID" ) = objRS( "BrugerID" )
Else
'Login fejlede
End If
%>
På alle sider tjekker du så blot med følgende kode i toppen som sørger for
at uautoriserede brugere bliver sendt videre til /login.asp:
<%
If Not Session( "BrugerID" ) > 0 Then
Response.Redirect( "/login.asp" )
End if
%>
--
Jakob Andersen