[3] - دورة الاوتوات "AutoIt" :::: اوامر + شروحات + دروس

الحالة
مغلق و غير مفتوح للمزيد من الردود.
تطبيق درس الـFile Move والـMsgBox والمتغيرات :smile:


f50aa64b3b544576a289d827c449b9a0.png



______________________________________


تطبيق درس الـDeleteFile
219e04706dc073af20764711a7027c6b.png


____________________________________

تطبيق درس FileRecycle
6911e77246639b2dfcfdcb2b89ca039f.png


والبآقي بالطريق إن شاء الله
​
 

توقيع : (مجرد انسان)
expertise قال:
مشروح كيف تطلع المسار الاصلي بالنسبه للمسارات الافتراضيه :d: .. ماراح اعلمك !! :b:​
أنقر للتوسيع...

نسيتها .... بس عرفتها الحمدلله

بس قاهرني مو راضي يحذف وش الغلط بالكود ؟؟
 
توقيع : موريادي
موريادي قال:
نسيتها .... بس عرفتها الحمدلله

بس قاهرني مو راضي يحذف وش الغلط بالكود ؟؟
أنقر للتوسيع...


بالنسبة لسؤال مريادي

@tempdir
ليش الملفات لا تنحذف في هذا المسار

اخوي في هذا الفولدر توجد بعض الملفات التي تنتسب الى بعض البرامج التي تشتغل في الباك جراوند (كسبيل المثال برنامج الحماية او التحديثات وغيرها) لذا فلا نستطيع حذفها من هذا الفولدر

لكي تتأكد اكتب في امر التشغيل
%temp%

سيفتح لك فولدر التيمبروري وقم بانشاء اي ملفات ورد والمفكرات والاكسل وغيرها من ملفات الصوتية بعد ذلك قم بالخروج من هذا الفولدر

