Diskusia Tento priestor je vyhradený pre Vaše názory na zlepšenie programu SLOVO, prípadne na upozornenie na chyby. Musíte vyplniť všetky povinné údaje! "; else: $name = "$jmeno \n"; $e_mail = "$email \n"; if ($web!=""): $www = "$web \n"; endif; $cas = "" . Date("j. " . "m. " . "Y, " . "H:i:s") . " \n"; $popis2 = NL2BR(HTMLSpecialChars($popis)); $zprava = " $popis2 \n\n"; $write = StripSlashes($name . $e_mail . $www . $cas . $zprava); if (File_Exists ("book.dat")): //existuje soubor book.dat $fp = FOpen ("book.dat", "r"); $data = FRead ($fp, FileSize("book.dat")); FClose($fp); endif; $fp = FOpen ("book.dat", "w"); FWrite ($fp, $write.$data); FClose ($fp); endif; endif; ?> |
