|
|
 | Registrering af antallet af login's for hv~
Fra : JS |
Dato : 28-09-01 21:10 |
|
Jeg har tidligere forsøgt mig i denne gruppe, men jeg fandt ikke rigtigt
noget svar. Jeg er selv gået i gang med at udforske denne ASP-verden men jeg
har brug for hjælp.
Jeg har et password-script der udstyrer brugerne af hjemmesiden med et
username og et password. Nu vil jeg gerne have registreret hvor mange gang
den enkelte bruger logger sig på.
I den database (Access) har jeg foruden ID, Usernname og Password oprettet
en kolonne der hedder Count.
Formen på loginsiden sender de indtastede data videre til en asp-side der
kontrollerer, at det indtastede giver ret til adgang. Herefter sendes
brugerene (redirect) til den beskyttede side.
Hvordan bærer jeg mig ad med at få talt de enkelte brugeres login's?. Hvis
det er muligt vil det også være nyttigt med en registrering af tidspunktet
(dato + tid) for den sidste login.
En lang smører - håber nogen kan hjælpe....
| |
 Tony Lorentzen (29-09-2001)
| Kommentar
Fra : Tony Lorentzen |
Dato : 29-09-01 00:20 |
|
"JS" <stecher@mail.dk> wrote in message
news:3bb4d921$0$51391$edfadb0f@dspool01.news.tele.dk...
> Jeg har tidligere forsøgt mig i denne gruppe, men jeg fandt ikke rigtigt
> noget svar. Jeg er selv gået i gang med at udforske denne ASP-verden men
jeg
> har brug for hjælp.
Håber jeg kan hjælpe dig på vej.
> Jeg har et password-script der udstyrer brugerne af hjemmesiden med et
> username og et password. Nu vil jeg gerne have registreret hvor mange gang
> den enkelte bruger logger sig på.
[snip]
> Hvordan bærer jeg mig ad med at få talt de enkelte brugeres login's?. Hvis
> det er muligt vil det også være nyttigt med en registrering af tidspunktet
> (dato + tid) for den sidste login.
Ok - hvis en bruger så er registreret skal du tælle indholdet af et felt op
med 1. Derefter skal du update et datofelt. Det er lige ud af landevejen. Du
gør flg. (ret selv feltnavnene til bagefter):
UPDATE users SET count = count+1, lastLogin = getdate()
Men lav "count" feltnavnet om til at hedde noget andet. Count bruges nemligt
i forbindelse med SQL, så det er nok smart at kalde den "intCount" el. lign.
Håber det hjalp.
Hilsner,
Tony
--
Tony Lorentzen
Freelance webudvikler
tony@lorentzen.com
| |
JS (29-09-2001)
| Kommentar
Fra : JS |
Dato : 29-09-01 22:57 |
|
Tak for dit svar.
Som det fremgår af min mail er jeg nybegynder i ASP og det betyder desværre,
at jeg ikke helt har forstået hvor i koden dit forslag skal indsættes og
hvordan det skal integreres med resten af koden.
Derfor "paster" jeg lige scriptet:
<%@Language=VBScript%>
<%Response.Buffer = True%>
<!--#INCLUDE FILE="config.inc"-->
<html>
<body>
<%
UserName = Replace(Trim(Request.Form("username")), "'", "''")
PassWord = Replace(Trim(Request.Form("password")), "'", "''")
If UserName = "" OR PassWord = "" Then Response.Redirect "default.asp"
SQL = "Select ID, UserName, [PassWord], Clearance, ExpireDate From data"
Set RS = MyConn.Execute(SQL)
While Not RS.EOF
If UserName = RS("UserName") And PassWord = RS("Password") Then
If RS("ExpireDate") > Now() Then
Session("allow") = True
Session("clearance") = RS("Clearance")
Level = RS("Clearance")
Else
Response.Redirect "utility.asp?method=expired"
End If
End If
RS.MoveNext
Wend
CleanUp(RS)
If Session("allow") = True Then
If Level = 3 Then Response.Redirect "adm.asp"
If Level < 3 Then Response.Redirect "welcome.asp"
Else
Response.Redirect "default.asp"
End If
%>
</body>
</html>
ExpireDate er som du kan se en funktion i scriptet der giver mulighed for at
sætte en udløbsdato på brugerens konto.
Kan du fortælle mig nærmere hvor det præcist er jeg skal indsætte dit
forslag.
JS
"Tony Lorentzen" <tony@lorentzen.com> wrote in message
news:9p30g7$b2g$1@news.cybercity.dk...
> "JS" <stecher@mail.dk> wrote in message
> news:3bb4d921$0$51391$edfadb0f@dspool01.news.tele.dk...
>
> > Jeg har tidligere forsøgt mig i denne gruppe, men jeg fandt ikke rigtigt
> > noget svar. Jeg er selv gået i gang med at udforske denne ASP-verden men
> jeg
> > har brug for hjælp.
>
> Håber jeg kan hjælpe dig på vej.
>
> > Jeg har et password-script der udstyrer brugerne af hjemmesiden med et
> > username og et password. Nu vil jeg gerne have registreret hvor mange
gang
> > den enkelte bruger logger sig på.
> [snip]
> > Hvordan bærer jeg mig ad med at få talt de enkelte brugeres login's?.
Hvis
> > det er muligt vil det også være nyttigt med en registrering af
tidspunktet
> > (dato + tid) for den sidste login.
>
> Ok - hvis en bruger så er registreret skal du tælle indholdet af et felt
op
> med 1. Derefter skal du update et datofelt. Det er lige ud af landevejen.
Du
> gør flg. (ret selv feltnavnene til bagefter):
>
> UPDATE users SET count = count+1, lastLogin = getdate()
>
> Men lav "count" feltnavnet om til at hedde noget andet. Count bruges
nemligt
> i forbindelse med SQL, så det er nok smart at kalde den "intCount" el.
lign.
>
> Håber det hjalp.
>
> Hilsner,
>
> Tony
> --
> Tony Lorentzen
> Freelance webudvikler
> tony@lorentzen.com
>
>
| |
 Tony Lorentzen (29-09-2001)
