webForumDet fria alternativet

2 frågor?

13 svar · 231 visningar · startad av Ricki

RickiMedlem sedan juni 2000373 inlägg
#1

Är det någon som vet vad detta trim gör?

strMessage = Trim(Request.Form("meddelande"))

En sak till. Om jag har en chatt och vill visa vilka som är inloggade, hur gör jag då. Namnen lagras i session objektet.

------------------
Mvh Rickard
www.ricki.nu

VideMedlem sedan dec. 19998 577 inlägg
#2

Trim tar bort alla mellanslag före och efter strängen's bokstäver...

Du får nog visa lite kod på din chat, hur du lagrar datat i sessionsobjektet...

------------------
www.webeye.nu

RickiMedlem sedan juni 2000373 inlägg
#3

Såhär ser det ut:

<%
If Request.Querystring("anvandare") = "" Then
	Response.Write "Systemfel, kunde inte idetifiera användaren"
Else
	Session("chattanvandare") = Request.Querystring("anvandare")

	APPLICATION.LOCK
	Application("antal_chattare") = Application("antal_chattare") + 1
	APPLICATION.UNLOCK
End If
%>

------------------
Mvh Rickard
www.ricki.nu

emissionMedlem sedan dec. 19996 721 inlägg
#4

Session-objektet är ju knutet till en specifik användare, så där kan du inte lagra användarna. Du måste använda application. Kolla in Scripting.Dictionary.

[Redigerat av emission den 20 jun 2000]

RickiMedlem sedan juni 2000373 inlägg
#5

Var kan man finna info om Scripting.Dictionary?

Det nämmn inte i min bok

------------------
Mvh Rickard
www.ricki.nu

emissionMedlem sedan dec. 19996 721 inlägg
#6

Kolla relaterade länkar i startsidan för ASP-forumet.

RickiMedlem sedan juni 2000373 inlägg
#7

Jag får följande felmeddelnade när jag försöker skapa Dictionary objektet:

Körningsfel i Microsoft VBScript fel '800a01ad' 

ActiveX-komponenten kan inte skapa objekt.: 'Scriptning.Dictionary' 

/ricki2/chatt.asp, rad 6

Finns inte Dictionary objektet med i PWS? Eller har jag hjor fel?

Här är koden:

	Dim Lista
	Lista = CreateObject("Scriptning.Dictionary")

	Chattare = Request.Querystring("anvandare")

	Lista.Add " & Chattare & ","Svart"

------------------
Mvh Rickard
www.ricki.nu

RickiMedlem sedan juni 2000373 inlägg
#8

Sorry, jag såg felet själ. Jag hade stavat fel!

------------------
Mvh Rickard
www.ricki.nu

RickiMedlem sedan juni 2000373 inlägg
#9

Vad är felet?

<%
Dim Bibliotek, Nyckel, Lista, Varde
Set Bibliotek = CreateObject("Scripting.Dictionary")

Chattare = Session("Chattare")

Bibliotek.Add "Rickard", "Svart"
Bibliotek.Add "Sara", "Gron"
Bibliotek.Add "Roger", "Rod"

Nyckel = Bibliotek.Keys
Varde  = Bibliotek.Items

For Lista = 0 To Bibliotek.Count -1
%>
	Namn: <%=Nyckel("Lista")%> - Färg: <%=Varde("Lista")%>
<%
Next
%>

------------------
Mvh Rickard
www.ricki.nu

emissionMedlem sedan dec. 19996 721 inlägg
#10

<%=Nyckel(Lista)%> - Färg: <%=Varde(Lista)%>

RickiMedlem sedan juni 2000373 inlägg
#11

Varför fungerar inte detta?

Chattare = Session("Chattare")
Bibliotek.Add " & Chattare & ", "Vit"

------------------
Mvh Rickard
www.ricki.nu

VideMedlem sedan dec. 19998 577 inlägg
#12

Testa:

Chattare = Session("Chattare")
Bibliotek.Add Chattare, "Vit"

------------------
www.webeye.nu

emissionMedlem sedan dec. 19996 721 inlägg
#13

Därför att det är fel. ;)

Grundläggande om variabler och strängar:

minstrang="hej"

minstrang är en variabel och innehåller strängvärdet hej. Citattecknen används för att ange att värdet som tilldelas också är en sträng.

Hade man skrivit

minstrang=hej

hade ju minstrang fått värdet av en annan variabel, nämligen variabeln hej.

Bibliotek.Add " & Chattare & ", "Vit"

är fel eftersom Add förväntar sig en sträng som argument. Det får den också, men strängen den får är & Chattare &, inte värdet av Chattare.

Bibliotek.Add Chattare, "Vit"

Ska det alltså vara.

[Redigerat av emission den 20 jun 2000]

RickiMedlem sedan juni 2000373 inlägg
#14

ack så jättemycket!

------------------
Mvh Rickard
www.ricki.nu

130 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)