LINUXSOFT.cz Přeskoč levou lištu
Uživatel: Heslo:  
   CZUKPL

> Chat

Edituj záznam
Kategorie: PHP
Programovací jazyk: PHP
Domovská stránka:
Download:
Tvůrce:
Popis skriptu: Jednoduchy chat bez SQL
Nároky na klienta:
Nároky na server:
Kód s komentáři:
<-- index.php --> 

<? 
require "./const.php"

ClearStatCache(); // vymaz vyrovnavaciu pamet 

if(!File_Exists($subor)) // ak subor neexistuje - vytvor ho 
    
FClose(FOpen($subor,"w")); 
?> 
<html> 
<head> 
    <title>Jednoduchý "chat"</title> 
</head> 

<frameset rows="100,*,20"> 
    <frameset cols="34%,*"> 
        <frame src="head.php?oldSize=<?ClearStatCache(); echo FileSize($subor)?>" name="head"> 
        <frame src="form.php?name=&sprava=" name="form"> 
    </frameset> 
    <frame src="show.php" name="show"> 
</frameset> 

</html> 


<-- show.php --> 

<? 
Header
("Pragma: no-cache"); 
Header("Cache-control: no-cache"); 
Header("Expires: ".GMDate("D, d m Y H:i:s")." GMT"); 
?> 
<html> 
<head> 
    <title>Zobrazenie odkazov</title> 
</head> 
<body bgcolor="#cccccc"> 
<p style="font-family: 'ARIAL CE', 'HELVETICA CE','ARIAL','HELVETICA'; font-size: 12px;"> 
<? 
require "./const.php"// nacitaj "konstanty" 

$fp FOpen($subor,"r"); // otvor subor na citanie 

ClearStatCache(); // vymaz vyrovnavaciu pamet 
$velkostSuboru FileSize($subor); // zisti velkost suboru 

