---
title: "Antal inloggade på siten..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/38224-antal-inloggade-på-siten"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Lukaspojken"
published: "2001-10-08T19:45:00.000Z"
updated: "2001-10-08T19:45:00.000Z"
replies: 0
views: 1385
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/38224-antal-inloggade-på-siten"
---

# Antal inloggade på siten...

## #1 — Lukaspojken, 2001-10-08T19:45Z

För att använda denna funktion så måste du behörighet att använda global.asa (gratis webbhotell tillåter oftast inte detta).

Denna kod ska finnas i global.asa
\<font size="1" face="Verdana, Arial, Helvetica, sans-serif"\>Kod:\<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666"\>
\<script language=VBScript runat=Server\>
Sub Application_OnStart
	Application("antal") = 0
End Sub

Sub Session_OnEnd
	IF session("userID") \<\> "" THEN
		Application.Lock
		Application("antal") = cint(Application("antal")) -1
		Application.Unlock
	End if
End Sub
\</script\>

När användaren loggar in och får en session så ska du lägga till denna application("antal"). Ska ge ett exempel.

Ett utdrag ur login.asp
\<font size="1" face="Verdana, Arial, Helvetica, sans-serif"\>Kod:\<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666"\>
session("userID") = userID

Application.Lock
Application("antal") = cint(Application("antal")) +1
Application.Unlock
			
Response.Redirect "medlem.asp"

Eventuella diskussioner kring scriptet kan göras i denna tråd:
 <http://cgi.webforum.nu/wf/Forum11/HTML/006675.html>

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/38224-antal-inloggade-på-siten