// ------ Editera dessa! --------------
$persida=10; // Antal inlägg som skall visas per sida.
$noprev="noprev.gif"; // Sökväk till deaktiverad föregångar-knapp.
$nonext="nonext.gif"; // Sökväg till deaktiverad nästa-knapp.
$prev="prev.gif"; // Sökväg till föregångar-knapp.
$next="next.gif"; // Sökväg till nästa-knapp.
// ------------------------------------
$sidor=0;
$storlek=0;
$namn="";
$epost="";
$meddelande="";
$titel="";
$hemsida="";
$sidnr=1;
function initiera(){
// Initiering av de komponenter som behövs. Körs alltid först!
global $sidor, $persida, $namn, $epost, $meddelande, $hemsida, $titel, $storlek, $start, $sidnr;
// Läs i fil antalet inlägg i gästboken
if(!($fpread = fopen("inlagg.txt", 'r'))){
$fpwrite = fopen("inlagg.txt", 'w');
fputs($fpwrite,"0\n");
fclose($fpwrite);
$sidor=1;
$storlek=0;
}else{
$storlek=fgets($fpread,1024);
$sidnr=floor($start/$persida)+1;
// Beräkna hur många sidor dessa inlägg tar
$sidor=ceil($storlek/$persida);
if($sidor==0) $sidor=1;
// Läser igenom dagboksfil en och lagrar inlägg som skall visas på denna sida
$mess=0;
$index=0;
while(!feof($fpread)){
$data1=fgets($fpread,200);
$data2=fgets($fpread,200);
$data3=fgets($fpread,200);
$data4=fgets($fpread,200);
$data5=fgets($fpread,2020);
$tom=fgets($fpread,1024);
$tom=fgets($fpread,1024);
if($mess>=$start && $mess<$start+$persida){
$namn[$index]=$data1;
$epost[$index]=$data2;
$hemsida[$index]=$data3;
$titel[$index]=$data4;
$meddelande[$index]=$data5;
$index=$index+1;
}
$mess++;
}
}
}
function visa_nav(){
global $start,$persida,$storlek,$sidor,$sidnr;
echo "::: ";
for($i=1;$i<=$sidor;$i++)
if($i==$sidnr)
echo "$i ::: ";
else
echo "$i ::: ";
}
function visa_nav_framat(){
// Visar navigeringsknapp för "nästa"
global $start, $sidor, $persida, $storlek;
global $next, $nonext;
if($start+$persida<$storlek){
$newpage=$start+$persida;
echo "";
}else{
echo "
";
}
}
function visa_nav_bakat(){
// Visar navigeringsknapp för "föregående"
global $start, $sidor, $persida, $storlek;
global $prev, $noprev;
if($start>=$persida){
$newpage=$start-$persida;
echo "
";
}else{
echo "
";
}
}
function visa_antal_meddelanden(){
global $storlek;
echo $storlek;
}
function visa_antal_sidor(){
global $sidor;
echo $sidor;
}
function visa_sidnr(){
global $sidnr;
echo $sidnr;
}
function visa_meddelande($index){
global $namn, $epost, $meddelande, $hemsida, $titel, $start, $storlek, $persida, $sidor;
$sidan=floor($start/$persida)+1;
$limit=$persida;
if(($sidan==$sidor) && ($storlek % $persida)>0)
$limit=$storlek%$persida;
if($index<$limit && $storlek>0){
//////////////////////////////////////////////////////////////
echo "
Il tuo nome - your name: $namn[$index]
La tua email - your email: $epost[$index]
Eventuale sito internet - homepage: $hemsida[$index]
TITOLO DEL COMMENTO - TITLE: $titel[$index]
COMMENTO - COMMENT: $meddelande[$index]
| SUPERNATICHE | |
Il sito tutto dedicato alla piu' bella idea di Dio CULI MASCHILI - MEN'S ASSES |
|
CITTA' - TOWN: |
|
MAIL: NOTE: |