مجموعة من الدوال الاساسية في لغة PHP

الإدارة بطاقة الشخصية 1: (4/4)

الشيفرات و الدوال في Php

--------------------------------------------------------------------------------

هذه مجموعة من الشيفرات والدوال الاساسية في لغة PHP ..

اسم الدالة : انتقال تلقائي
عمل الدالة : دالة تقوم بالإنتقال التلقائي لأي صفحة تقوم بوضع اسمها..
<?
function AutoGo($site){
ECHO "<META HTTP-EQUIV='Refresh' Content='2;URL=$site'>\";
}
AutoGo ("text_cut.php");
?>

اسم الدالة : دالة التاريخ الهجري
عمل الدالة : تقوم هذه الدالة بتحويل التاريخ الميلادي إلى هجري من برمجة الأستاذ خالد ممدوح جزاه الله كل خير.
<?
// COPYRIGHT 2002 BY KHALED MAMDOUH www.vbzoom.com //
// Updated, and added Islamic names of months by Samir Greadly
// xushi at xushi dot homelinux dot org
function Hijri($GetDateFormat)
{
$TDays=round(strtotime($GetDateFormat)/(60*60*24));
$HYear=round($TDays/354.37419);
$Remain=$TDays-($HYear*354.37419);
$HMonths=round($Remain/29.531182);
$HDays=$Remain-($HMonths*29.531182);
$HYear=$HYear+1389;
$HMonths=$HMonths+10;
$HDays=$HDays+23;
if ($HDays>29.531188 and round($HDays)!=30)
{
$HMonths=$HMonths+1;
$HDays=Round($HDays-29.531182);
}
else
{
$HDays=Round($HDays);
}

if ($HMonths>12){$HMonths=$HMonths-12;$HYear=$HYear+1;}

$ResultDate="$HDays-$HMonths-$HYear\";
$ResultDate="$ResultDate"."هـ";

return $ResultDate;
}
function DateFormatDo($GetDateFormat,$DateFormat)
{
$Day=SubStr($GetDateFormat,8,2);
$Month=SubStr($GetDateFormat,5,2);
$Year=SubStr($GetDateFormat,0,4);

$ResultDate=@date ($DateFormat, mktime (0,0,0,$Month,$Day,$Year));

return $ResultDate;
}
// Get today's date
$today = date("Y-m-d");
// Date Format : YYYY-MM-DD
ECHO Hijri($today);
?>

اسم الدالة : اختصار النصوص الطويلة
عمل الدالة : تقوم هذه الدالة باختصار نص معين حيث تظهر عدد معين من الحروف ومن ثم تقوم بوضع (( ... ))
<?
function title_cut($text,$char_num){
if (strlen($text)>$char_num) {
$text_new = substr($text,0,$char_num);
if ($text[$char_num]!=" \") {
$text_new = substr($text_new,0,$char_num-strlen(strrchr($text_new," ")));
}
$text = "$text_new ...";
}
return $text;
}
ECHO title_cut("Welcome To Me Web Site Im Vere Fntastec",6);
?>

اسم الدالة : لعرض الصور من نوع جيف
عمل الدالة : لعرض الصور من نوع gif في صفحة منقول من بنك المبرمجين العرب
<?

$Files= dir("images\");
While ($FileName = $Files->read())
{
$L=StrLen($FileName)-4;
if (strtolower(SubStr($FileName,$L,4))==".gif")
Echo "<Table align=center Width=50% border=1 bordercolor=#333333>\";
{
Echo "<TD BGColor=#666699 Width=100%><font color=#FFFFFF>\";
Echo $FileName;
Echo "</TD>";
}
Echo "</Table>";
}
?>

اسم الدالة : كود لإختيار صف عشوائي من قاعدة البيانات
عمل الدالة : كود لإختيار صف عشوائي من قاعدة البيانات
<?
mysql_query("SELECT * FROM table ORDER BY RAND() LIMIT 0,1\");
?>

اسم الدالة : طباعة بيانات ملف
عمل الدالة : تفيد هذه الدالة في طباعة مسار الملف و اسم الملف و إمتداد الملف.
<?
$Url="http://{$HTTP_HOST}{$REQUEST_URI}\";
$Path = pathinfo($Url);

// طباعة مسار الملف
echo $Path["dirname"];

Echo "
";

// طباعة اسم الملف
echo $Path["basename"];

Echo "
";

// طباعة إمتداد الملف
echo $Path["extension"];
?>

اسم الدالة : لإظهار رقم الأيبي
عمل الدالة : كود لإظهار رقم الأيبي
<?
$ip = getenv ("REMOTE_ADDR\");
echo $ip;
?>

اسم الدالة : لفتح ملف نصي وطباعة ما بداخله في الصفحة
عمل الدالة : لفتح ملف نصي وطباعة ما بداخله في الصفحة ويمكن استخدامه لقراءة مثلاً عدد الزوار اذا كان موجود في ملف نصي
<?
$FILE=fopen("counter.txt\","r+");
$C=fgets($FILE,4096);
Echo $C;
fclose($FILE);
?>

اسم الدالة : لإظهار رابط الصفحة
عمل الدالة : لإظهار رابط الصفحة التي تقوم بتشغيلها
<?
Echo "http://{$HTTP_HOST}{$REQUEST_URI}\";
?>

اسم الدالة : كود يعمل نفس عمل حفظ الهدف باسم
عمل الدالة : هذ الكود يعمل نفس عمل حفظ الهدف باسم فمثلاً عند الضغط لعلى رابط لملف نصي لايقوم بفتحه بالمتصفح بل يتم تحميله
<?
$file_name = "banner.jpg\";
header("Content-disposition: filename=$file_name");
header("Content-type: application/download");
readfile($file_name);
?>

اسم الدالة : كود عرض رقم عشوائي في الرابط
عمل الدالة : هذا الكود لعرض رقم عشوائي في الرابط ليساعد في ان تكون الصفحة محدثة بإستمرار
<?php
$rand = md5(uniqid(rand()));
ECHO "<A hre http://www.nn2nn.com?PHPSESSID=$rand'>Nn2nN</a>\";
?>