---
title: "Unika besökare, byta siffror emot bilder..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/95300-unika-besökare-byta-siffror-emot-bilder"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "adnoctum"
published: "2004-01-20T18:27:04.000Z"
updated: "2004-01-20T22:14:46.000Z"
replies: 6
views: 276
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/95300-unika-besökare-byta-siffror-emot-bilder"
---

# Unika besökare, byta siffror emot bilder...

## #1 — adnoctum, 2004-01-20T18:27Z

Hej !

Jag har kört fast, jag kan inte få till det så att siffrorna i en .asp räknare som räknar unika besökare byts ut emot bilder...

Är det nån som har tid & lust att ge mig tips ? Här är koden...

 \<%
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath("session_count.txt"))
counter = clng(act.readline)
if session("been_here_before") = "" then
session("been_here_before") = "Yes"
counter = counter + 1
Set act = fso.CreateTextFile(server.mappath("session_count.txt"), true)
act.WriteLine(counter)
end if
act.Close
Response.Write counter
%\> 

Antalet besökare sparas altså i "session_count.txt"....

Om någon har ett tips på en annan räknare, som räknar unika, totalt och som kan visa "unika besökare i dag", så vore det ännu bättre....

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

## #2 — M.Cheraghi, 2004-01-20T18:32Z

<http://www.webforum.nu/showthread.php?s=&threadid=93103&forumid=22>

där hittar du lite grann om hur man byter ut bokstäver mot bilder! det är enkelt att skriva om till så att den gör om bara siffror!

MVH

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

## #3 — Sebbe, 2004-01-20T21:09Z

Det lättaste sättet enligt mig är att göra på det här sättet:

```
strNumbers = "9845"

For i = 1 To Len(strNumbers)
  Response.Write("<img src=""" & Mid(strNumbers, i, 1) & """>")
Next
```

Välkommen till wF, förresten! :D

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

## #4 — adnoctum, 2004-01-20T21:27Z

tack! jag brukar oftast bara kika i forumet, och söka efter möjliga svar på mina små webrelaterade problem när det inte går som jag vill... Men nu i dag så tappade jag tålamodet, efter att ha provat en massa olika alternativ för att byta siffror emot bilder...

Sebbe... jag är inte riktigt med på hur du menar att ditt förslag skulle användas, ska jag lägga det inom \<% %\>, eller ?

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

## #5 — M.Cheraghi, 2004-01-20T21:30Z

```
<%
strNumbers = [b]"9845"[/b]

For i = 1 To Len(strNumbers)
  Response.Write("<img src=""" & Mid(strNumbers, i, 1) & """>")
Next
%>
```

Det fetmarkerade har sebbe bara lagt dit preliminärt så om du använder den koden så kommer 9845 at visas som bild, du skall istället lägga in din sträng där, dvs värdet som hämtas från databasen antalet besökare altså!

Och ja koden skall vara inom \<%%\> om du inte redan har det när du öppnar databsen för att hämta antalaet besökare

MVH

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

## #6 — Sebbe, 2004-01-20T21:32Z

Jo, eftersom det är ASP-kod så ska det skrivas inom \<% %\>. Såhär kanske scriptet kan se ut i helhet:

```
<%
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath("session_count.txt"))
counter = clng(act.readline)

if session("been_here_before") = "" then
  session("been_here_before") = "Yes"
  counter = counter + 1
  Set act = fso.CreateTextFile(server.mappath("session_count.txt"), true)
  act.WriteLine(counter)
end if

act.Close : Set act = Nothing
Set fso = Nothing

For i = 1 To Len(CStr(counter))
  Response.Write("<img src=""" & Mid(CStr(counter), i, 1) & """>")
Next
%>
```

**/red** Gud vad jag hade slarvat! :p

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

## #7 — adnoctum, 2004-01-20T22:14Z

tack igen! jag hade redan gjort precis så som du tipsade om... tyckte först att det verkade lite krångligt, men när jag kollade på min kod så var det logiskt. Det funkar fin-fint nu i alla fall.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/95300-unika-besökare-byta-siffror-emot-bilder