قم بتنفيذ الكود التالي
كود: 
filedelete(@tempdir, &"\*.*)

ثم قم بتشغيل هذا السكربت فستجد ان جميع الملفات الصوتية والوورد والمفكرة انحذفت الا الملفات التي تتعلق بالبرامج التي تشتغل في الباك جراوند

تقبل تحيات اختك الخبيرة الحلا
ساعيش بذكر الله وساقوم بتطوير نفسي في مجال عملي وساعلم كل من يحتاج لخبراتي هع هع هع


ان كان صواب فهذا من فضل ربي وما وفقني اليه وان كان خطأ فمن نفسي ومن الشيطان
 
توقيع : الحلا تبي تتعلم
Corporation قال:
حبيت أختصر التطبيقات بِ مشإركه وحده :king:​


أمر نقل الملفات FileMove

كود: 
[COLOR=navy][I]FileMove[/I][/COLOR][COLOR=blue]([/COLOR][COLOR=magenta]@AppdatacommonDir[/COLOR][COLOR=red]&[/COLOR][COLOR=gray]"\Microsoft\WLSetup\Logs"[/COLOR][COLOR=red],[/COLOR][COLOR=magenta]@DesktopDir[/COLOR][COLOR=red],[/COLOR][COLOR=purple]9[/COLOR][COLOR=blue])[/COLOR][/CODE[/FONT][/SIZE][SIZE=3][FONT=Times New Roman]]أمر حذف الملفات [COLOR=navy][I]FileDelete[/I][/COLOR][/FONT][/SIZE]
[CODE][FONT=Times New Roman][SIZE=3][COLOR=navy][I]Filedelete[/I][/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=blue]([/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=magenta]@StartMenuCommonDir[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]&[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]"\programs\startup\*.*"[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=blue])[/COLOR][/SIZE][/FONT]
أمر أرسال ملف إلى سلة المهملإت ، Filerecycle
كود: 
[FONT=Times New Roman][SIZE=3][COLOR=navy]F[I]ileRecycle[/I][/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=blue]([/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=magenta]@AppDataCommonDir[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]&[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]"\Windows Genuine Advantage\data.dat"[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=blue])[/COLOR][/SIZE][/FONT]
أمر معرفة حجم الملف FileGetSize​


كود: 
[FONT=Times New Roman][SIZE=3][I][COLOR=navy]MsgBox[/COLOR][/I][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]([/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=purple]48[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red],[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]"هذه  الصوره موجوده بكل الأجهزه","C:\Documents and Settings\All  Users\Documents\My Pictures\Sample Pictures\sunset.jpg : مسار الصوره "[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red])[/COLOR][/SIZE][/FONT]
كود: 
[CENTER][FONT=Times New Roman][SIZE=3][COLOR=darkred]$test[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]=[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3] [I][COLOR=navy]FileGetSize[/COLOR][/I][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]([/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=magenta]@DocumentsCommonDir[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]&[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]"\My Pictures\Sample Pictures\sunset.jpg"[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red])[/COLOR][/SIZE][/FONT]
[CENTER][FONT=Times New Roman][SIZE=3][COLOR=darkred]$test[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]=[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=darkred]$test[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red]/[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=purple]1024[/COLOR][/SIZE][/FONT]
[SIZE=3][FONT=Times New Roman][I][COLOR=navy]MsgBox[/COLOR][/I][/FONT][/SIZE][FONT=Times New Roman][SIZE=3][COLOR=red]([/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=purple]64[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red],[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]"Size of file[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray].."[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red],[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]"حجم الصوره : "[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=darkred][COLOR=red]&[/COLOR]$test[COLOR=red]&[/COLOR][/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]"  كيلو بايت"[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red])[/COLOR][/SIZE][/FONT]
[SIZE=3][FONT=Times New Roman][I][COLOR=navy]MsgBox[/COLOR][/I][/FONT][/SIZE][FONT=Times New Roman][SIZE=3][COLOR=red]([/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=purple]4096[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3],[/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]""[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red],[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=gray]" في أمان الله أنتهى درس [ اخذ حجم الملفات ] بالتوفيق"[/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=red])[/COLOR][/SIZE][/FONT][/CENTER]
[/CENTER]


بإرك الله فيك بندر :ok:
​
أنقر للتوسيع...


وفقكم الله الى كل خير

بما اننا في موضوع وصلب الدرس فسؤالي هذا لا يخرجني خارج نطاق الدورة

في الامر التالي استخدمت نقل الملفات الى سطح المكتب بس ذاك مجلد يرجه الى ماذا
(@AppdatacommonDir&"\Microsoft\WLSetup\Logs",@DesktopDir,9)
ما وظيفة ذاك المجلد


في الامر الثاني قمت بحذف جميع الشورت كت للبرامج التي تظهر في قائمة ابدا
وصلت المعلومه



في لامر الثالث في ارسال الى سلة المحذفات
ما وظيفة ذاك الملف


الامر الرابع مفهوووم
​
 
توقيع : الحلا تبي تتعلم
الحلا تبي تتعلم قال:
بالنسبة لسؤال مريادي

@tempdir
ليش الملفات لا تنحذف في هذا المسار

اخوي في هذا الفولدر توجد بعض الملفات التي تنتسب الى بعض البرامج التي تشتغل في الباك جراوند (كسبيل المثال برنامج الحماية او التحديثات وغيرها) لذا فلا نستطيع حذفها من هذا الفولدر

لكي تتأكد اكتب في امر التشغيل
%temp%

سيفتح لك فولدر التيمبروري وقم بانشاء اي ملفات ورد والمفكرات والاكسل وغيرها من ملفات الصوتية بعد ذلك قم بالخروج من هذا الفولدر

قم بتنفيذ الكود التالي
كود: 
filedelete(@tempdir, &"\*.*)

ثم قم بتشغيل هذا السكربت فستجد ان جميع الملفات الصوتية والوورد والمفكرة انحذفت الا الملفات التي تتعلق بالبرامج التي تشتغل في الباك جراوند

تقبل تحيات اختك الخبيرة الحلا
ساعيش بذكر الله وساقوم بتطوير نفسي في مجال عملي وساعلم كل من يحتاج لخبراتي هع هع هع
أنقر للتوسيع...

تمت تجربت اقتراحك ...

ولم ينحذف ولا نص ملف ... مع اني وضعت ملفات وخليتها بالترتيب اوائل الملفات

ونفس الحال الكود لم يحذف شيء ... المجلد ساكن

حيث ان كودك لا يعمل .. والكود يعمل بآلية حذف الملفات بالترتيب فلو الملف الاول مستخدم من قبل برنامج فلن يحذف ولن يتم حذف بقية الملفات ويوقف الكود عنده

ودي وتقديري
 
توقيع : موريادي
الحمد لله على كل شئ​

تطبيق الدرس امر نقل الملفات​


PHP: 
FileMove(@TempDir & "\Hatem\hatem.exe" ,@DesktopDir ,9)
تطبيق الدرس امر مسح الملفات​


PHP: 
FileDelete(@TempDir & "\Hatem\hatem.exe")
تطبيق الدرس امر ارسال الملفات الى سلة المحذوفات​

PHP: 
FileRecycle(@TempDir & "\Hatem\hatem.exe")
تطبيق الدرس حجم الملف
​

PHP: 
$hatem = FileGetSize (@TempDir&"\hatem\hatem.exe")
MsgBox (0,"","File Size = " & $hatem )
وهذا وفقكم الله ننتظر المراجعة ان كان هناك اي اخطاء

مع تحياتي الخالصة للاستاذ بندر​
 
توقيع : format
موريادي قال:
تمت تجربت اقتراحك ...

ولم ينحذف ولا نص ملف ... مع اني وضعت ملفات وخليتها بالترتيب اوائل الملفات

ونفس الحال الكود لم يحذف شيء ... المجلد ساكن

حيث ان كودك لا يعمل .. والكود يعمل بآلية حذف الملفات بالترتيب فلو الملف الاول مستخدم من قبل برنامج فلن يحذف ولن يتم حذف بقية الملفات ويوقف الكود عنده

ودي وتقديري
أنقر للتوسيع...

الف بالمئة ان نظام التشغيل لديك هو ويندوز سفن
اعتقد ان الكود شغال في الاكس بي

جربت اعمل الكود التالي بس للاسف نفس الحالة لم يشتغل لان نظام التشغيل عندي ويندوز سفن
كود: 
#RequireAdmin
FileDelete(@UserProfileDir & "\AppData\Local\Temp\*.*")
 
توقيع : الحلا تبي تتعلم
الحلا تبي تتعلم قال:
الف بالمئة ان نظام التشغيل لديك هو ويندوز سفن
اعتقد ان الكود شغال في الاكس بي

جربت اعمل الكود التالي بس للاسف نفس الحالة لم يشتغل لان نظام التشغيل عندي ويندوز سفن
كود: 
#RequireAdmin
FileDelete(@UserProfileDir & "\AppData\Local\Temp\*.*")
أنقر للتوسيع...

تلك الاوامر تشتغل في نظام الاكس بي بحيث الكود سيكون كالتالي
كود: 
FileDelete(@UserProfileDir & "\Local Settings\Temp\*.*")

اما في ويندوز سفن سيكون الامر كالتالي ولكنه لن يعمل هههه
كود: 
#RequireAdmin
FileDelete(@UserProfileDir & "\AppData\Local\Temp\*.*")
 
توقيع : الحلا تبي تتعلم
الحلا تبي تتعلم قال:
وفقكم الله الى كل خير
بما اننا في موضوع وصلب الدرس فسؤالي هذا لا يخرجني خارج نطاق الدورة
في الامر التالي استخدمت نقل الملفات الى سطح المكتب بس ذاك مجلد يرجه الى ماذا
(@appdatacommondir&"\microsoft\wlsetup\logs",@desktopdir,9)
ما وظيفة ذاك المجلد
أنقر للتوسيع...
عرض الإحداث ب الجهاز :)
وعادة ماتدمج الفيروسات نفسها فيه ، بحكم إنه مخفي للمستخدمين وصإلح للأٍستخدام للجميع :king:
كود: 
[B][FONT=Arial][SIZE=3](((((((((((((((((((((((((((((((((((((((   Other Deletions   )))))))))))))))))))))))))))))))))))))))))))))))))
.

