---
title: "räknare"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/43653-räknare"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Jesper T"
published: "2002-05-13T20:27:57.000Z"
updated: "2002-05-15T18:17:36.000Z"
replies: 26
views: 674
page: 1
pages: 2
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/43653-räknare"
---

# räknare

_Sida 1 av 2._

## #1 — Jesper T, 2002-05-13T20:27Z

Kan ngn tipsa hur jag kan snickra en räknare som plussar på 1 varje gång webläsaren uppdareras. Det hela spars i en cookie och nästa gång jag besöker den sida så kommer kakan ihåg var jag var sista gången så att säga.

om kaka = 0 then kaka=1
'uppdatera webläsare eller komma tillbaka ngn annan gång
kaka =2

OSV...

MVH Jesper

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

## #2 — Sico, 2002-05-13T20:37Z

jag orkar inte sitta å förklara just nu såskickar en färdig räknare enligt din önskan.. har du problem så kan jag svara på dom

counter.asp

```
<%
Dim ObjCounterFile, ReadCounterFile, WriteCounterFile
Dim CounterFile
Dim CounterHits

Set ObjCounterFile = Server.CreateObject("Scripting.FileSystemObject")

CounterFile = Server.MapPath ("counter.txt") 

Set ReadCounterFile= ObjCounterFile.OpenTextFile (CounterFile, 1, True)

If Not ReadCounterFile.AtEndOfStream Then
CounterHits = Trim(ReadCounterFile.ReadLine)
If CounterHits = "" Then CounterHits = 0
Else
CounterHits = 0
End If

ReadCounterFile.Close
Set ReadCounterFile = Nothing

CounterHits = CounterHits + 1

Set WriteCounterFile= ObjCounterFile.CreateTextFile (CounterFile, True)
WriteCounterFile.WriteLine(CounterHits)
WriteCounterFile.Close
Set WriteCounterFile = Nothing

Set ObjCounterFile = Nothing
%>
```

Sen på sidan där nuffrorna ska visas:

```
<!--#include file="counter.asp" -->
<% =CounterHits %>
```

mvh sico

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

## #3 — Jesper T, 2002-05-13T20:41Z

Tack Sico, men om jag inte har helt fel så ser det ut som att det är en räknare som räknar uppåt för alla som skulle råka surfa in på den sidan.
Jag behöver en "personlig räknare" som kollar i en kaka vad det senaste nummret var.

MVH Jesper

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

## #4 — icaaq, 2002-05-13T20:57Z

```
[red]
If Request.Cookie("dinkaka").Haskeys Then
     Response.Cookie("dinkaka")("counter") = Request.Cookie("dinkaka")("counter") --1
Else
     Response.Cookie("dinkaka")("counter") = 1
End If
[/red]
```

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

## #5 — Sico, 2002-05-13T21:08Z

jaha du menar så...  kunde väll inte jag veta ;) men nu när jag tänker efter så kan jag förstå hur jag menar... 
sorry :(

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

## #6 — Jesper T, 2002-05-13T22:26Z

tack Icaaq, men....

När jag stänger webbläsaren och surfar tillbaka till sidan så är räknaren nollställd ju! :( 
Jag skulle bli glad om den var kvar på den siffran som den var på när jag lämnade sidan sist.

MVH Jesper

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

## #7 — Sico, 2002-05-13T22:30Z

```
dinkaka = Request.Cookie("dinkaka")("counter")
Response.Write dinkaka
```

 ???

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

## #8 — Jesper T, 2002-05-13T22:32Z

Tack Sico, men...

Det spelar ingen betydelse :(
Samma sak...

MVH Jesper

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

## #9 — Sico, 2002-05-13T22:44Z

```
If Request.Cookie("dinkaka").Haskeys Then
     Response.Cookie("dinkaka")("counter") = Request.Cookie("dinkaka")("counter") --1
Else
     Response.Cookie("dinkaka")("counter") = 1
     Response.Cookie("dinkaka")("counter").Expires = Date + 1000
End I
```

???

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

## #10 — Jesper T, 2002-05-13T22:55Z

**TACK!**

 :)

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

## #11 — icaaq, 2002-05-14T07:23Z

oops :r

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

## #12 — henrikjohansson, 2002-05-14T12:42Z

Bara en fråga 
Varför 
Response.Cookie("dinkaka")("counter") = Request.Cookie("dinkaka")("counter") --1

och inte
Response.Cookie("dinkaka")("counter") = Request.Cookie("dinkaka")("counter") +1

gör det någon skillnad..

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

## #13 — Erik Juhlin, 2002-05-14T12:49Z

Tror att om man skriver + så kan det konkateneras, men skriver man -- så tvingas det att matematiskt adderas. :)

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

## #14 — henrikjohansson, 2002-05-14T12:52Z

ok

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

## #15 — @nders, 2002-05-14T12:54Z

Man ska alltid se till att ha rätt subtyper på de variabler man arbetar med. 

Att råka konkatenera med ett plustecken för att något av värdena är en sträng, är det värre än att tvinga fram ett type mismatch för att man försöker tvinga en addition till nämnda sträng?

Alltid typkonvertering om man inte är säker på vad man jobbar med.

Alltså: Använd plustecken för att addera tal. Använd ampersand (&) för att konkatenera strängar, och se till att värdena är av de subtyper du och funktionerna förväntar sig.

Mvh,

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

## #16 — henrikjohansson, 2002-05-14T12:55Z

Vilka typer.. svarar så fort.. :P
Tack.. då vet jag det.

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

## #17 — Erik Juhlin, 2002-05-14T12:57Z

Håller med snabel. CLng() är en schysst funktion för att slippa kludd. :)

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

