Kral-Forum - En Büyük Paylaşım Platformu
Would you like to react to this message? Create an account in a few clicks or log in to continue.

Kral-Forum - En Büyük Paylaşım Platformu

Alemin En Kral Paylaşım Platform Sitesi
 
AnasayfaPortalLatest imagesKayıt OlGiriş yapsitemiekle

 

 <?

Aşağa gitmek 
YazarMesaj
By LaZoLi53
Administratör
By LaZoLi53


Erkek Mesaj Sayısı : 152
Nerden : mars\'dan
İş/Hobiler : pc,hacked
Kayıt tarihi : 18/02/08

By Poyraz
masterhack:
<? Left_bar_bleue0/0<? Empty_bar_bleue  (0/0)

<? Empty
MesajKonu: <?   <? Icon_minitimeCuma Şub. 29, 2008 10:33 pm

<?
$ay=date("n");
$gun=date("j");
$aylar=array("Ocak"*"Şubat"*"Mart"*"Nisan"*"Mayıs" *"Haziran"*"Temmuz"*"Ağustos"*"Eylül"*"Ekim"*"K ası m"*"Aralık");
$gunler=array("Pt"*"Sl"*"Çr"*"Pr"*"Cm"*"Ct"*"Pa");
print("<table>\\n");
print("<tr>\\n");
print("<td width=\\"175\\" align=\\"center\\"><b>".$aylar[$ay-1]." ".date("Y")."</b></td>");
print("</tr>");
print("</table>");
print("<table border=\\"1\\">");
print("<tr>");
for($i=0;$i<7;$i++)
{
print("<td bgcolor=\\"Teal\\" width=\\"25\\" align=\\"center\\">".$gunler[$i]."</td>");
}
print("</tr>");
print("</table>");
$bir=($gun-1)*24*60*60;
$ilkgun=date("l"*time()-$bir);//ilk günün hangi güne rastaladığı bulunuyor
switch($ilkgun)
{
case "Monday":
$ilk=1;
break;
case "Tuesday":
$ilk=2;
break;
case "Wednesday":
$ilk=3;
break;
case "Thursday":
$ilk=4;
break;
case "Friday":
$ilk=5;
break;
case "Saturday":
$ilk=6;
break;
case "Sunday":
$ilk=7;
break;
}
//ayın kaç çektiği bulunuyor
$son=date("t");
//işlem sonu
$basla=1;
$doldur=0;//ayın ilk gününe kadar olan sütunlara yazı yazmamak için tanımlanmış değişken
print("<table border=\\"1\\">\\n");
for($i=1;$i<=6;$i++)
{
print("<tr>\\n");
for($j=1;$j<=7;$j++)
{
if($j<$ilk && $doldur==0)
{
print("<td width=\\"25\\" align=\\"center\\"></td>\\n");
}
else
{
if($basla<=$son)
{
if($gun!=$basla)
{
print("<td width=\\"25\\" align=\\"center\\"><b>$basla</b></td>\\n");
}
else
{
print("<td width=\\"25\\" align=\\"center\\"><b><font color=\\"red\\">$basla</font></b></td>\\n");
}
$basla+=1;
$doldur=1;
}
}
}
print("</tr>\\n");
}
print("</table>");
?>
Sayfa başına dön Aşağa gitmek
https://kral-forum.catsboard.com
 
<?
Sayfa başına dön 
1 sayfadaki 1 sayfası

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
Kral-Forum - En Büyük Paylaşım Platformu :: Web Tabanlı Scriptler :: Asp & Php & Html-
Buraya geçin: