57) $code += 7; if ($code > 90) $code += 6; $res = $res.chr($code); } return $res; } ?> Strašilky - Vzkazy


Vzkazy

Líbí se vám naše stránky? Chcete poradit s chovem strašilek?
Sháníte, vyměníte nebo prodáte strašilky? Zanechte tedy vzkaz a uvidí se.

Ale nejprve si přečtěte následující pravidla:
1) Než se zeptáte, zkuste si nejprve přečíst sekci Začínáme či ostatní sekce těchto stránek a nebo použijte vyhledávač na úvodní stránce.
2) Pokud je to možné, používejte diakritiku - Hus i my všichni Češi bychom byli rádi. A občas taky mrkněte na pravopis.
3) Nepoužívejte vulgární slova a nadávky.
4) Tyto Vzkazy nenahrazují e-mail a ani nejsou chápany jako chat, a proto co řešíte s někým e-mailem, neřešte duplicitně tady.
5) Nedávejte sem stejné inzeráty více jak dvakrát do měsíce.. Neinzerujte zde jiné druhy než strašilky - k tomu slouží jiné internetové stránky.


\\1', $s_nulou);//doplneni odkazu return $output; } function Opakuj ($txt,$pocet) { $retezec = ""; if ($pocet<=0) return; for ($i=1; $i<=$pocet; $i++) $retezec=$retezec . $txt; return $retezec;} $Odeslano = isset($_POST['Odeslano']) ? true : false; if ($Odeslano){ $CoRikas = $_POST['CoRikas']; $Nasel = $_POST['Nasel']; $FJmeno = $_POST['FJmeno']; $Popis = $_POST['Popis']; $FEmail = $_POST['FEmail']; $antispam = $_POST['antispam']; $FHomeUrl = $_POST['FHomeUrl']; if ($FJmeno=="") {$Chyba=true;} if ($Popis=="") {$Chyba=true;} if ($FEmail=="cialis@viagra1.com") {$Chyba=true;} if ($FEmail=="levitra@cialis1.com") {$Chyba=true;} if ($FEmail=="viagra@levitra1.com") {$Chyba=true;} if (StrPos (" " . $FEmail, "@hotmail.com")) {$Chyba=true;} // MArtin prudič // if ($FEmail=="beautiko@seznam.cz") // {$Chyba=true;} // if (StrPos (" " . $FHomeUrl, "http://www.imago.nolimit.cz")) // {$Chyba=true;} // if (StrPos (" " . $Popis, "PODEJTE I ZDE")) // {$Chyba=true;} // if (StrPos (" " . $Popis, "nolimit.cz")) // {$Chyba=true;} // if (StrPos (" " . $Popis, "www.imago")) // {$Chyba=true;} // konec Martina $FHomeUrl = isset($FHomeUrl) ? $FHomeUrl : ""; if (StrPos (" " . $FHomeUrl, "www.ajcarvelli.com")) {$Chyba=true;} if ($antispam!="pes") {$Chyba=true;} // if ($Chyba) // {print "";} if (!$Chyba and $refresh == 0) { // poznámka if ($FEmail<>"strasilky@seznam.cz") $odeslo = mail("zajda@vodafonemail.cz","VZKAZ",$FJmeno); echo "

"; echo "Díky za zápis do knihy vzkazů.
"; echo "Váš vzkaz by měl být hned na začátku - tedy snad tam je. :-)"; echo "

"; $Formular=false; if ($FHomeUrl=="http://") $FHomeUrl=""; $fp = @fopen($soubor, "a"); $Popis=str_replace(chr(13) . chr(10),"#CrLf",$Popis); $datum=date("j.n.Y"); $cas=date("G:i"); $zapis = ""; $zapis=$zapis . substr($datum,0,10) . Opakuj(" ",10-strlen($datum)) . " " . substr($cas,0,5) . Opakuj(" ",5-strlen($cas)) . " " . substr($FJmeno,0,30) . Opakuj(" ",30-strlen($FJmeno)) . " " . substr($FEmail,0,30) . Opakuj(" ",30-strlen($FEmail)) . " " . substr($FHomeUrl,0,50) . Opakuj(" ",50-strlen($FHomeUrl)) . " " . substr($Nasel,0,50) . Opakuj(" ",50-strlen($Nasel)) . " " . substr($CoRikas,0,50) . Opakuj(" ",50-strlen($CoRikas)) . " " . $Popis; $PuvodniSoubor=""; //Puvodni obsah souboru if (File_Exists($soubor)) {$fp = FOpen($soubor, "r"); if (!$fp) return; $PuvodniSoubor = FRead($fp,FileSize($soubor)); FClose($fp); } if ($PuvodniSoubor<>"") {$zapis=$zapis . chr(13) . chr(10);} $fp = FOpen($soubor, "w"); //rewritne puvodni soubor if (!$fp) return; FWrite($fp,$zapis . $PuvodniSoubor); FClose($fp); $FJmeno=""; $Email=""; $HomeUrl="http://"; $Nasel=""; $CoRikas=""; $Popis=""; } } ?>
Jméno a příjmení * " maxlength=30>
Váš e-mail " maxlength=30>
Vaše stránky/bydliště " maxlength=50>
Jak jste našel stránky
Co jim říkáte
     
Vzkaz či komentář *    
 Tučné Kurzíva      
Doplňte *                                    kočka a
 
         

Pole označená * jsou povinná.

Strašilky.cz nabízí více jak desítky druhů strašilek - o kompletní seznam nabízených druhů si napište na e-mail eurycantha@seznam.cz nebo zavolejte 720 410 285 - Marek Nohejl

",$FilePopis); $FilePopis=StripSlashes($FilePopis); ?>

 

". $FileCas ?> "") echo ""; echo $FileJmeno; if ($FileEmail<>"") echo ""; ?>
"" and $FileEmail<>"strasilky@seznam.cz") {echo "Jak jste našel stránky: "; echo $FileNasel; echo "
";} if ($FileNasel<>"" and $FileEmail<>"strasilky@seznam.cz") {echo " Co jim říkáte: "; echo $FileCoRikas; echo "
";} $FilePopis = psglink($FilePopis); ?>


Ohlasy
Články o našich stránkách na internetu

Aktuální nabídku strašilek naleznete na našem FB profilu




© 2001-2016