' . $kod . '
' . $hata_mesaji . '
Hadi şimdi anasayfa Hadi hadi..
'; exit; } # pgsql baglantisi yapalim if( !pg::go('localhost', 'efesciyiz', 'div931VL', 'efesciyiz') ){ hata(120); } # -- GIRIS KONTROL ---------- # uye oturum degiskenleri $girissed = false; $uye = false; # kontrol ederek bilgileri dogrulayalim if( !e(@$_SESSION["giris"]) && !e($_SESSION["kadi"]) ){ # kulanici bilgisini alalim $sorgu = pg::q("select * from uyeler where kadi='" . $_SESSION["kadi"] . "'"); if( pg::nr($sorgu) == 1 ){ $uye = pg::f($sorgu); # anahtar kontrol if( $_SESSION["giris"] == md5( $uye["kadi"] . $uye["sifre"] ) ){ $girissed = true; }else{ # giris yanlis. $uye'yi silelim $uye = NULL; } } } # ------ YORUM fonksiyonu ------------------ function yorumlar( $kimlik ){ # yorumlari alalim $yorumlar = pg::q2a("select * from yorumlar where kimlik = '".$kimlik."'"); # yorum yoksa if( c($yorumlar) == 0 ){ print '
Bu ' . substr( $kimlik, 0,5 ) . ' hakkında kimsenin söyleyecek bişeyi yokmuş, vay bee..
'; }else{ # baslik basalim print '
Bu ' . substr( $kimlik, 0,5 ) . ' hakkında '.c($yorumlar).' kafadan ses çıkmış ve şöyle demiş'.(c($yorumlar)>1?'ler':'').' :
'; # yorum listesi print ''; foreach( $yorumlar as $yorum ){ print ''; } print '
'; if( $GLOBALS["uye"]["izinler"] > 10 ) print ''; print str::cut($yorum["eklenme_tarihi"],16).' tarihinde '.$yorum["yazar"].' yazmış.
'.nl2br( str::dehtml(trim($yorum["yorum"])) ).'
'; } # yorum yazma aparatı if( $GLOBALS["girissed"] ){ print '
'.(c($yorumlar)>0?'Benim de i':'İ').'ki çift lafım var :
'; }else{ print '
Konuşabilmek için varolmak lazım, varolmak için tutanak tutmamız gerek.
İllaki konuşacam diyosan seni şöyle alalım
'; } } ?>