| Kommentar
Fra : Tony Lorentzen |
Dato : 29-09-01 23:48 |
|
Send mig din asp fil på mail i stedet - så skal jeg sætte det ind, så det
fungerer.
Mvh,
Tony Lorentzen
Freelance webudvikler
tony@lorentzen.com
"JS" <stecher@mail.dk> wrote in message
news:3bb643a8$1$224$edfadb0f@dspool01.news.tele.dk...
> Tak for dit svar.
>
> Som det fremgår af min mail er jeg nybegynder i ASP og det betyder
desværre,
> at jeg ikke helt har forstået hvor i koden dit forslag skal indsættes og
> hvordan det skal integreres med resten af koden.
>
> Derfor "paster" jeg lige scriptet:
>
> <%@Language=VBScript%>
> <%Response.Buffer = True%>
> <!--#INCLUDE FILE="config.inc"-->
>
> <html>
> <body>
>
> <%
> UserName = Replace(Trim(Request.Form("username")), "'", "''")
> PassWord = Replace(Trim(Request.Form("password")), "'", "''")
>
> If UserName = "" OR PassWord = "" Then Response.Redirect "default.asp"
>
> SQL = "Select ID, UserName, [PassWord], Clearance, ExpireDate From data"
>
> Set RS = MyConn.Execute(SQL)
>
> While Not RS.EOF
> If UserName = RS("UserName") And PassWord = RS("Password") Then
> If RS("ExpireDate") > Now() Then
> Session("allow") = True
> Session("clearance") = RS("Clearance")
> Level = RS("Clearance")
> Else
> Response.Redirect "utility.asp?method=expired"
> End If
> End If
> RS.MoveNext
> Wend
>
> CleanUp(RS)
>
>
> If Session("allow") = True Then
> If Level = 3 Then Response.Redirect "adm.asp"
> If Level < 3 Then Response.Redirect "welcome.asp"
> Else
> Response.Redirect "default.asp"
> End If
> %>
>
> </body>
> </html>
>
> ExpireDate er som du kan se en funktion i scriptet der giver mulighed for
at
> sætte en udløbsdato på brugerens konto.
> Kan du fortælle mig nærmere hvor det præcist er jeg skal indsætte dit
> forslag.
>
> JS
>
>
> "Tony Lorentzen" <tony@lorentzen.com> wrote in message
> news:9p30g7$b2g$1@news.cybercity.dk...
> > "JS" <stecher@mail.dk> wrote in message
> > news:3bb4d921$0$51391$edfadb0f@dspool01.news.tele.dk...
> >
> > > Jeg har tidligere forsøgt mig i denne gruppe, men jeg fandt ikke
rigtigt
> > > noget svar. Jeg er selv gået i gang med at udforske denne ASP-verden
men
> > jeg
> > > har brug for hjælp.
> >
> > Håber jeg kan hjælpe dig på vej.
> >
> > > Jeg har et password-script der udstyrer brugerne af hjemmesiden med et
> > > username og et password. Nu vil jeg gerne have registreret hvor mange
> gang
> > > den enkelte bruger logger sig på.
> > [snip]
> > > Hvordan bærer jeg mig ad med at få talt de enkelte brugeres login's?.
> Hvis
> > > det er muligt vil det også være nyttigt med en registrering af
> tidspunktet
> > > (dato + tid) for den sidste login.
> >
> > Ok - hvis en bruger så er registreret skal du tælle indholdet af et felt
> op
> > med 1. Derefter skal du update et datofelt. Det er lige ud af
landevejen.
> Du
> > gør flg. (ret selv feltnavnene til bagefter):
> >
> > UPDATE users SET count = count+1, lastLogin = getdate()
> >
> > Men lav "count" feltnavnet om til at hedde noget andet. Count bruges
> nemligt
> > i forbindelse med SQL, så det er nok smart at kalde den "intCount" el.
> lign.
> >
> > Håber det hjalp.
> >
> > Hilsner,
> >
> > Tony
> > --
> > Tony Lorentzen
> > Freelance webudvikler
> > tony@lorentzen.com
> >
> >
>
>
| |
|
|