Navigacija

Namai Forumas PAIEŠKA ! ! Pagrindinės temos ! Nuorodų katalogas Didž. Php-F saitai Kontaktai
NAUDINGA
Straipsniai DUK Siuntimai Skriptų biblioteka Modai, dizainai Modai šiame saite D.U.K. Informacija Hostingai Domenai
Naudotojo vadovas v7 V6 ir V7 galimybių palyginimas DEMO
NUORODOS
Modifikacijos, panelės Temos/dizainai
PASLAUGOS
Reklama VIP hostingas
Pask. komentarai Administracija

Vartotojų tinkle

Prisijungusių svečių: 252
Prisijungusių narių: 1
Prisijungę nariai:
saulyzas
Registruoti nariai: 25,956
Naujausias narys: saulyzas

Naujausi straipsniai

Įprasti:

Skirti naujokams:

Paskutiniai nariai

saulyzasNaršo
MaFetas 2 dienos
TOMIJUS 1 savaitė
ozzWANTED 1 savaitė
Reikalas10 savaitės
Jaunelis16 savaitės
lanis16 savaitės
And2s17 savaitės
Memento Mori22 savaitės
Quwqkibor24 savaitės
asirija28 savaitės
tomeem30 savaitės
weberiz34 savaitės
mRokass36 savaitės
kartoonas37 savaitės
grunskiz40 savaitės
Bruksnys40 savaitės
illusion40 savaitės
ordo41 savaitės
Jurgaila42 savaitės

Informacija:


OS: Unknown
Naršyklė: Nežinoma
IP: 3.140.188.23
Naujienų: 529
Straipsnių: 235
Temų: 52,588
Postų: 522,537
Postų pask. parą: 0
Shout'ų pask. parą: 0
P.S.C. pask. parą: 0
Nuorodų kataloge: 13

Lankomumo Statistika

Peržiūrų šiandien: 22

Iš viso peržiūrų: 22948724

Prisijungti

REGISTRUOTIS
Nario vardas

Slaptažodis



Pamiršai slaptažodį?
Paprašyk naujo
Aktyvuoti save

Šaukykla

Jei norite rašyti žinutes, turite prisijungti.

MaFetas
2024 Lap. 13 22:11:57
hey how, geras dar veikiantis saitas?

Jaunelis
2024 Lie. 25 11:07:43
Oho vis dar veikia svetainė akinanti šypsen Šimtas metų, matau Šaukykloje nuostalgija. Smagu panaršyt po forumą ir pažiūrėt senas temas šypsosi

And2s
2024 Lie. 17 19:07:04
2008 pirmą kart čia patekau, man buvo 10m ir čia pramokau programavimo.. smagu skaityti senas žinutes, tokia nostalgija akinanti šypsen ačiū Ozz kad saugoji šitą kultūrinį reliktą šypsosi

ozzWANTED
2024 Sau. 17 01:01:00
Desperatiškus komentarus šaukykloje su accountu po mėnesio prasibuvimo, ištryniau. Pasaulis ir taip juodas. Įjungiam šviesą, prašviesės. šypsosi

Majakas
2023 Gru. 10 19:12:39
Negaliu patikėti jog žinutės/pranešimai visi yra nuo 2008 m akinanti šypsen

Šaukyklos archyvas

Apklausa

Ar esate patenkinti lietuviško vertimo kokybe?

Taip!

Taip, bet yra ką taisyti (parašysiu komentaruose)

Ne

Norėdamas balsuoti turite prisijungti.
Archyvas
Reklama 400x60
Online Script
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | Žaliems
Autorius: gogosinas Peržiūrų: 1248      Spausdinti temą
2008 Kov. 8 17:03:58          1 žinutė iš 3
Spausdinti pranešimą
Sveiki gal kas turit toki script kur rodytu kiek dabar narso puslapi ..?
tik be mysql.. jei galite padekit.. šypsosi galvoja
2008 Kov. 8 17:03:05          2 žinutė iš 3
Spausdinti pranešimą
Elemtarus online scriptas.Susideda is triju failu.
online.dat
online.php
who.php
Suchmodinkite online.dat i 777
-----------------------------------------------
Online.php:

<?php

$data="online.dat";
$time=time();
$past_time=time()-300;
$readdata=@fopen($data,"r") or die("$data tokio failo nera!");
$data_array=file($data);
@fclose($readdata);
if (getenv('HTTP_X_FORWARDED_FOR'))
    $user = getenv('HTTP_X_FORWARDED_FOR');
else
    $user = getenv('REMOTE_ADDR');
$agent = getenv('HTTP_USER_AGENT');
$d=count($data_array);
for($i=0;$i<$d;$i++)
    {
    list($live_agent,$live_user,$last_time)=explode("::","$data_array[$i]");
    if($live_user!=""&amp;&amp;$last_time!=""&amp;&amp;$live_agent!=""):
    if($last_time<$past_time):
        $live_user="";
        $last_time="";
        $live_agent="";
    endif;
    if($live_user!=""&amp;&amp;$last_time!=""&amp;&amp;$live_agent!="")
        {
            if($user==$live_user&amp;&amp;$agent==$live_agent)
                {
                $online_array[]="$agent::$user::$time\r\n";
                }
            else
                $online_array[]="$live_agent::$live_user::$last_time";
            }
        endif;
        }
if(isset($online_array)):
foreach($online_array as $i=>$str)
    {
        if($str=="$agent::$user::$time\r\n")
            {
            $ok=$i;
            break;
            }
        }
foreach($online_array as $j=>$str)
    {
    if($ok==$j) { $online_array[$ok]="$agent::$user::$time\r\n"; break;}
    }
    endif;
$writedata=@fopen($data,"w") or die("$data tokio failo nera!");
@flock($writedata,2);
if($online_array=="") $online_array[]="$agent::$user::$time\r\n";
foreach($online_array as $str)
    fputs($writedata,"$str");
@flock($writedata,3);
@fclose($writedata);
$readdata=@fopen($data,"r") or die("$data tokio failo nera!");
$data_array=@file($data);
@fclose($readdata);
$online=count($data_array);
print '<u>Online:</u><a href="who.php">'.$online.'</a><br/>';
?>




-----------------------------------------------------------

who.php

<?php
$data = file('online.dat');
foreach($data as $val)
{
   $ex = explode('::', $val);
   $ex2 = explode(' ', $ex[0]);
   print '<b>'.$ex2[0].'</b>-'.date('H:i:s', (int)(trim($ex[2]))).'<br/>';
}
?>
2008 Kov. 8 17:03:37          3 žinutė iš 3
Spausdinti pranešimą
http://ozas.itg.lt/web_kurejams/...online.php
Peršokti į forumą: