Nalezl jsem skript své první návštěvní knihy. Podívejte se na jeho část, je to fakt sranda. Je to úprava skriptu z knihy J. Koska. Cílem úpravy bylo, aby se nejnovější zpráva zobrazovala nahoře a ne dole. Já tenkrát nevěděl jak se to dělá a pak jsem narazil na funkci StrRev() :
$fp = FOpen("./kniha.body", "a");
FPutS($fp, ">--KONEC--!<\n");
FPutS($fp, ">RB<\n");
FPutS($fp, ">ELBAT/<\n");
FPutS($fp, ">ETOUQKCOLB/<>TNOF/<\n");
FPutS($fp, Trim($Zprava));
FPutS($fp, ">rptxet=SSALC TNOF<>2=EZIS ETOUQKCOLB<\n");
FPutS($fp, ">3=NAPSLOC DT<\n");
FPutS($fp, ">RT<\n");
FPutS($fp, ">A/<>liame=TLA 0=REDROB retnec=NGILAV 'fig.liame/ykzarbo/ks.tsoh.rava.www//:ptth'=CRS GMI<\n");
FPutS($fp, ">'$Email:otliam'=FERH A<\n");
if ($Web!="")
FPutS($fp, ">A/<>yknárts=TLA 0=REDROB retnec=NGILAV 'fig.bew/ykzarbo/ks.tsoh.rava.www//:ptth'=CRS GMI<\n");
if ($Web!="")
FPutS($fp, ">'$Web//:ptth'=FERH A<\n");
FPutS($fp, ">akcivalh=SSALC retnec=NGILAV thgir=NGILA %02=HTDIW DT<\n");
FPutS($fp, ">TNOF/<");
FPutS($fp, "\n".StrRev(Date("d.m.y - H:i"))."\n");
FPutS($fp, ">rpdaeh=SSALC TNOF<\n");
FPutS($fp, ">akcivalh=SSALC retnec=NGILAV thgir=NGILA DT<\n");
FPutS($fp, ">TNOF/<\n");
FPutS($fp, ">A/<$Jmeno>'$Email:otliam'=FERH A<\n");
FPutS($fp, ">rpdaeh=SSALC TNOF<\n");
FPutS($fp, ">akcivalh=SSALC elddim=NGILAV %55=HTDIW DT<\n");
FPutS($fp, ">RT<\n");
FPutS($fp, ">kevepsirp=SSALC retnec=NGILA 1=GNIDDAPLLEC 0=GNICAPSLLEC 0=REDROB %001=HTDIW ELBAT<\n");
FPutS($fp, ">--ZACATEK--!<\n");
FClose($fp);
Taky jsem nad tim travil moc casu, nez jsem prisel na to jak to udelat.
Ha... A ono stacilo jen ten soubor se zpravama nacist do promenny, vymazat ho, zapsat nohou zpravu a za ni pak vypsat ten zbytek :))
Clovek je holt nekdy tupy stvoreni :)