webForumDet fria alternativet

Ändra inloggning till en databas?

ASP

12 svar · 360 visningar · startad av medialabs

Medlem sedan mars 20023 686 inlägg
Frågan#1

Hejsan svejsan!

När jag ska logga in så includerar jag med en fil som innehåller,

<%

' Här ändrar du Anv & Lösenord

anvendare = "admin"
'ange önskat anv. namn för administrationen

losenord = "ojje"
'ange önskat löse. för administrationen

%>

men nu har jag lagt in en tabell till i databasen och den heter login och innehåller ett fält som heter user och det andra heter pass . Hur ska jag göra för att flytta över kontrollen till databasen och inte till den inkluderade filen?

Medlem sedan apr. 20022 743 inlägg
#2

stället för att ämta variablarna från den infogade filen när du loggar in så hämtar du värdet ut databasen

Medlem sedan feb. 20012 412 inlägg
Medlem sedan feb. 200112 078 inlägg
#4

Jag vill inte förstöra det roliga, men glöm för Guds skull inte att göra följande innan du kör login-systemet skarpt:

'psuedo
strUser = [b][red]replace([/red][/b]request.form("username")[b][red],"'","''")[/red][/b]
strPassw = [b][red]replace([/red][/b]request.form("password")[b][red],"'","''")[/red][/b]
Medlem sedan mars 20023 686 inlägg
#5

redan fixat! ;)

Medlem sedan mars 20023 686 inlägg
#6

Kan nån visa kod biten för att byta ut denna. Tabellen heter login och användrnamn finns i fältet: user och lösenord i fältet: pass

admin.asp

<!-- #include file = "passok.asp" -->

<%
IF Request.QueryString("action") = "login" THEN
	IF Request.Form("losenord") = losenord AND Request.Form("anvendare") = anvendare THEN
		Session("access") = "inne"
	END IF
END IF
%>

passsok.asp

<%

' Här ändrar du Anv & Lösenord

anvendare = "admin"
'ange önskat anv. namn för administrationen

losenord = "ojDKAS" 
'ange önskat lösenord för administrationen

%>
Medlem sedan mars 20023 686 inlägg
#7

- :( :( :(

Medlem sedan apr. 20022 743 inlägg
#8

öppna ett recordset med inloggningsuppgifterna och sedan:

<%
IF Request.QueryString("action") = "login" THEN
	IF Request.Form("losenord") = RecSet("losenord") AND Request.Form("anvendare") = RecSet("anvendare") THEN
		Session("access") = "inne"
	END IF
END IF
%>
Medlem sedan mars 20023 686 inlägg
#9

Tack Poffe,

Men hur ska recordset se ut?

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("kontakter.mdb") 

SQL = "SELECT * From kunder WHERE id = " & Request.Querystring("id")
Set RecSet = Connect.Execute(SQL)
%>

så använder jag när jag ska hämta info från databasen.... men login uppgifterna ligger i tabellen "login"

Medlem sedan apr. 20022 743 inlägg
#10

hämta infon från den tabellen då. det är precis som att hämna info från vilken tabell som helts..

Medlem sedan mars 20023 686 inlägg
#11

Jag har fått allt att funka nu.

Medlem sedan nov. 2001124 inlägg
#12

varför ska man göra så?

Jag vill inte förstöra det roliga, men glöm för Guds skull inte att göra följande innan du kör login-systemet skarpt:

'psuedo
strUser = replace(request.form("username"),"'","''")
strPassw = replace(request.form("password"),"'","''")

Medlem sedan mars 20015 287 inlägg
252 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
124 ms — deklarationer (db)
0 ms — hämta statistik (cache)
125 ms — hämta tråd, inlägg och bilagor (db)
120 ms — ändringar (db)