[Pamoka] Labai paprastas naujienų skriptukas

Na va turiu tokį labai paprastą naujienų rašymo skriptuką (gali būti žinoma pritaikomas kitiem tikslam), pradinukams manau tiktu, patobulinus bei apsaugojus slaptažodžiu :) :

Sukuriame failą forma.php kuriame bus rašymo forma:

<form action=veiksmas.php method=post>
<input type=text name=pavadinimas>Pavadinimas<br>
<input type=text name=autorius>Autorius<br>
Zinute:<br>
<textarea name=naujiena></textarea><br>
<input type=submit value="Siusti"><input type=reset value="Valyti"></form>

Tada susikuriame veiksmas.php failą kuriame bus visas veiksmas:

<?
if ( isset( $_POST['pavadinimas'] )) { $pavadinimas = $_POST['pavadinimas']; } else { $pavadinimas = NULL; }
if ( isset( $_POST['autorius'] )) { $autorius = $_POST['autorius']; } else { $autorius = NULL; }
if ( isset( $_POST['naujiena'] )) { $naujiena = $_POST['naujiena']; } else { $naujiena = NULL; }
// Atidarome bylà duomenø ávedimui
$byla=fopen("kazkas.txt", "a");
// Dedame duomenis á bylà
fputs($byla, "$pavadinimas|$autorius|$naujiena|\n");
fclose($byla);
echo("Pavyko!");
?>

Tada susikuriate failą kazkas.txt kuriame bus laikomi įrašyti duomenys.

Dabar susikurkite tarkim rez.php failą , įrašykite žemiau pateiktą kodą (pakoreguokite jei kas jame nepatinka) ir includinkit į tą puslapio vietą, kurioje turėtu būti naujienos.

<?
$byla=file("kazkas.txt");
$sk=sizeof($byla);
while(0 < $sk){
$sk=$sk-1;
$mas=explode("|", $byla[$sk]);
echo("
-------------------------------------<br>
Pavadinimas: $mas[0] :: Autorius: $mas[1]<br>
Zinute: $mas[2]
");
}

?>

:)

ir kam gi mokinti kisti viska i .txt? iskart mokyk i mysql o cia bereikalingas laiko svaistymas :)

Na kodėl, pvz man asmeniškai nelabai su MySQL patinka dirbti jei yra nedidelis projektėlis.. Su MySQL įvairiausių naujienų skriptų yra internete..

MySQL veikia zymiai sparciau ir paprasciau nei siame scripte, tarkim jeigu as parasysiu teksta lietuviska ir rusiska rasliava tai abejoju ar tavo script'as mano rasliava sukramtis. Be to kaip padaryti naujienos redagavima? Arba istraukti tik paskutines tris naujienas? Aisku gali sakyti kad istrauki visas ir atsirenki tik tris paskutines bet tai isivaizduoji kaip apkrausi serva jei bus tarkim 1000 naujienu? :) As cia pavadinciau elementarus budas irasyti norima teksta i faila, tokiu budu yra php.net manual'e, tad nepostink to pacio kelis kart, geriau ka nors paprasto bet naudingo sugalvok, ko dar nebutume mate kitur.

Dėja klysti, nieko nekopinau :)

// Dedame duomenis á bylà 

kaip isverst ta eilute? notepadas neatkuria :)

// Dedame duomenis á bylà 

 

kaip isverst ta eilute? notepadas neatkuria :)

Nemanau kad reikalinga ji. Manau cia komentaras.

saunuolis, iniciatyva visada sveikintina :)