c:\documents and settings\All Users\Application Data\Microsoft\WLSetup
c:\documents and settings\All Users\Application Data\Microsoft\WLSetup\Logs\2009-09-28_18-15_634-mvtsax44.log
c:\documents and settings\All Users\Application Data\Microsoft\WLSetup\Logs\2009-10-04_05-10_448-uz35fugq.log
c:\documents and settings\All Users\Application Data\Microsoft\WLSetup\Logs\2009-10-04_23-33_2e4-rpvd1awa.log
c:\documents and settings\All Users\Application Data\Microsoft\WLSetup\wlt2D.tmp[/SIZE][/FONT][/B]
الحلا تبي تتعلم قال:
في لامر الثالث في ارسال الى سلة المحذفات
ما وظيفة ذاك الملف
أنقر للتوسيع...
إعتقد للتعرف على ما إذا كانت النسخه إصليه من عدمه ،
هذا والله تعإلى أعلم
​
 
توقيع : Corporation
موريادي قال:
نسيتها .... بس عرفتها الحمدلله

بس قاهرني مو راضي يحذف وش الغلط بالكود ؟؟
أنقر للتوسيع...


ممكن تجرب الامر
dirremove
dircreate
بس اعتقد ان الاوامر لن تعمل في ويندوز سفن ربما نظام التشغيل معقد

