---
title: "Dubbla OnStart i global.asa"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/14047-dubbla-onstart-i-global-asa"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Korak"
published: "2002-01-28T07:40:00.000Z"
updated: "2002-01-28T08:13:00.000Z"
replies: 2
views: 206
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/14047-dubbla-onstart-i-global-asa"
---

# Dubbla OnStart i global.asa

## #1 — Korak, 2002-01-28T07:40Z

Kan man ha dubbla OnStart scripts i global.asa?
Jag har för mig att det ska gå att slå ihop dem på nåt sätt.
Min global.asa ser nu ut så här.
Högst upp (till en chat):

```
<OBJECT
	RUNAT="Server"
	SCOPE="Application" 
	ID="conquerChatUsers"
	PROGID="Scripting.Dictionary">
</OBJECT>

<OBJECT
	RUNAT="Server"
	SCOPE="Application" 
	ID="conquerChatRooms"
	PROGID="Scripting.Dictionary">
</OBJECT>

<OBJECT
	RUNAT="Server"
	SCOPE="Application" 
	ID="conquerChatMessages"
	PROGID="Scripting.Dictionary">
</OBJECT>
```

Efter det följer aktiva besökare:

```
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
	SUB Application_OnStart
  		DIM Stats( 4, 100 )
  		Application( "Stats" ) = Stats
	END SUB
</SCRIPT>

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
 SUB Session_OnEnd
  Application.Lock
  statistik = Application( "Stats" )
  For i = 0 to UBOUND( statistik, 2 )
    IF statistik( 0, i ) = Session.SessionID THEN
      statistik( 0, i ) = ""
      EXIT FOR 
    END IF
  NEXT
  Application( "Stats" ) = statistik
  Application.UnLock
 END SUB
</SCRIPT>
```

Det jag sedan skulle vilja ha in är en kod för en Ad Rotator som ser ut så här:

```
<SCRIPT LANGUAGE="VBScript" RUNAT="Server"> 
Sub Application_OnStart 
End Sub 

Sub Application_OnEnd 
End Sub 

Sub Session_OnStart 
session("ad")=0 
End Sub 

Sub Session_OnEnd 
End Sub 

</SCRIPT>
```

Hur gör jag lämpligast?

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

## #2 — @nders, 2002-01-28T07:52Z

Du kan bara ha en sub som heter Session_OnStart, och bara en som heter Application_OnStart. Men, du kan lägga in flera olika prylar i dessa.

Jag antar att dina \<object\>s skall ligga i application_onstart?

I så fall:

```
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Application_OnStart
DIM Stats( 4, 100 )
Application( "Stats" ) = Stats

<OBJECT
RUNAT="Server"
SCOPE="Application" 
ID="conquerChatUsers"
PROGID="Scripting.Dictionary">
</OBJECT>
<OBJECT
RUNAT="Server"
SCOPE="Application" 
ID="conquerChatRooms"
PROGID="Scripting.Dictionary">
</OBJECT>

<OBJECT
RUNAT="Server"
SCOPE="Application" 
ID="conquerChatMessages"
PROGID="Scripting.Dictionary">
</OBJECT>

END SUB

SUB Session_OnStart
session("ad")=0 
END SUB

SUB Session_OnEnd
Application.Lock
statistik = Application( "Stats" )
For i = 0 to UBOUND( statistik, 2 )
IF statistik( 0, i ) = Session.SessionID THEN
statistik( 0, i ) = ""
EXIT FOR 
END IF
NEXT
Application( "Stats" ) = statistik
Application.UnLock
END SUB
</SCRIPT>
```

Alltså, de kan givetvis samexistera, så länge du ser till att lägga kodstyckena i rätt sub.

Mvh,

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

## #3 — Korak, 2002-01-28T08:13Z

Tack för hjälpen!
Jag hade inte \<objects\> i application_onstart tidigare, men det är säkert jag som gjort fel.
Testar detta nu.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/14047-dubbla-onstart-i-global-asa