---
title: "online med grön färg"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/144220-online-med-grön-färg"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "WebbisNet"
published: "2006-03-20T06:03:29.000Z"
updated: "2006-03-20T07:25:17.000Z"
replies: 11
views: 448
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/144220-online-med-grön-färg"
---

# online med grön färg

## #1 — WebbisNet, 2006-03-20T06:03Z

Denna kod ska visa medlemmar som är online med grön färg, men bara   **Response.Write uonline** funkar, sätter jag uonline på **Response.Write Left(usr, 10) & ".."** så försvinner den

```
<%usr = latest("username") 
uonline = "<font color=""green""><b>"& latest("username") &"</b></font>"
if latest("inloggad") = 1 then
If Len(usr) > 10 Then
    Response.Write Left(usr, 10) & ".."
Else
    Response.Write uonline
End If
```

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

## #2 — yohpops, 2006-03-20T06:20Z

Skriv ut usr och se om den innehåller något.

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

## #3 — WebbisNet, 2006-03-20T06:39Z

den innehåller något eftersom den skriver ut användarnamnet, men i det här fallet vill jag göra om den så att medlemmar som är online visas i grön fet text och medlemmar som inte är det har den vanliga färgen, koden jag inte skickade med är nästan samma som ovan fast bara med usr = latest("username") 

Det är just det med online som strular.....alla som inte behöver förkortas visa med gön text men inte de som måste förkortas....det är mitt problem

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

## #4 — voigtann1, 2006-03-20T07:02Z

```
usr = latest("username")
if len(usr) > 10 then usr = Left(usr, 10) & ".."
if latest("inloggad") = 1 then
  response.write "<span style='color:green'><strong>" & usr &"</strong></span>"
else
  response.write usr
end if
```

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

## #5 — WebbisNet, 2006-03-20T07:06Z

bättre, men var kommer det dubbla namnet från.....och är ju bara på EN användare

```
okkidoki 	  060320 08:04:59
Goldenhear.. 	060320 08:04:55
Lillan37 	   060320 08:01:52
Lillan37 	
deli 	            060320 07:54:21
Cina_47 	 060320 07:51:42
[VIP-medlem] Skorpsmula.. 	060320 07:50:50
ciia_62 	060320 07:47:23
```

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

## #6 — voigtann1, 2006-03-20T07:09Z

Är ena grön eller?

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

## #7 — WebbisNet, 2006-03-20T07:11Z

ena namnet är en grön länk, det andra är svart text (ingen länk)

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

## #8 — voigtann1, 2006-03-20T07:16Z

tror jag behöver mer kod isåfall... ser inte problemet... kanske med cint(latest("inloggad"))

vad har Lillan37 för värde på latest("inloggad") ?

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

## #9 — WebbisNet, 2006-03-20T07:18Z

Det är olika användare beoende på om de är "aktiva", nästa gång jag uppdaterar är det en annan användare som det blir så med

```
<%if not latest("userID") = 1 then%>
<%if latest("vip") = 1 then
response.write vipicon
End If%>

<%If latest("Sex") = "M" Then
	 Response.Write maleIcon
ElseIf latest("Sex") = "F" Then 
	Response.Write femaleIcon
Else 
	Response.Write coupleIcon
End If
%>
<a href="/view.asp?userID=<%=latest("userID")%>" onmouseover="return escape('<table><tr><td class=presentation1 align=center colspan=2>Info om <%=latest("username")%></td></tr><td class=presentation width=150 valign=top>Ålder: <%=alder(latest("persnr"))%><br>Söker: <%=latest("sokerItem")%><br>Civilstatus: <%=latest("statusItem")%><br>Personlighet: <%=latest("personlighetItem")%></td><td align=right valign=top><img src=\'/images/users/<%=latest("picture")%>\' height=\'80\' width=\'70\'></td></tr></table>')" class="menu">

<%usr = latest("username")
if len(usr) > 10 then usr = Left(usr, 10) & ".."
if latest("inloggad") = 1 then
  response.write "<span style='color:green'><strong>" & usr &"</strong></span>"
else
  response.write usr
end if

else

If Len(usr) > 10 Then
    Response.Write Left(usr, 10) & ".."
Else
    Response.Write usr
End If
End If%>
</b></a>
```

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

## #10 — voigtann1, 2006-03-20T07:22Z

```
...
else

If Len(usr) > 10 Then
    Response.Write Left(usr, 10) & ".."
Else
    Response.Write usr
End If
End If%>
</b></a>
```

Det är där det är problemet.. de sista raderna... det gjordes ju innan else kommer ju :D

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

## #11 — voigtann1, 2006-03-20T07:25Z

```
<%
usr = latest("username")

if not latest("userID") = 1 then
  if latest("vip") = 1 then response.write vipicon
  If latest("Sex") = "M" Then
    Response.Write maleIcon
  ElseIf latest("Sex") = "F" Then 
    Response.Write femaleIcon
  Else 
    response.Write coupleIcon
  End If
  response.write "<a href='/view.asp?userID=" & latest("userID") &"' onmouseover=""return escape('<table><tr><td class=presentation1 align=center colspan=2>Info om " & usr &"</td></tr><td class=presentation width=150 valign=top>Ålder: " & alder(latest("persnr")) & "<br>Söker: " & latest("sokerItem") & "<br>Civilstatus: <%=latest("statusItem")%><br>Personlighet: " & latest("personlighetItem") & "</td><td align=right valign=top><img src=\'/images/users/" & Latest("picture") &"\' height=\'80\' width=\'70\'></td></tr></table>')"" class='menu'>"
  if len(usr) > 10 then usr = Left(usr, 10) & ".."
  if latest("inloggad") = 1 then
    response.write "<span style='color:green'><strong>" & usr &"</strong></span>"
  else 
    response.write usr
  end if
End If%>
</b></a>
```

tror jag skall fungera...

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

## #12 — WebbisNet, 2006-03-20T07:25Z

jag var så blind att jag inte såg det, tack

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/144220-online-med-grön-färg