2 svar · 238 visningar · startad av casca
Hade lite svårt att sätta en lämplig titel, men jag hoppas att den nuvarande inte är alltför missvisande. Mitt problem är att jag håller på att bygga en ganska simpelt konstruerad chatt, och använder Application-variabler, som jag helt enkelt radar upp på sidan som visar meddelandena.
Kod:
<% =Application("Chat1") %><br>
<% =Application("Chat2") %><br>
<% =Application("Chat3") %><br>
<% =Application("Chat4") %><br>
<% =Application("Chat5") %><br>
<% =Application("Chat6") %><br>
<% =Application("Chat7") %><br>
<% =Application("Chat8") %><br>
<% =Application("Chat9") %><br>
<% =Application("Chat10") %><br>
<% =Application("Chat11") %><br>
<% =Application("Chat12") %><br>
<% =Application("Chat13") %><br>
<% =Application("Chat14") %><br>
<% =Application("Chat15") %><br>
<% =Application("Chat16") %><br>
<% =Application("Chat17") %><br>
<% =Application("Chat18") %><br>
<% =Application("Chat19") %><br>
<% =Application("Chat20") %><br>
<% =Application("Chat21") %><br>
<% =Application("Chat22") %><br>
<% =Application("Chat23") %><br>
<% =Application("Chat24") %><br>
<% =Application("Chat25") %><br>
Dock är det inte vidare snyggt, då det blir en "blank" rad när inget meddelande finns där. Och att använda en If-sats på varje rad kan ju bli lite överdrivet, så jag undrar helt enkelt, finns det något enklare sätt för att kolla vilka som är tomma eller inte? :)
(Dessutom vill jag förstås ha en "omvänd" ordning gärna, dvs att det nyaste meddelandet kommer längst ner på sidan...)
Något sånt här kanske?
for i = 1 to 25
if not trim(Application("Chat"&i)) = "" then
Response.write Application("Chat"&i) & "<br>"
end if
next
För att vända på det borde man kunna göra så här:
for i = 25 to 1 step -1
if not trim(Application("Chat"&i)) = "" then
Response.write Application("Chat"&i) & "<br>"
end if
next
Mvh,