بس انا جربت الاوامر في الاكس بي وهي شغالة مئة بالمئة

لا تلصق الاكواد حتى لا نخرج عن موضوع الدورة وانما جرب وبلغنا بالنتائج حينما نوصل لدرس
dirremove
dircreate
 
توقيع : الحلا تبي تتعلم
تطبيقي في إظهآر حجم الملف :smile:

14a76b7affaa04c7e7e1fb4b2405eef9.png

قسمت على الـ1024 مرتين لك يظهر الحجم بالميغآ بآيت :d: ,,

لكن اللي محيرني كيف أشيل الآرقآم اللي بعد الفآصلة مآ أبي أبقي إلا رقمين

:no:

​
 
توقيع : (مجرد انسان)
بالنسبه لخوي موريادي

راجع الدرس

الدرس الخامس : مسارات الاجهزه الافتراضيه

b6144a2d67636a26dc34b9839feed8b1.jpg



وللتوضيح حل مشكلتك جرب هذا الكود وفكر لماذا لم يعمل ان لم يكن هناك مجلد اسمه حاتم

متطلبات التجربه لخوي موريادي

  • من قائمة ابداء ثم تشغيل اكتب الامر %temp%

  • ضع مجلد اسمه hatem في داخل مسار temp
  • ضع في مجلد hatem اي ملفات والتي تكون امتدادات مثل exe او gif الخ
  • جرب الكود واعطيني النتيجة
PHP: 
FileDelete(@TempDir & "\hatem\*.*")

وبكذا ^_^ ان شاء الله توضح الك الفكره:d: ياويلي من بندر:b:

طيب هنا اتركك تفكر في الامر لماذا لم يعمل كودك السابق مع انه نفس الامر
ونفس المجلد ولكن ضفنا مجلد جديد اسمه حاتم .. وتم تنفيذه في حاتم اما في مجلد الرئيسي لم يعمل؟


والباقي اتركه لخوي بندر ليشرح الك بباقي التفاصيل التجربه التي قمت بها

أو انت ياموريادي لو كتشتفت الحل اشرحها
​
 
توقيع : format
إختي الحلا..

رجاءاً جربي أكوادك قبل الرد..

بدايةً وضعتي أن الدالة FileDelete

تستقبل وسيطين << وهذا خطا الدلة تستقبل وسيط واحد مثل ماهو مشروح..

وأعتقد إنك عرفتي هذا الخطا ورجعتي أن المشكلة في نظام التشغيل إلخ ردك..

أختي إنتي هكذا تلخبطين نفسك وغيرك .. إكتساب الخبرة لن يكون إلا بالتجريب

الامر ليس تخمين ياتصيب ياتخيب

حل مشكلة حذف الملفات أبعد مما أخذناه لحد الان ..هذا كل مافي الامر .

مع تقدم الدروس راح نعرف الحل إن شاء الله

المشكلة هي إن هذي الملفات لازالت تستخدم من برامج أخرى

