---
title: "Dictionary-globalt"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/48548-dictionary-globalt"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "K++"
published: "2002-07-23T19:41:01.000Z"
updated: "2002-07-24T21:50:25.000Z"
replies: 5
views: 243
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/48548-dictionary-globalt"
---

# Dictionary-globalt

## #1 — K++, 2002-07-23T19:41Z

Går det att tex omvandla följande

```
<html>
<body>

<%
dim d
Dim a
Dim i
Dim s

set	d =Server.CreateObject("Scripting.Dictionary")
	d.Add "arelupok", "aroh"
	d.Add "allunk", "appip"

a = d.Items
for	i = 0 To d.Count -1
	s = s & a(i) & "<br>"
next
Response.Write(s)

set d=nothing
%>

</body>
</html>
```

 

Typ lägga in det i global.asa eller något.. Jag försökte med det gick int.. Så att man enkelt kan visa upp alla värden.. Function crap() eller ngt.. :stud

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

## #2 — LarsG, 2002-07-23T21:44Z

Jag förstår inte vad du vill åstadkomma. Förklara gärna mer.

Vad var det för problem med att lägga koden i global.asa?

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

## #3 — K++, 2002-07-23T21:51Z

Jag har tänkt att göra en liten kodbok med ett eget språk och lite översättningar :birp 

Som jag sedan vill infoga som en ordlista lite här och var.. Dessutom skall man kunna lägga till lite nya  ord lite då och då.. Så att det ligger i application_OnStart..  Hoppas du förstår :)

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

## #4 — mattiasjarnhall, 2002-07-24T07:01Z

Du vill ha din lilla kodbok global om jag förstår dig rätt!
Lägg då den i en applikationsvariabel:

\<%
set	Application("d") =Server.CreateObject("Scripting.Dictionary")
	Application("d").Add "arelupok", "aroh"
	Application("d").Add "allunk", "appip"
%\>

Sen kan du lägga funktionen i en inkluderings-fil som du lägger i alla sidor du vill komma åt den i:

\<%
a = Application("d").Items
for	i = 0 To Application("d").Count -1
	s = s & a(i) & "\<br\>"
next
Response.Write(s)
%\>

Var det så du menade?

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

## #5 — emission, 2002-07-24T08:32Z

Om det inte är en funktion som ska lista orden på varje sida så föreslår jag att du lägger ordlistan i en databas. Dictionaries bör man inte lägga i Application, eftersom det suger resurser.

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

## #6 — K++, 2002-07-24T21:50Z

\*host\*

Cannot add object with apartment model behavior to the application intrinsic object.
//global.asa, line 5

:/

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/48548-dictionary-globalt