---
title: "aktiva besökare"
type: "forum-thread"
url: "https://www.webforum.nu/amne/programmering/19292-aktiva-besökare"
topic: "Programmering"
topic_url: "https://www.webforum.nu/amne/programmering"
author: "Gimbo"
published: "2001-03-02T10:09:00.000Z"
updated: "2001-03-02T12:31:00.000Z"
replies: 6
views: 207
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/programmering/19292-aktiva-besökare"
---

# aktiva besökare

## #1 — Gimbo, 2001-03-02T10:09Z

Hejsan jag har ett script på aktiva besökare, men för att få den o fungera så måste ju den skriva en acess fil o lägga upp den på min server men min server tycks inte tillåta det, e det någon som känner till en gratis server som tillåter det?

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

## #2 — Gislaved.net, 2001-03-02T10:14Z

Du kan ju lösa det med textfiler eller någon annan databas som du har tillgång till istället. T.ex. [www.f2s.com](http://www.f2s.com)  ger dig gratis tillgång till MySQL.

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

## #3 — Gimbo, 2001-03-02T10:33Z

jag har redan ett konto hos f2s men jag får inte det att funka, snälla kan du kolla in scriptet o förklara för mig hur man gör sen... Hur gör man så att f2s tillåter scriptet att skriva en fil på deras server?

här e scriptet, om den kan komma till nytta:

	\# The file that stores IP addresses and time they accessed the site
	$guests_data = 'guests.txt';

	\# How many seconds to keep an IP address in the list before it becomes invalid
	$timeout = 10;

	\# Logs at what time you had the most guests browsing your site
	$max_log = 'maxguests.txt';

\# Done! No need to go below unless you know what your doing!
\##############################################################################

	$line = $ENV{'REMOTE_ADDR'} . "\\t" . time . "\\n";

	print "Content-type: text/html\\n\\n";

	if ( -e $guests_data ne 0 or -s $guests_data eq 0 ) { &write_new; print '10'; exit; }

	&write_update;

	&write_new;

	$count = &read_count;

	print $count;

	&log_max if $max_log;

	exit;

\##############################################################################
\# Sub-Routines

sub log_max
{
	if ( -e $max_log )
	{
		open(FILE,$max_log) || die $!;
		$log = \<FILE\>;
		close(FILE);
	}
	else { $log = "0\\t0" }
	
	($MAX,$TIME) = split(/\\t/,$log);
	
	if ( $count \> $MAX )
	{
		($sec,$min,$hour,$mday,$mon,$year)=localtime(time);
		$year = $year + 1900;

		open(FILE,"\>$max_log") &#0124;&#0124; die $!;
		print FILE "$count\\t$hour:$min:$sec $mon/$mday/$year";
		close(FILE);
	}

}

sub read_count
{
	open(FILE,$guests_data) &#0124;&#0124; &error;
	@file = \<FILE\>;
	close(FILE);

	$count = @file;

	return($count);
}

sub write_new
{
	open(FILE,"\>\>$guests_data") &#0124;&#0124; &error;
	print FILE $line;
	close(FILE);
}

sub write_update
{
	open(FILE,$guests_data) &#0124;&#0124; &error;
	@file = \<FILE\>;
	close(FILE);

	open(FILE,"\>$guests_data") &#0124;&#0124; &error;
	foreach $fline ( @file )
	{
		($IP,$TIME) = split(/\\t/,$fline);
		chomp($TIME);
		if ( $IP ne $ENV{'REMOTE_ADDR'} )
		{
			if ( $TIME + $timeout \> time ) { print FILE "$IP\\t$TIME\\n"; }
		}
	}
	close(FILE);
}

sub error
{
	print "\[Unexpected error ocurred\]";
	exit;
}

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

## #4 — Gislaved.net, 2001-03-02T11:52Z

Du behöver ställa in rättigheterna på både scriptet och filerna du ska skriva till. CHMOD 755 på scriptet för att göra det körbart, och CHMOD 777 på filerna. Gör en sökning på CHMOD här i forumet så får du upp en himla massa träffar ska du se.

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

## #5 — Gimbo, 2001-03-02T12:16Z

Har ställt in rättigheterna på både skripetet och på maxguests.txt samt guests.txt men ändå står det att det bara är 1 aktiv besökare hela tiden. Men jag vet att det finns 2aktiva besökare för att jag bad min kompis att besöka sidan...pleas help

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

## #6 — Gislaved.net, 2001-03-02T12:27Z

Det där scriptet verkar behöva lite finputsning... 

Ta en titt på <http://cgi.webforum.nu/wf/Forum12/HTML/000296.html>  istället. Det går att köra PHP-script på F2S.

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

## #7 — Gimbo, 2001-03-02T12:31Z

Ok, tackar

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

---

Tråden på webben: https://www.webforum.nu/amne/programmering/19292-aktiva-besökare