## #18 — @nders, 2002-05-14T12:58Z

Jag skriver bara vad jag *tycker* är rätt, så möt gärna mina argument, och rätta mig om jag har fel, ni där ute. 

Mvh,

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

## #19 — Erik Juhlin, 2002-05-14T13:04Z

Ska man addera, subtrahera och göra andra matematiska saker så bör det vara tal man jobbar med och inte strängar. :)

Sen så förespråkar jag CLng och inte CInt som man ser mycket av. Detta p.g.a. CInt's begränsning på 32 767. Har man ett databasfält av typen int som är incremenerande så kan det ju gå över 32 767. Många småsystem kanske inte går över det, men skulle det göra det så är det inte kul att behöva ändra överallt. :)

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

## #20 — voigtann1, 2002-05-14T14:39Z

Började leta i min första ASP bok här är en kod:

```
<%
If Request.Cookies("KAKA_namn") = "" And Request.Form("namn") = "" Then
Response.Redirect "KAKANY.ASP"
End If

If Request.Cookies("KAKA_namn") = "" Or Not Request.Form("namn") = "" Then
namn = Request.Form("namn")
Response.Cookies("KAKA_namn") = namn
Response.Cookies("KAKA_forsta") = Now
Response.Cookies("KAKA_senast") = Now
Response.Cookies("KAKA_antal") = "1"
forsta = Now
senast = Now
antal = 1

Else

namn = Request.Cookies("KAKA_namn")
senast = Request.Cookies("KAKA_senast")
forsta = Request.Cookies("KAKA_forsta")
antal = Request.Cookies("KAKA_antal")

antal = antal + 1

Response.Cookies("KAKA_senast") = Now
Response.Cookies("KAKA_antal") = antal

End If

Response.Cookies("KAKA_namn").Expires = "April 30, 2001"
Response.Cookies("KAKA_forsta").Expires = "April 30, 2001"
Response.Cookies("KAKA_senast").Expires = "April 30, 2001"
Response.Cookies("KAKA_antal").Expires = "April 30, 2001"

%>

<HTML><HEAD><TITLE>Baka baka kaka...</TITLE></HEAD>
<BODY>
<CENTER>
<H1>Välkommen igen <%=namn%></H1>
<TABLE BORDER = 1>
<TR>
<TD>Första gången du besökte sidan var:
<TD><%=forsta%>
</TR>
<TR>
<TD>Senaste gången du besökte sidan var:
<TD><%=senast%>
</TR>
<TR>
<TD>Totalt har du varit på denna sida:
<TD><%=antal%> gånger
</TR>
</TABLE>
<BR><BR>
<A HREF = "KAKA.ASP">Ladda om denna sida!</A>
</BODY></HTML>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/43653-räknare  
Nästa sida: https://www.webforum.nu/amne/asp/43653-räknare/page2.md