CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

autohh Nybegynder

23. august 2004 - 14:26 Der er 10 kommentarer og
1 løsning

Login system til community

Heysa alle eksperter :)

mangler et login system til mit community
+
en side hvor man er inde som kun man kan kommeind på hvis man er logget ind

Synes godt om

phuc69 Juniormester

23. august 2004 - 15:01 #1

Prøv sådan her
fil logon.htm
------------------------------------------------------------------------------
<html>
<head>
<title>Logon</title>
</head>

<body>
<form method="get" action="logons.asp">
<input type="text" name="logon">Navn<br>
<input type="password" name="pass">Kodeord<br>
<input type="submit">
</form>
</body>
</html>

Fil logons.asp
---------------------------------------------------------------------------------
<%
Set Conn = Server.CreateObject("ADODB.Connection")
StrConnection = "driver=MySQL;server=localhost;uid=xxxxxxxx;pwd=xxxxxxxxxx;database=xxxxxxxxx"
Conn.Open StrConnection

SQL = "SELECT * FROM logons where navn='" & request.querystring("logon") & "'"
Set rs = Conn.Execute(SQL)

Do While Not rs.EOF
check1=(rs("navn"))
check2=(rs("password"))

if check1=request.querystring("logon") and check2=request.querystring("pass") THEN
session("tillad")="ja"
response.redirect "startside.asp"
end if
rs.MoveNext

Loop
response.redirect "logon.htm"

Conn.Close
Set Conn = Nothing
%>

så skal du bare lave en database med felterne navn og password og i toppen af dine sider skal fu så spørge efter sessionen tillad som skal være sat til ja

Synes godt om

autohh Nybegynder

23. august 2004 - 15:21 #2

Hmm Kan du ikke lige rette tingene til min database hedder database.mdb
og mit tabelnavn er brugere og databasen ser sådan her ud:
id -
bruger -
kode -
hjemmeside -
info -

Synes godt om

phuc69 Juniormester

23. august 2004 - 15:28 #3

sql ser sdan ud
SQL = "select * from brugere where navn='" Request.querystring("logon") & "'"

Synes godt om

phuc69 Juniormester

23. august 2004 - 15:32 #4

din connection til databasen skal se sådan her ud
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN

Synes godt om

phuc69 Juniormester

23. august 2004 - 15:34 #5

SQL = "select * from brugere where bruger='" Request.querystring("logon") & "'"

Synes godt om

phuc69 Juniormester

23. august 2004 - 15:38 #6

check1=(rs("bruger"))
check2=(rs("kode"))

Synes godt om

autohh Nybegynder

23. august 2004 - 16:04 #7

virker ik :(

Synes godt om

autohh Nybegynder

23. august 2004 - 16:07 #8

Kunne ikke bruge det. prøver at oprette en ny

Synes godt om

mathiasrav Nybegynder

23. august 2004 - 16:12 #9

Har du husket at ændre linien der hedder
StrConnection = "driver=MySQL;server=localhost;uid=xxxxxxxx;pwd=xxxxxxxxxx;database=xxxxxxxxx"
...?

Synes godt om

autohh Nybegynder

23. august 2004 - 16:34 #10

min kode ser sådan her ud:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN

SQL = "select * from brugere where bruger='" Request.querystring("logon") & "'"
Set rs = Conn.Execute(SQL)

Do While Not rs.EOF
check1=(rs("bruger"))
check2=(rs("kode"))

if check1=request.querystring("logon") and check2=request.querystring("pass") THEN
session("tillad")="ja"
response.redirect "startside.asp"
end if
rs.MoveNext

Loop
response.redirect "logon.htm"

Conn.Close
Set Conn = Nothing
%>

Synes godt om

phuc69 Juniormester

23. august 2004 - 18:42 #11

Men mange tak for hjælpen, nå nej det er jo ikke mig der har stillet spørgsmålet.......

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS