Avatar billede thomasskov Nybegynder
03. maj 2001 - 21:45 Der er 4 kommentarer og
1 løsning

genkende bruger med cookies

Jeg er ude på at min side skal genkende når en bruger har været på siden før og redirecte til ét sted. Dernæst hvis brugeren ikke har været på siden før redirecte til et andet sted. Sidst, men ikke mindst spekulerer jeg på hvordan man giver hver bruger sit eget ID automatisk, men det har måske også noget med ovenstående brugergenkendelse at gøre.
thomasskov
Avatar billede bojohansen Nybegynder
04. maj 2001 - 01:21 #1


If Request.Cookies(\"CookoiesNavn\")(\"FeldtNavn\") = (\"\") Then
  Response.Cookies(\"CookoiesNavn\")(\"FeldtNavn\") = (\"1\")
  Response.Redirect \"/Mappe/side.asp\"
Else
  If Request.Cookies(\"CookoiesNavn\")(\"FeldtNavn\") > (\"0\") Then
  Response.Redirect \"/Mappe1/side1.asp\")
  End If
End If
Avatar billede bojohansen Nybegynder
04. maj 2001 - 01:30 #2
Det med at give dem et ID må du lige definere lidt mere.......Skal det gemmes i en DB eller vil du bare checkke hvor mange gange de har været på siden før??

Hvis du vil checkke hvor mange gange de har været der før gør du bare sådant :
Dim FeldtNavn
FeldtNavn = Request.Cookies(\"CookoiesNavn\")(\"FeldtNavn\")

If FeldtNavn = (\"\") Then
  Response.Cookies(\"CookoiesNavn\")(\"FeldtNavn\") = (\"1\")
  Response.Redirect \"/Mappe/side.asp\"
Else
  If FeldtNavn > (\"0\") Then
  FeldtNavn = FeldtNavn + (\"1\")
  Response.Cookies(\"CookoiesNavn\")(\"FeldtNavn\") = \"\" & FeldtNavn & \"\"
  Response.Redirect (\"/Mappe1/side1.asp\")
  End If
End If

Har ikke testet det
Avatar billede bojohansen Nybegynder
04. maj 2001 - 01:34 #3
Úpssssss der mangler lige en .Expires = Date + 365

If FeldtNavn = (\"\") Then
  Response.Cookies(\"CookoiesNavn\")(\"FeldtNavn\") = (\"1\")
  Response.Cookies(\"CookiesNavn\").Expires = Date+365
  Response.Redirect \"/Mappe/side.asp\"
Else
  If FeldtNavn > (\"0\") Then
  FeldtNavn = FeldtNavn + (\"1\")
  Response.Cookies(\"CookoiesNavn\")(\"FeldtNavn\") = \"\" & FeldtNavn & \"\"
  Response.Cookies(\"CookiesNavn\").Expires = Date+365
  Response.Redirect (\"/Mappe1/side1.asp\")
  End If
End If

:-)
Avatar billede thomasskov Nybegynder
05. maj 2001 - 17:36 #4
tak for hjælpen. Det virker fint.
Avatar billede bojohansen Nybegynder
05. maj 2001 - 18:14 #5
Ærrrrrrrrrrm måske skal du lige
lave
FeldtNavn = FeldtNavn + (\"1\")
om til
FeldtNavn = FeldtNavn + 1
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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