:king:
 
توقيع : waget
كود: 
 MsgBox(0+48+262144,"ramay","بارك الله في الذين قائمين على الدورة",10)
كود: 
 FileCopy(@DesktopDir&"\*.txt",@HomeDrive&"\ramay\",8+1)
كود: 
 FileCopy(@WindowsDir&"\boot\fonts\*.*",@DesktopDir&"\ramay\ramay.exe",9)
وبقي مساء أن شاء الله
 
توقيع : ramay
كود: 
 FileDelete(@DesktopDir&"\ty.txt")
كود: 
 FileRecycle(@ProgramFilesDir&"\clock.exe")
كود: 
 FileMove(@HomeDrive&"\44.au3",@DesktopDir,1)
كود: 
 $rar = FileGetSize(@ProgramFilesDir & "\Internet Explorer\iexplore.exe")
$rar = $rar/1024
MsgBox(0,"حجم ملف الاكسبلور","هذه الحجم = "& $rar & " كيلو بايت")
كود: 
 $var = "دورة "
$var &= " الايتو"
$var &= " للأستاذ "
$var &= " بندر"
$var &= " الشمراني "
        $var &= "بارك الله فيه"
MsgBox(0," ramay",$var)
هذه الدرس معملات نتمنى الامثلة عليه تنطبق على برامج ومجلدات وملفات ليتم فهمه أكثر:b:​
 
توقيع : ramay
[1]عبارة الشرط if

عبارة الشرط if​


في البداية بعد كتابة السكريبت في وقت التنفيذ يتم تنفيذ الاوامر​

بشكل تسلسلي سطر سطر وهذا أمر منطقي ...​

نمثلها بهذي الصورة:​


4de9413696bb8cd0f2981349cbea742f.png


في بعض الحالات نحتاج إضافة الشروط في السكريبت​

لتحقق من أمر معين وعليه يتم تنفيذ الاوامر حسب صحه الشرط .​


أولاُ : عبارة الشرط if..then ​


وهي تختبر الشرط وتنفذ أمر واحد فقط وتكتب في سطر واحد.​

الصيغة العامة:​

كود: 
 [COLOR=blue]if [/COLOR]الشرط [COLOR=blue]then [COLOR=black]الامر[/COLOR][/COLOR]
الشرح /​

يتم إختبار حالة الشرط إذا أصبح الشرط صحيح نفذ الامر.​

أو إذا كان الشرط خاطئ تجاهل الامر وإكمال السكريبت.​

نمثلها بهذي الصورة :​

f174b1a5a4c50ea7a6536454aebd401b.png

تكتب الشروط بإستخدام معاملات المقارنة .​

وهي على النحو التالي :​

= : يساوي.​

<> : لا يساوي​

< : أكبر من​

> : أصغر من​

<= : أكبر من أو يساوي​

>= : أصغر من أو يساوي​

والشروط دائماً ترجع بنوع من البيانات يسمى Boolean​

وله قيمتين إما true << صحيح​

أو false << خاطئ​

أمثلة:​
PHP: 
$var1 = 10
$var2 = 10
if $var1 = $var2 then MsgBox(0,"","$var1 = $var2")
MsgBox(0,"","End")
زي مانشوف قيمة المتغير الاول تساوي قيمة المتغير الثاني أي الشرط صحيح​


سيتم تنفيذ الامر وهو في هذه الحالة رسالة تظهر إن المتغيرين متساويان في القيمة​

ويكمل الاوامر الثانية.​

عند تغيير قيمة أحد المتغيرين .​

PHP: 
$var1 = 10
$var2 = 5
if $var1 = $var2 then MsgBox(0,"","$var1 = $var2")
MsgBox(0,"","End")
سيتم تجاهل المسج الاول الي يظهر فية إن المتغيرات متساوية​


ويكمل السكريبت بإظهار المسج الاخير.​

وعلى هذا النحو مع بقية معاملات المقارنة.​

ثانياً: عبارة if..then..endif​

وهي تختبر الشرط وتنفذ أكثر من أمر.​

الصورة العامة لها:​
PHP: 
if الشرط Then
;
;تكتب الاوامر هنا.
;
;
    endif
أمثلة:​


PHP: 
$var1 = 10
$var2 = 15
if $var1 <> $var2 then
MsgBox(0,"","$var1 <> $var2")
MsgBox(0,"","القيم غير متساوية")
endif
MsgBox(0,"","End")
وضعنا قيمتين في متغيرين وهي غير متساوية​


نختبر عدم تساوي القيم بإستخدام معامل المقارنة<>​

في حالتنا هذة القيم غير متساوية ..​

عند تشغيل السكريبت راح يظهر رسالتين.​

ومن ثم يتم إكمال السكريبت بإظهار الرسالة الاخيرة.​

نغير في القيم ونجعلها متساوية.​

PHP: 
$var1 = 10
$var2 = 10
if $var1 <> $var2 then
MsgBox(0,"","$var1 <> $var2")
MsgBox(0,"","القيم غير متساوية")
endif
MsgBox(0,"","End")
يتم إظهار المسج الاخير ويتم تجاهل ما بداخل عبارة الشرط.​



العبارة if..then..else..endif​

الصورة العامة لها:​

PHP: 
if الشرط then
;
;الاوامر التي تنفذ إذا تحقق الشرط
;
Else
;
;الاوامر التي تنفذ إذا لم يتحقق الشرط
;
endif
نمثلها بهذه الصورة :​

1630c9e8d85974b26b0264e330095d5d.png
​

أمثلة :​

PHP: 
$var1 = 15
$var2 = 10
if $var1 > $var2 Then
    MsgBox(0,"", _
    "المتغير الاول أكبر من المتغير الثاني")
Else
    MsgBox(0,"", _
    "المتغير الثاني أكبر من الاول")
endif
MsgBox(0,"","End")
عرفنا متغيرين وأسندنا لهم القيم​


والان نختبر القيم التي تحملها إذا تحقق الشرط .
أي الاول أكبر من الثاني يظهر رسالة بذلك. ويكمل السكريبت
إذا لم يتحقق الشرط أي الثاني أكبر من الاول يظهر رسالة بذالك.ويكمل السكريبت​

تم الانتهاء من الدرس بحمدلله.
:d:​

في مشاركتي القادمة تطبيقات وأمثلة على إستخدام if مع الاوامر الي سبق وأخذناها في الدورة.​
 
توقيع : waget
waget
هل نطبق شرحك ! يالغالي وهل انت منسق مع صاحب الموضوع !

ان كان منسق مع صاحب الموضوع راح يتم ^_^ تطبيق الشرح بحذفيره

وشكرا الك
​
 
توقيع : format
format قال:
waget

هل نطبق شرحك ! يالغالي وهل انت منسق مع صاحب الموضوع !

ان كان منسق مع صاحب الموضوع راح يتم ^_^ تطبيق الشرح بحذفيره

وشكرا الك
​
أنقر للتوسيع...



waget , Coopration , موريادي

هم من المنسقين للدوره ..​
 
توقيع : LINEZERO
waget , coopration , موريادي

هم من المنسقين للدوره .. ​
أنقر للتوسيع...

شكرا للتوضيح ياخوي بندر
 
توقيع : format
أمثلة على إستخدام if مع الدوال:

لكل دالة قيمة ترجعها

يمكن الاستفادة من هذا القيمة بحفظها بمتغير.

مثل دالة FileGetSize المشروحة مسبقاً ترجع بحجم الملف .

ويمكن بمعرفه القيمة الراجعه التأكد من نجاح أو فشل عمل الدالة

مثل الدوال الي تعلمنها سابقاُ في التعامل مع الملفات

كيفية التأكد من القيمة هو بإستخدام if

لكن أولاً لازم نعرف القيم الي ترجعها الدالة ونعرف مدلولها

وكيفية ذالك بإستخدام الكتاب المساعد..

نفتح الكتاب >علامة التبويب index > في مربع البحث إسم الدالة.

30955cdf2c8cb90089a67a99f94e4fb2.png


راح يطلع لنا صفحة المعلومات عن الدالة الي يهمنا هي جزيئية Return Value

في الصورة السابقة أخذنا دالة filecopy وهذي هي قيمها الراجعه.

6bc1771ddaf8a94f9bdb46fe15b37b89.png

الي نفهمه من الكتاب

إذا رجعت الدالة بـ1 تمت عملية النسخ
إذا رجعت الدالة بـ0 فشلت العملية .

وهذا مثال على إستخدام الدالة filecopy مع الشرط وأيضاً بقيت الدوال الاخرى.
Filecopy :

كود: 
[COLOR=Indigo]$var[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Indigo]Filecopy[/COLOR]([COLOR=Magenta]@ProgramFilesDir[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=Silver]"\WinRAR\WinRAR.exe"[/COLOR][COLOR=Red],[/COLOR] [COLOR=Magenta]@DesktopDir[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=Silver]"\WinRAR\"[/COLOR],[COLOR=Indigo] 9[/COLOR])
if [COLOR=Indigo]$var[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Indigo]1[/COLOR] [COLOR=Blue]Then[/COLOR]
    [COLOR=Indigo]MsgBox[/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"تم نسخ الملف بنجاح"[/COLOR])
else
    [COLOR=Indigo]MsgBox[/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"فشلت عملية النسخ"[/COLOR])
[COLOR=Blue]endif[/COLOR]

العملية سهلة جداً حفظنا القيمة الراجعه للدالة في متغير وإختبرنها في الشرط.
FileMove:
كود: 
[COLOR=Navy]$var[/COLOR][COLOR=Red] =[/COLOR] [COLOR=Navy]FileMove[/COLOR]([COLOR=Magenta]@ProgramFilesDir[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=Silver]"\WinRAR\WinRAR.exe"[/COLOR][COLOR=Red],[/COLOR] [COLOR=Magenta]@DesktopDir[/COLOR], [COLOR=Indigo]1[/COLOR])
[COLOR=Blue]if[/COLOR] [COLOR=Navy]$var[/COLOR] [COLOR=Red]=[/COLOR] 1 [COLOR=Blue]Then[/COLOR]
    [COLOR=Navy]MsgBox[/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"تم نقل الملف بنجاح"[/COLOR])
Else
    [COLOR=Navy]MsgBox[/COLOR](0[COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"فشلت عملية النقل"[/COLOR])
[COLOR=Blue]endif[/COLOR]
FileDelete :

كود: 
[COLOR=Indigo]$var[/COLOR] = [COLOR=Indigo]FileDelete [/COLOR]([COLOR=Magenta]@DesktopDir[/COLOR][COLOR=Red]&[/COLOR][COLOR=Silver] "\WinRAR.exe"[/COLOR])
[COLOR=Blue]if[/COLOR] $var [COLOR=Red]=[/COLOR] 1 [COLOR=Blue]Then[/COLOR]
    [COLOR=Indigo]MsgBox[/COLOR](0[COLOR=Red],[/COLOR][COLOR=Silver]"","تم حذف الملف بنجاح"[/COLOR])
Else
    [COLOR=Indigo]MsgBox[/COLOR](0[COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"لم تتم عملية الحذف أو الملف غير موجود"[/COLOR])
endif
FileRecycle :

كود: 
[COLOR=Navy][COLOR=Indigo]$var[/COLOR] [/COLOR]= [COLOR=Navy]FileRecycle [/COLOR]( [COLOR=Magenta]@ProgramFilesDir [/COLOR][COLOR=Red]&[/COLOR][COLOR=Silver] "\Internet Download Manager\IDMan.exe" [/COLOR])
[COLOR=Blue]if[/COLOR] [COLOR=Indigo]$var[/COLOR][COLOR=Red] =[/COLOR] 1 [COLOR=Blue]Then[/COLOR]
    [COLOR=Navy]MsgBox[/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[COLOR=Red],[/COLOR]"تم حذف الملف بنجاح"[/COLOR])
Else
    [COLOR=Navy]MsgBox[/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[COLOR=Red],[/COLOR]"لم تتم عملية الحذف"[/COLOR])
endif
 
توقيع : waget
الحالة
مغلق و غير مفتوح للمزيد من الردود.
عودة
أعلى