---
title: "Vad händer här nu då?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/9151-vad-händer-här-nu-då"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Daniel78"
published: "2001-04-25T12:12:00.000Z"
updated: "2001-04-25T13:38:00.000Z"
replies: 11
views: 244
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/9151-vad-händer-här-nu-då"
---

# Vad händer här nu då?

## #1 — Daniel78, 2001-04-25T12:12Z

Ojoj, snart bryter jag ihop! Det är så att jag började ordna till mitt inlogg idag och ända fram till nu så har allt fungerat perfekt men säg den glädje som varar!! Nu har allting börjat strula utan att jag gjort något!

På varje sida som kräver lite behörighet kollar jag vilket nummer sessionen innehåller och detta bestämmer om användaren har rätt att se en sida:

If Session("MyLoginIndividualAccess") \>= 4 Then

Ovan betyder att enbart den som har en session med 4 har behörighet.

If Session("MyLoginIndividualAccess") \>= 3 Then

Ovan betyder att admin(4) fortfarande har behörighet men oxå den med session 3!

Problemet är att nu tjatar den om att nummerna måste in emellan "3" (dubbelfjuttar)! Men använder jag dubbelfjuttar så kommer ingen in oavsett nummer! Detta gör mig väldigt aggresiv eftersom det fungerade hela förmiddan utan problem! Finns det någon lösning?

Permalänk: https://www.webforum.nu/p/9151

## #2 — @nders, 2001-04-25T12:14Z

```
If CInt(Session("MyLoginIndividualAccess")) >= 3 Then
```

 :q

Permalänk: https://www.webforum.nu/p/267117

## #3 — Daniel78, 2001-04-25T12:33Z

Felmeddelande:

Type mismatch: 'CInt'

Permalänk: https://www.webforum.nu/p/267118

## #4 — @nders, 2001-04-25T12:47Z

kan det inte vara så enkelt att sessionen tappat sitt värde?

Permalänk: https://www.webforum.nu/p/267119

## #5 — Daniel78, 2001-04-25T12:53Z

Hur kan man kolla detta då? Det jag tycker är märkligt är att det fungerade fint under hela förmiddagen!

Permalänk: https://www.webforum.nu/p/267120

## #6 — DavidB, 2001-04-25T12:55Z

> Ovan betyder att enbart den som har en session med 4 har behörighet.

```
If Session("MyLoginIndividualAccess") >= 4 Then
```

borde det inte vara bara ett = om enbart den som har en 4 i sin session ska ha behörighet?

Permalänk: https://www.webforum.nu/p/267121

## #7 — @nders, 2001-04-25T12:56Z

Hur kan man kolla detta då?

response.write session("sessionensnamn")

Permalänk: https://www.webforum.nu/p/267122

## #8 — Daniel78, 2001-04-25T13:13Z

Okej, har nu gjort en sida som ska kolla detta och den skriver inte ut någonting alls! Då har värdet med andra ord trollats bort, eller?

Permalänk: https://www.webforum.nu/p/267123

## #9 — @nders, 2001-04-25T13:14Z

om du loggar in på din sajt igen så borde värdet vara korrekt igen.

sessioner timeoutar per default efter 20 min.

Permalänk: https://www.webforum.nu/p/267124

## #10 — Daniel78, 2001-04-25T13:27Z

Okej, nu har jag kommit fram till att det är detta script jag inkluderar på inloggningssidan som spökar, för om jag kör en "response.write session" direkt efter detta script så finns det ingen session! Alltså faller den tydligen bort här någonstans:

If Request.Form("rectype") = "Validate" Then
	If Len(Request.Form("UserCode")) \<1 or Len(Request.Form("Password")) \< 1 Then
		Session("MyLoginUserValidated") = "No"
	Else
		Set MyConn=Server.CreateObject("ADODB.Connection")
		MyConn.Open "PROVIDER=MSDASQL;" & "DRIVER={Microsoft Access Driver (\*.mdb)}; " & "DBQ=" & MyLoginDB
		MySQL="Select  \* from UserData Where UserCode = '"  & Request.Form("UserCode") & "' and Password = '" & Request.Form("Password") & "'"  
		Set MyRs=MyConn.Execute(MySQL)
		If MyRs.BOF or MyRs.EOF Then
			Session("MyLoginUserValidated") = "No"
		Else
			If MyLoginGroup = "None" Then
				If MyRs("IndividualAccess") = MyLoginIndividualAccess Then
					theDate = MyRs("ExpirationDate")
					DateCheck = DateDiff("d", Now, theDate)
					If DateCheck \< 1 Then
						Session("MyLoginUserValidated") = "Expired"
						Session("MyLoginGroup") = "None"
						Session("MyLoginIndividualAccess") = ""
						Session("MyLoginUserName") = ""
						Session("MyLoginNickName") = ""
					Else
						Session("MyLoginUserValidated") = "Yes"
						Session("MyLoginGroup") = "None"
						Session("MyLoginIndividualAccess") = MyRs("IndividualAccess")
						Session("MyLoginName") = MyRs("Name")
						Session("MyLoginNickName") = MyRs("NickName")
					End If
				Else
					Session("MyLoginUserValidated") = "Almost"
					Session("MyLoginGroup") = "None"
					Session("MyLoginIndividualAccess") = ""
					Session("MyLoginUserName") = ""
					Session("MyLoginNickName") = ""
				End If
			Else
				If MyRs("Group") = MyLoginGroup Then
					Session("MyLoginUserValidated") = "Yes"
					Session("MyLoginGroup") = MyRs("Group")
					Session("MyLoginIndividualAccess") = ""
					Session("MyLoginUserName") = ""
					Session("MyLoginNickName") = ""
				Else
					Session("MyLoginUserValidated") = "Yes"
					Session("MyLoginGroup") = MyRs("Group")
					Session("MyLoginIndividualAccess") = MyRs("IndividualAccess")
					Session("MyLoginUserName") = MyRs("Name")
					Session("MyLoginNickName") = MyRs("NickName")
					'Session("MyLoginUserValidated") = "Almost"
					'Session("MyLoginGroup") = "None"
					'Session("MyLoginIndividualAccess") = ""
					'Session("MyLoginUserName") = ""
					'Session("MyLoginNickName") = ""
				End If
			End If
		End If
		Session.Timeout = 60
		MyRs.close
		Set MyRs= Nothing
		MyConn.Close
		set MyConn=nothing
	End If
End If

Jag använder "MyLoginIndividualAccess" som session och inte "MyLoginGroupAccess". Om någon orkar att ta en snabb titt på detta o ge lite tips så är jag ytterst tacksam!

Permalänk: https://www.webforum.nu/p/267125

## #11 — @nders, 2001-04-25T13:29Z

om du skriver ut dim sql-fråga med response.write, ser den då korrekt ut?

```
MySQL="Select * from UserData Where UserCode = '" & Request.Form("UserCode") & "' and Password = '" & Request.Form("Password") & "'"´
response.write MySQL
```

mvh,

Permalänk: https://www.webforum.nu/p/267126

## #12 — Daniel78, 2001-04-25T13:38Z

Ja, den fungerar som den ska.

Permalänk: https://www.webforum.nu/p/267127

---

Tråden på webben: https://www.webforum.nu/amne/asp/9151-vad-händer-här-nu-då