Navigacija

Namai Forumas PAIEŠKA ! ! Pagrindinės temos ! Nuorodų katalogas Didž. Php-F saitai Kontaktai
NAUDINGA
Straipsniai DUK Siuntimai Skriptų biblioteka Modai, dizainai Modai šiame saite D.U.K. Informacija Hostingai Domenai
Naudotojo vadovas v7 V6 ir V7 galimybių palyginimas DEMO
NUORODOS
Modifikacijos, panelės Temos/dizainai
PASLAUGOS
Reklama VIP hostingas
Pask. komentarai Administracija

Vartotojų tinkle

Prisijungusių svečių: 57
Prisijungusių narių: 0
Prisijungusių narių nėra

Registruoti nariai: 25,957
Naujausias narys: keistuole

Naujausi straipsniai

Įprasti:

Skirti naujokams:

Paskutiniai nariai

keistuole 1 savaitė
Gizmis 3 savaitės
Reikalas 3 savaitės
Rytis12 savaitės
MaFetas16 savaitės
ozzWANTED18 savaitės
saulyzas20 savaitės
TOMIJUS21 savaitės
Jaunelis36 savaitės
lanis37 savaitės
And2s37 savaitės
Memento Mori42 savaitės
Quwqkibor45 savaitės
asirija48 savaitės
tomeem51 savaitės
weberiz54 savaitės
mRokass56 savaitės
kartoonas57 savaitės
grunskiz60 savaitės
Bruksnys61 savaitės

Informacija:


OS: Unknown
Naršyklė: Nežinoma
IP: 18.116.19.90
Naujienų: 529
Straipsnių: 235
Temų: 52,589
Postų: 522,539
Postų pask. parą: 0
Shout'ų pask. parą: 0
P.S.C. pask. parą: 0
Nuorodų kataloge: 13

Lankomumo Statistika

Peržiūrų šiandien: 22

Iš viso peržiūrų: 22948724

Prisijungti

REGISTRUOTIS
Nario vardas

Slaptažodis



Pamiršai slaptažodį?
Paprašyk naujo
Aktyvuoti save

Šaukykla

Jei norite rašyti žinutes, turite prisijungti.

Gizmis
2025 Kov. 15 14:03:50
OMG, smagu matyt sita puslapi veikianti

ozzWANTED
2024 Lap. 30 15:11:14
Taip, vis dar up šypsosi

MaFetas
2024 Lap. 13 22:11:57
hey how, geras dar veikiantis saitas?

Jaunelis
2024 Lie. 25 11:07:43
Oho vis dar veikia svetainė akinanti šypsen Šimtas metų, matau Šaukykloje nuostalgija. Smagu panaršyt po forumą ir pažiūrėt senas temas šypsosi

And2s
2024 Lie. 17 19:07:04
2008 pirmą kart čia patekau, man buvo 10m ir čia pramokau programavimo.. smagu skaityti senas žinutes, tokia nostalgija akinanti šypsen ačiū Ozz kad saugoji šitą kultūrinį reliktą šypsosi

Šaukyklos archyvas

Apklausa

Ar esate patenkinti lietuviško vertimo kokybe?

Taip!

Taip, bet yra ką taisyti (parašysiu komentaruose)

Ne

Norėdamas balsuoti turite prisijungti.
Archyvas
Reklama 400x60
Reikia pagalbos del paneles
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | Bendri PHP-F klausimai
Autorius: tautwex Peržiūrų: 1110      Spausdinti temą
2009 Vas. 7 20:02:30          1 žinutė iš 3
Spausdinti pranešimą
Sveiki, taigi as noriu i panele iterpt paveiksleli paneles virsuje stai kodas:
openside("Radijas");

$scip="78.60.60.29";
$scport="8000";
$scpass="ssss";
//$ip="$s"; //localhost

$scfp = fsockopen($scip, $scport);

//$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
if(!$scfp) {
$scsuccs=1;
//echo''.$scdef.' is Offline';
}

if($scsuccs!=1){
fputs($scfp,"GET /admin.cgi?pass=$scpass&mode=viewxml HTTP/1.0\r\nUser-Agent: SHOUTcast Song Status (Mozilla Compatible)\r\n\r\n");
while(!feof($scfp)) {
$page .= fgets($scfp, 1000);
}

######################################################################################################################
/////////////////////////part 1 \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
//define xml elements
$loop = array("STREAMSTATUS", "BITRATE", "CURRENTLISTENERS");
$y=0;
while($loop[$y]!=''){
$pageed = ereg_replace(".*<$loop[$y]>", "", $page);
$scphp = strtolower($loop[$y]);
$$scphp = ereg_replace("</$loop[$y]>.*", "", $pageed);
if($loop[$y]==SERVERGENRE || $loop[$y]==SERVERTITLE || $loop[$y]==SONGTITLE)
$$scphp = urldecode($$scphp);

// $servert[$y] = ereg_replace(".*<SERVERTITLE>", "", $servert[$y]);
// $servert[$y] = ereg_replace("</SERVERTITLE>.*", "", $servert[$y]);
// uncomment the next line to see all variables
// echo'$'.$scphp.' = '.$$scphp.'<br>';
$y++;
}
//end intro xml elements
######################################################################################################################
######################################################################################################################
/////////////////////////part 2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
//get song info and history
$pageed = ereg_replace(".*<SONGHISTORY>", "", $page);
$pageed = ereg_replace("<SONGHISTORY>.*", "", $pageed);
$songatime = explode("<SONG>", $pageed);

$pageed = ereg_replace(".*<SERVERTITLE>", "", $page);
$pageed = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$servert = explode("<SERVERTITLE>", $pageed);




$r=1;
while($songatime[$r]!=""){
$t=$r-1;
$playedat[$t] = ereg_replace(".*<PLAYEDAT>", "", $songatime[$r]);
$playedat[$t] = ereg_replace("</PLAYEDAT>.*", "", $playedat[$t]);
$song[$t] = ereg_replace(".*<TITLE>", "", $songatime[$r]);
$song[$t] = ereg_replace("</TITLE>.*", "", $song[$t]);
$song[$t] = urldecode($song[$t]);

$r++;
}

//end song info
// $obisk = explode("<POINTER>", $obisk);
fclose($scfp);
}

//display stats
if($streamstatus == "1"){



//you may edit the html below, make sure to keep variable intact
echo"
<table width=100% align=center border=0 cellpadding=0 cellspacing=0>
<tr><b>
<td><div align=center><font size=2 face=Tahoma><strong>
Daina: <br> <marquee><font color=#f0051>$song[0]</marquee></font></b>
Eteryje: <br><font color=#yudf55>$servert[0] <br></font>
Klausytoju: <br> <font color=#fg551>$currentlisteners </font>
<p>>>><a href='http://78.60.60.29:8000/listen.pls' target='_blank'><b> Klausyk </b></a><<<</p>
</tr>
</table>

";

}
closeside();
?>






Noriu iterpti si paveiksleli: http://www.part.lt/perziura/d9aa...9a3180.jpg

Gal galite iterpti? Prasau pagalbos
2009 Vas. 7 21:02:57          2 žinutė iš 3
Spausdinti pranešimą
Pirma smailus išjūnk..
2009 Vas. 8 10:02:16          3 žinutė iš 3
Spausdinti pranešimą
Nu isjungiau
Peršokti į forumą: