13 svar · 231 visningar · startad av Ricki
Ä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
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
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
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]
Var kan man finna info om Scripting.Dictionary?
Det nämmn inte i min bok
------------------
Mvh Rickard
www.ricki.nu
Kolla relaterade länkar i startsidan för ASP-forumet.
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
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
<%=Nyckel(Lista)%> - Färg: <%=Varde(Lista)%>
Varför fungerar inte detta?
Chattare = Session("Chattare")
Bibliotek.Add " & Chattare & ", "Vit"
------------------
Mvh Rickard
www.ricki.nu
Testa:
Chattare = Session("Chattare")
Bibliotek.Add Chattare, "Vit"
------------------
www.webeye.nu
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]