webForumDet fria alternativet

besöksräknare

ASP

12 svar · 419 visningar · startad av soffan76

Medlem sedan maj 2001684 inlägg
Frågan#1

Hej alla!

Nån som har ett enkelt skript som räknar antal besökare och använder sig av en textfil?

Mvh Sofia

Medlem sedan aug. 20011 099 inlägg
#2

kolla in här http://www.fatmilk.nu/zip/raknare.zip

Medlem sedan maj 2001684 inlägg
#3

Tackar! Precis vad jag behövde!

Medlem sedan maj 2001684 inlägg
#4

Har stött på problem....

Har tyvärr problem med detta skript nu. Det fungerade utmärkt lokalt men inget händer när det ligger uppe på webbservern. Det står besökare: 1 hur mycket man än uppdaterar. Nån som vet vad det kan bero på?

Medlem sedan mars 20002 836 inlägg
#5

Nej, inte direkt utan att ha sett koden

cya,
PatrikB

Medlem sedan maj 2001684 inlägg
#6

KOd....

Ok, sorry...Här kommer den...


<font face="Verdana" size="1"><font color="#000000">bes&ouml;kare: </font><b> 

<%
on error resume next 
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath("besokare.txt"))
counter = clng(act.readline)
counter = counter + 1
act.close

Set act = fso.CreateTextFile(server.mappath("besokare.txt"), true)
act.WriteLine(counter)
act.Close
%>

<%
on error resume next 
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath("besokare.txt"))
counter = clng(act.readline)
counter = counter + 0
act.close
Set act = fso.CreateTextFile(server.mappath("besokare.txt"), true)
act.WriteLine(counter)
act.Close
Response.Write counter
%>
</b></font>
Medlem sedan juni 200032 967 inlägg
#7

Ta bort on error resume next i koden så du får se ett felmeddelande. Jag gissar på Permission denied, alltså att internetanvändaren på servern inte har rättighet att skriva i mappen.

Men, som sagt, återkom med det felmeddelandet. :)

Mvh,

Medlem sedan maj 2001684 inlägg
#8

När jag tar bort den raden får jag "Sidan kan inte visas". Ska jag kontakta webbhotellet och be dem om skrivrättigheter till den mappen där textfilen ligger eller?

Medlem sedan juni 200032 967 inlägg
#9

Har du vänliga felmeddelanden på i din browser så ska du ta bort dem också. Annars får du bara standardfelsidan när något blir galet.

I IE: Tools - Internet Options - Advanced - Use Friendly Error Messages.

På svenska heter det som sagt Vänliga http-felmeddelanden.

Avmarkera och försök igen.

Mvh,

Medlem sedan maj 2001684 inlägg
#10

felmeddelandet

Nu får jag:

Microsoft VBScript runtime error '800a0046'

Permission denied

/navi.asp, line 320

Detta händer trots att jag enligt webbhotellets rekomendation flyttat textfilen till cgi-bin...

Medlem sedan mars 20002 836 inlägg
#11

Har du fortfarande kvar textfilen i den första katalogen du testade i?

Prova att relatera sökvägen till filen från wwwroot:

set act = fso.opentextfile(server.mappath("/cgi-bin/besokare.txt"))

cya,
PatrikB

Medlem sedan maj 2001684 inlägg
#12

Nej, jag har flyttat textfilen helt till cgi-bin.
Det är denna reden den klagar på:

Set act = fso.CreateTextFile(server.mappath("/cgi-bin/besokare.txt"), true)
Medlem sedan maj 2001684 inlägg
#13

Det funkar!

Det hela fungerar nu. Det var nån inställning på servern som behövde fixas. Tack för er hjälp!

260 ms totalt · 4 externa anrop · v20260731065814-full.e96017d9
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)
126 ms — ändringar (db)