if($velkostSuboru $maxOdkazByte// uz mam v datovom subore viac sprav ako maxPocetOdkaz ? 
    
FSeek($fp,$velkostSuboru $maxOdkazByte); // zmen poziciu na poslednych maxPocetOdkaz 

FPassThru($fp); // vypis suboru od aktualnej pozicie & zatvor subor 
?> 
</p> 
</body> 
</html> 

<-- form --> 

<html> 
<!-- Ak nie je vyplnene meno - zameraj nan kurzor. Inak zameraj na spravu. --> 
<body bgcolor="#666666" onLoad="if(document.f.meno.value.length) document.f.sprava.focus(); else document.f.meno.focus();"> 
<? 
require "./const.php"

if(
$sprava != ""): // ak sprava nieco obsahuje 

    
if($meno == ""
        
$meno "anonym"// ak uzivatel nezadal meno bude "anonym" 
    
else 
        
$meno StripSlashes(StrTr($meno,"<>&","***")); // odstran lomitka spred citlivych znakov a nahradi niektore nebezpecne znaky 

    
$sprava StripSlashes(StrTr($sprava,"<>&","***")); // odstran lomitka spred citlivych znakov a nahradi niektore nebezpecne znaky 

    
$fp fopen($subor,"a"); // otvor subor pre doplnenie 
    
fputs($fp,sprintf($format,$meno,$sprava)); // naformatuj odkaz a zapis ho do suboru 
    
fclose($fp); // zatvor subor 
    
?> 
        <script language="JavaScript"> 
        parent.frames["show"].location = "show.php" // bola pridana sprava, obnov zobrazenie odkazov 
        </script> 
    <? 
    
endif; 
?> 
<form method=post name="f"> 
<table border="0" align="center"> 
    <tr align="center"> 
        <td>meno</td> 
        <td>správa</td> 
    </tr> 
    <tr align="center" valign="baseline"> 
        <td><input type="text" name="meno" size="8" maxlength="<?echo $maxDlzkaMeno?>" value="<?echo $meno?>"></td> 
        <td><input type="text" name="sprava" size="40" maxlength="<?echo $maxDlzkaSprava?>"> <input type=submit value=" Ok "></td> 
    </tr> 
</table> 
</form> 
</body> 
</html> 


<-- head.php --> 

<? 
Header
("Pragma: no-cache"); 
Header("Cache-control: no-cache"); 
Header("Expires: ".GMDate("D, d m Y H:i:s")." GMT"); 
?> 
<html> 
<head> 
    <title>Kontrola nových odkazov</title> 
    <style type="text/css"> 
        input { 
            background-color: #666666; 
            color: #000000; 
            border-left: 0px; 
            border-right: 0px; 
            border-top: 0px; 
            border-bottom: 0px; 
        } 
    </style> 
</head> 
<body bgcolor="#666666"> 
<? 
require "./const.php"

ClearStatCache(); // vymaz vyrovnavaciu pamet 
$newSize FileSize($subor); // zisti velkost suboru 

if($newSize != $oldSize): // pribudol novy odkaz ? 
?> 
    <script language="JavaScript"> 
    parent.frames["show"].location = "show.php" // obnov ramec "show" 
    </script> 
<? 
endif; 
?> 
<form name="form"> 
Kontrola nastane za <input type="text" name="timer" size="3" readonly> s 
</form> 

<script language="JavaScript"> 
var t = 10 // konstanta v sekundach znovunacitania stranky 

function Timer(){ 
    document.form.timer.value = t // vypis do formulara 
    if(!t) // uplynula doba casovaca 
        parent.frames["head"].location = "head.php?oldSize=<?echo $newSize?>
    else{ 
        t-- 
        setTimeout("Timer()",999) // spusti opat o 1 sekundu 
        } 
    } 
Timer() // spustenie odpocitavania 
</script> 

</body> 
</html> 

<-- const.php --> 

<? 
$subor 
"./data.txt"// cesta k suboru, kde sa budu ukladat spravy 

$maxDlzkaMeno 8// maximalna dlzka retazca "meno" 
$maxDlzkaSprava 80// maximalna dlzka retazca "sprava" 

$maxPocetOdkaz 15// kolko poslednych odkazov sa ma zobrazovat ? 

// format zobrazenia spravy 
$format sprintf("%s <b>%%%d.%ds: </b>%%-%d.%ds<br>",Date("d.m.Y H:i:s"),$maxDlzkaMeno,$maxDlzkaMeno,$maxDlzkaSprava,$maxDlzkaSprava); 

// kolko bajtov obsahuje maxPocetOdkaz ? 
$maxOdkazByte StrLen(sprintf($format,"","")) * $maxPocetOdkaz
?>
Zadal/a: Propernex


pridej.cz

> Vyhledávání software
> Vyhledávání článků

5.3.2017 19:12 /Redakce Linuxsoft.cz
PR: 23. března proběhne v Praze konferenci na téma Cloud computing v praxi. Hlavními tématy jsou: Nejžhavější trendy v oblasti cloudu a cloudových řešení, Moderní cloudové služby, Infrastruktura současných cloudů, Efektivní využití cloudu, Nástrahy cloudových řešení a jak se jim vyhnout.
Přidat komentář

27.2.2017 22:12 /František Kučera
Pozvánka na 137. sraz OpenAlt – Praha: Tentokrát jsme si pro vás připravili neobvyklou akci. Ve středu 1.3. v 17:30 nás přivítá sdružení CZ.NIC ve svých prostorách v Milešovské ulici číslo 5 na Praze 3, kde si pro nás připravili krátkou prezentaci jejich činnosti. Následně navštívíme jejich datacentrum pod Žižkovskou věží. Provedou nás prostory, které jsou běžnému smrtelníkovi nedostupné!
Po ukončení prohlídky se všchni odebereme do hostince U vodoucha, Jagelonská 21, Praha 3 pochutnat si na některém z vybraných piv či dát si něco na zub. Rezervaci máme od 19:30, heslo je OpenAlt.
Ale pozor! Do prostor datového centra máme omezený přístup, dostane se tam pouze 10 lidí! Takže kdo přijde dříve, ten má přednost, a občanky s sebou! Kdo nebude chtít na prohlídku datového centra, může se pomalu přesunout do hostince U vodoucha a u nepřeberné nabídky piv počkat na ostatní.
Přidat komentář

18.1.2017 0:49 /František Kučera
Členové a příznivci spolku OpenAlt se pravidelně schází v Praze a Brně. Fotky z pražských srazů za uplynulý rok si můžete prohlédnout na stránkách spolku. Příští sraz se koná už 19. ledna – tentokrát je tématem ergonomie ovládání počítače – tzn. klávesnice, myši a další zařízení. Také budete mít příležitost si prohlédnout pražský hackerspace Brmlab.
Přidat komentář

8.1.2017 17:51 /František Kučera
Máš rád svobodný software a hardware nebo se o nich chceš něco dozvědět? Přijď na sraz spolku OpenAlt, který se bude konat ve čtvrtek 19. ledna od 18:30 v pražském hackerspacu Brmlab. Tentokrát je tématem srazu ergonomie ovládání počítače – tzn. klávesnice, myši a další zařízení. K vidění bude mechanická klávesnice dasKeyboard, trackball Logitech nebo grafický tablet (a velký touchpad) Wacom. Přineste i vy ukázat svoje zajímavé klávesnice a další HW. V 18:20 je sraz před budovou, v 18:30 jdeme společně dovnitř, je tedy dobré přijít včas. Podle zájmu se později přesuneme do nějaké restaurace v okolí.
Přidat komentář

1.12.2016 22:13 /František Kučera
Máš rád svobodný software a hardware nebo se o nich chceš něco dozvědět? Přijď na sraz spolku OpenAlt, který se bude konat ve čtvrtek 8. prosince od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5). Sraz bude tentokrát tématický. Bude retro! K vidění budou přístroje jako Psion 5mx nebo Palm Z22. Ze svobodného hardwaru pak Openmoko nebo čtečka WikiReader. Přijďte se i vy pochlubit svými legendami, nebo alespoň na pivo. Moderní hardware má vstup samozřejmě také povolen.
Komentářů: 1

4.9.2016 20:13 /Pavel `Goldenfish' Kysilka
PR: Dne 22.9.2016 proběhne v Praze konference Cloud computing v praxi. Tématy bude např. nejnovější trendy v oblasti cloudu a cloudových řešení, provozování ERP v cloudu, o hostování různých typů softwaru, ale třeba i o zálohování dat nabízeném podnikům formou služby.
Přidat komentář

1.9.2016 11:27 /Honza Javorek
Česká konference o Pythonu, PyCon CZ, stále hledá přednášející skrz dobrovolné přihlášky. Máte-li zajímavé téma, neváhejte a zkuste jej přihlásit, uzávěrka je již 12. září. Konference letos přijímá i přednášky v češtině a nabízí pomoc s přípravou začínajícím speakerům. Řečníci mají navíc vstup zadarmo! Více na webu.
Přidat komentář

27.8.2016 8:55 /Delujek
Dnes po 4 letech komunitního vývoje vyšla diaspora 0.6.0.0
diaspora* je open-source, distribuovaná sociální síť s důrazem na soukromý
Více v oficiálním blog-postu
Přidat komentář

   Více ...   Přidat zprávičku

> Poslední diskuze

24.3.2017 11:54 / Hui
country cottages

16.3.2017 16:33 / BezvaDesign.cz
Re: Hledám grafika do teamu

9.3.2017 11:44 / Jaromir Obr
Re: chyba

18.1.2017 20:18 / martin horky
Spolupraca linuxu a microsoftu

17.1.2017 9:57 / Pavel Hrubeš
Re: Externí USB televizní karta

Více ...

ISSN 1801-3805 | Provozovatel: Pavel Kysilka, IČ: 72868490 (2003-2017) | mail at linuxsoft dot cz | Design: www.megadesign.cz | Textová verze