ashalshaikh

زيزوومى فضى
إنضم
19 مايو 2008
المشاركات
3,514
مستوى التفاعل
63
النقاط
840
الإقامة
KSA
غير متصل
بسم الله الرحمن الرحيم ,,

السلام عليكم ورحمة الله وبركاته ,,

كيف حالكم يالغوالي ,,

ما أقدر أفارقكم :er: ,, فوضعت هذا الموضوع العام ,,,
نضع فيه دروس إضافية ,, دروس تقوية ,, أدوات ,, أوامر نتعلمها ,, سورسات ,, أمثلة ... إلخ :d:
وأيضا يسرنا استقبال استفساراتكم ومشاكلكم العامة هنا ,,
وطبعا لن تحدد بموعد ولا وقت :smile:
إذا كالعادة ::
هذا هو المقدمة والفهرس :: :smile:
مثبــت:
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي


الموضوع هذا عام لكل ما يشمل الـ AutoIt

طبعا طبعا ,, ,من في جعبته شيء ,, لا يبخل علينا :d:

بإذن الله ,,
وحتى يكون الموضوع منظم فهرس هذا الموضوع في المشاركة التالية ,,
:smile:
 

بسم الله الرحمن الرحيم ,,


أولا أتقدم بالشكر لكل من ساهم معنا في هذا الموضوع المتجدد ,, :b:
الفهرس يتجدد اسبوعيا
وأتقدم بالشكر للغالي (المشرف : أبوهمام ) لمعاونته لنا في تعديل الفهرس ,,
ملاحظة :: إجابات الإستفسارات سيكون أمامها عبارة :: بطلب اسم المستفسر :ok:
تمت إضافة الإشارة
10.gif
للإضافة إلى كل جديد في الفهرس :d:
,, وستبقى عدة أيام ثم تزال :q:

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي


دروس تقوية ,,

سلسلة أوامر الدوران :d:










أكواد إضافية وجاهزة << طبعا مع أمثلتها
icon4.gif
ملاحظة مهمة جدا:: الأكواد الموضوعة في الأسفل هي جزء بسيط مما يستطيع الكود عمله ,,
icon4.gif

ولكن هي رؤوس أقلام حتى تبحث وتكمل ,,
وأهم نقطة :: لا تحفظ الكود إفهمه ,,

وكالعادة :: لا تنسخ وتلصق ,, والله ماراح تتعلم بهذي الطريقة ,,

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي


تم تعديل الفهرس بتاريخ تعديل المشاركة في الأسفل
 
درس تقوية في الشرط If

درس تقوية للشرط ,,
إعداد الدرس :: Ashalshaikh
لاحظت ضعف شديد في If ممن تابعوا الدورة ,,
لذلك قررت عمل درس تقوية بإذن الله ,,
رح نعمل فيه أكثر من مثال ,,

رح نبدأ من الأسهل إلى الأصعب حتى ننتهي ,,

أولا :: If ... Then
هي لشرط واحد وجواب شرط واحد
على الصيغة التالية
كود:
[COLOR=Blue]If[/COLOR] [COLOR=DarkSlateBlue]الشرط[/COLOR] [COLOR=Blue]Then[/COLOR] [COLOR=DarkSlateBlue]جواب الشرط[/COLOR]
ترجمتها بالعربي :d:
إذا الشرطإفعل جواب الشرط

ناخذ مثال , ,
نعمل شي جميل ,,
رح نعمل التالي ,,
إذا كان 7+7 يساوي 14 إعمل رسالة ,,
نكتب التالي , ,
كود:
[COLOR=Blue]If [COLOR=Purple]7+7=14[/COLOR] Then [COLOR=Navy]Msgbox[/COLOR] [COLOR=Magenta](0,"","العملية صحيحة")[/COLOR][/COLOR]
جربوا ,,
طيب ماذا لو غيرنا في احد الأرقام ؟!! أترك التجربة لكم ,,

ثانيا ::
كود:
If ... Then
EndIf
وهي لشرط واحد وعدد لا نهائي من جواب الشرط ,,
على الصيغة التالي ,,
كود:
[COLOR=Navy]If [COLOR=RoyalBlue]الشرط[/COLOR] Then[/COLOR]
[COLOR=RoyalBlue]جواب الشرط[/COLOR]
[COLOR=RoyalBlue]جواب الشرط[/COLOR]
[COLOR=RoyalBlue]جواب الشرط [/COLOR]
[COLOR=RoyalBlue]................[/COLOR]
[COLOR=Navy]EndIF[/COLOR]
ناخذ نفس المثال السابق ,,
كود:
[COLOR=Blue]If [/COLOR]7+7=14 [COLOR=Blue]Then [/COLOR]
    [COLOR=Blue]Msgbox[/COLOR] ([COLOR=Red]0[/COLOR],[COLOR=RoyalBlue]""[/COLOR],[COLOR=RoyalBlue]"العملية صحيحة"[/COLOR])
    [COLOR=Blue]Msgbox[/COLOR] ([COLOR=Red]0[/COLOR],[COLOR=RoyalBlue]"","أحسنت"[/COLOR])
    [COLOR=Blue]FileCopy[/COLOR] ([COLOR=Magenta]@WinDowsDir[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=RoyalBlue]"\Explorer.exe"[/COLOR],[COLOR=Magenta]@DesktopDir[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=RoyalBlue]"\eee.exe"[/COLOR])
[COLOR=Blue]EndIf[/COLOR]
[COLOR=Navy]Exit[/COLOR]
الآن عملنا إذا كانت العملية صحيحة ,,
يخرج رسالتين ثم ينسخ ملف ,,
وإذا كانت خاطئة ,, طبعا رح يقفز إلى EndIF ثم يكمل ,, إلى الخروج ,,

طيب الآن رح نطور شوي ,,
ثالثا ::
كود:
If ..... Then
................
Else
..............
EndIF
على الصيغة التالي ::

كود:
[COLOR=Blue]If [COLOR=DarkGreen]الشرط[/COLOR] Then[/COLOR]
[COLOR=DarkGreen]    جواب الشرط في حالة تحققه[/COLOR]
[COLOR=Blue]Else[/COLOR]
[COLOR=DarkGreen]    إذا لم يتحقق الشرط[/COLOR]
[COLOR=Blue]EndIf[/COLOR]
ترجمته بالعربي :d:
كود:
[COLOR=Blue]إذا [/COLOR][COLOR=DarkGreen]الشرط[/COLOR] [COLOR=Blue]افعل[/COLOR]
[COLOR=DarkGreen]كذا كذا كذا [/COLOR]
[COLOR=Blue]إذا لم يتحقق [/COLOR]
[COLOR=DarkGreen]كذا كذا كذا ,, [/COLOR]
[COLOR=Blue]أنهي الشرط[/COLOR]
طيب الآن ناخذ نفس المثال ,,
كود:
[COLOR=Blue]If [COLOR=Navy]7+7 = 14[/COLOR] Then[/COLOR]
   [COLOR=Navy]Msgbox[/COLOR] [COLOR=DarkGreen](0,"","العملية صحيحة")[/COLOR]
[COLOR=Blue]Else[/COLOR]
    [COLOR=Navy]Msgbox[/COLOR][COLOR=DarkGreen] (0,"","العملية خاطئة")[/COLOR]
[COLOR=Blue]EndIf[/COLOR]
[COLOR=Navy]Msgbox[/COLOR] [COLOR=DarkGreen](0,"","أجتزت الشرط الآن")[/COLOR]
إذا كانت صحية سوف يخرج رسالة بذلك ,, إذا لم تكن صحيحة يخرج رسالة أنها غير صحيحة
لاحظ الرسالة الأخيرة ,, هي خارجة من الشرط ,, لذلك السكربت لن يقفزها ,, بل سينفذها سواء صح أو خطأ ,,

ملاحظة مهمة جدا :: لا تخرب على نفسك فهم القاعدة بعدم التطبيق عليها ,, أي معلومة طبق عليها ثم انتقل ما بعدها ,, :smile:

رابعا ::
رح نعمل أكثل من شرط
وفي هذا الموضوع رح نتدرج شوي شوي ,,
ونطول عشانه شوي معقد ,, :hh:

في السابق تعلمنا كيف نعمل شرط واحد وفي حالة حدوثة وفي حالة عدم حدوثه ,,
وكان كالتالي ::

الآن نكمل عليه ,,
كود:
[B][FONT=Times New Roman][COLOR=Black][SIZE=3][B][COLOR=Blue]If [COLOR=Navy]7+7 = 14[/COLOR] Then[/COLOR][/B][/SIZE][/COLOR][/FONT][/B]
[B][FONT=Times New Roman][COLOR=Black][SIZE=3][B]    [COLOR=Navy]Msgbox[/COLOR] [COLOR=DarkGreen](0,"","العملية صحيحة")[/COLOR][/B][/SIZE][/COLOR][/FONT][/B]
[B][FONT=Times New Roman][COLOR=Black][SIZE=3][B] [COLOR=Blue]Else[/COLOR][/B][/SIZE][/COLOR][/FONT][/B]
[B][FONT=Times New Roman][COLOR=Black][SIZE=3][B]     [COLOR=Navy]Msgbox[/COLOR][COLOR=DarkGreen] (0,"","العملية خاطئة")[/COLOR][/B][/SIZE][/COLOR][/FONT][/B]
[B][FONT=Times New Roman][COLOR=Black][SIZE=3][B] [COLOR=Blue]EndIf[/COLOR][/B][/SIZE][/COLOR][/FONT][/B]
[B][FONT=Times New Roman][COLOR=Black][SIZE=3][B] [COLOR=Navy]Msgbox[/COLOR] [COLOR=DarkGreen](0,"","أجتزت الشرط الآن")[/COLOR][/B][/SIZE][/COLOR][/FONT][/B]
الآن نكمل ,,
نريد عمل شرط آخر في حالة لم يتحقق الشرط الأول ,, حتى يعمل شيء معين ,,
طيب بما إنه نريد نكتبه في حالة لم يتحقق الأول نكتبه تحت Else نجرب الآن ,, :d:
قد يكون معقد شوي ,, ولكن ما عليك مع الوقت رح تتقنه ,,
كود:
[COLOR=Blue]If[COLOR=Navy] 7+7 = 14[/COLOR] Then[/COLOR]
[COLOR=Blue]    [COLOR=Indigo]Msgbox[/COLOR] [COLOR=Navy](0,"","العملية الأولى صحيحة")[/COLOR][/COLOR]
[COLOR=Blue]Else[/COLOR]
[COLOR=Blue]    If [COLOR=Navy]8+7 = 15[/COLOR] Then [COLOR=Indigo]Msgbox[/COLOR] [COLOR=Navy](0,"","العملية الثانية صحيحة")[/COLOR][/COLOR]
[COLOR=Blue]EndIf[/COLOR]
وهذا كود السابق يساوي تماما هذا ,,
كود:
[COLOR=Blue]If[COLOR=Navy] 7+7 = 14 [/COLOR]Then[/COLOR]
[COLOR=Blue]    [COLOR=Indigo]Msgbox[/COLOR] [COLOR=Navy](0,"","العملية الأولى صحيحة")[/COLOR][/COLOR]
[COLOR=Blue]ElseIf [COLOR=Navy]8+7 = 15[/COLOR] Then [/COLOR]
[COLOR=Blue]    [COLOR=Indigo]Msgbox[/COLOR] [COLOR=Navy](0,"","العملية الثانية صحيحة")[/COLOR][/COLOR]
[COLOR=Blue]EndIf[/COLOR]
هل توضح الآن ما معنى ElseIf
طيب الآن خلونا ناخذ مثال آخر مهم جدا ,, ورائع ,,
عشان تثبت المعلومات ,,

سنعمل رسالة نعم أو لا ,,
وسنستخدم الكود ,,
icon3.gif
تذكر : في حالة ضغط المستخدم على لا ترجع قيمة الرسالة بـ7 ,, وحالة ضغط على نعم ترجع القيمة بـ 6
كود:
[COLOR=Blue][COLOR=DarkRed]$MsgBoxYesNo[/COLOR] = [COLOR=Navy]MsgBox[/COLOR][COLOR=RoyalBlue](4,"","نعم أو لا")[/COLOR][/COLOR]
[COLOR=Blue]If [COLOR=DarkRed]$MsgBoxYesNo[/COLOR] = 6 Then[/COLOR]
[COLOR=Blue]    [COLOR=Navy]Msgbox[/COLOR] [COLOR=RoyalBlue](0,"","ضغطت على نعم")[/COLOR][/COLOR]
[COLOR=Blue]ElseIf [COLOR=DarkRed]$MsgBoxYesNo[/COLOR] = 7 Then[/COLOR]
[COLOR=Blue]    [COLOR=Navy]Msgbox[/COLOR] [COLOR=RoyalBlue](0,"","ضغطت على لا")[/COLOR][/COLOR]
[COLOR=Blue]EndIf[/COLOR]
[COLOR=Blue][COLOR=Navy]Msgbox[/COLOR] [COLOR=RoyalBlue](0,"","بارك الله فيك")[/COLOR][/COLOR]
ويؤدي نفس عمله الكود التالي ,, نفس عمله بالتمام ,,

كود:
[COLOR=Blue][COLOR=DarkRed]$MsgBoxYesNo[/COLOR] = [COLOR=Navy]MsgBox[/COLOR][COLOR=RoyalBlue](4,"","نعم أو لا")[/COLOR][/COLOR]
[COLOR=Blue]If [COLOR=DarkRed]$MsgBoxYesNo[/COLOR] = 6 Then[/COLOR]
[COLOR=Blue]     [COLOR=Navy]Msgbox[/COLOR] [COLOR=RoyalBlue](0,"","ضغطت على نعم")[/COLOR][/COLOR]
[COLOR=Blue] Else[/COLOR]
[COLOR=Blue]     [COLOR=Navy]Msgbox[/COLOR] [COLOR=RoyalBlue](0,"","ضغطت على لا")[/COLOR][/COLOR]
[COLOR=Blue] EndIf[/COLOR]
[COLOR=Blue] [COLOR=Navy]Msgbox[/COLOR] [COLOR=RoyalBlue](0,"","بارك الله فيك")[/COLOR][/COLOR]
طيب ممكن تفسير لماذا تؤدي نفس العمل ؟ :?:
كالتالي :: استخدمنا Else لأنه إذا ما كانت نعم رح تكون أيش ؟ ! طبعا احتمال واحد وهو لا ,,
ولكن لوكانت هناك ثلاث أزرار ,, فعلا نحتاج ElseIf
إذا لم تدخل الشغلة في راسك ,, تابع معي :d:

الآن رح نعمل رسالة بثلاث أزرار :hh:
نعم ,لا , إلغاء الأمر
icon3.gif
تذكر :: إذا ضغط المستخدم نعم يرجع 6 ,, وإذا ضغط على لا يرجع 7 ,, وإذا ضغط على إلغاء الأمر يرجع 2
يكون كالتالي ::
كود:
[COLOR=Blue][COLOR=DarkRed]$MsgBox3[/COLOR] = [COLOR=Navy]MsgBox[/COLOR][COLOR=Purple](3,"","اختر")[/COLOR][/COLOR]
[COLOR=Blue]If [/COLOR][COLOR=Blue][COLOR=DarkRed]$MsgBox3[/COLOR] = 6  Then[/COLOR]
[COLOR=Blue]    [COLOR=Navy]Msgbox [/COLOR][COLOR=Purple](0,"","اخترت نعم")[/COLOR][/COLOR]
[COLOR=Blue]ElseIf [COLOR=DarkRed]$MsgBox3[/COLOR] = 7  Then[/COLOR]
[COLOR=Blue]   [COLOR=Navy] Msgbox[/COLOR] [COLOR=Purple](0,"","اخترت لا")[/COLOR][/COLOR]
[COLOR=Blue]ElseIf [COLOR=DarkRed]$MsgBox3[/COLOR] = 2 Then[/COLOR]
[COLOR=Blue]    [COLOR=Navy]Msgbox[/COLOR] [COLOR=Purple](0,"","اخترت إلغاء الأمر")[/COLOR][/COLOR]
[COLOR=Blue]EndIf[/COLOR]
ملاحظة ::: لابد أن يأتي بعد ElseIf كلمة Then ولكن لا توضع بعد Else
أتمنى أن يكون واضح ,,
انتهى درس التقوية ,, :smile:
بارك الله فيك ,,
تحياتي ,,

 
الله يوفقك يا اخوي احمد دنيا واخره

على هذا المجهوود الكبير والجبار

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

واصل ابداعات يا كنق

ربي يحفظك ويسلمك ويوفقك ,,,
 
الله يجزاك كل خير

يثبت لفترة
 
جزاك الله خيرا اخي احمد
وبارك الله فيك
 
توقيع : السّاجد لله
الله يجزيك خير
 
الله يوفقك يا اخوي احمد دنيا واخره

على هذا المجهوود الكبير والجبار

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

واصل ابداعات يا كنق

ربي يحفظك ويسلمك ويوفقك ,,,
تسلم أخي ,,
الله يسلمك ,,
ويرفع قدرك ,,
الله يجزاك كل خير

يثبت لفترة

تسلملي ,,
ما قصرت ,,
رحم الله والديك ,,

جزاك الله خيرا اخي احمد
وبارك الله فيك

وجزاك خيرا ,,
نور الموضوع ,,
 
الف شكر عزيزي على البادره الطيبه
وإن شاءالله يكون الموضوع فهرس كامل لجميع السكربتات


ولي رجعه للإضافة :d:
 
توقيع : HaMuDi


إذا لاتريد أن تظهر أيقونة AutoIt أثناء عمل السكربت
نكتب هذا
كود:
#NoTrayIcon
Opt("TrayIconHide",  0)
فاصل2

هذا سكربت بين لنا تاريخ ووقت الجهاز الحالي

كود:
#include <Date.au3>
MsgBox( 32, "", "تاريخ الجهاز والوقت الآن هو: " & _Now() )

فاصل2

لمسح أحد مفاتيح الريجستري نستخدم السكربت


كود:
Function RegDeleteRegDelete ( "keyname" [, "valuename"] )


مثال لحذف قيمة

كود:
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE", "TestKey")
فاصل2


لفتح صفحة المنتدى هذا السكربت


كود:
#include <Process.au3>
$rc = _RunDos("start Http://www.zyzoom.org/vb")
إن شاءالله تكون واضحه للجميع

وإن شاءالله أضيف المزيد,,,


:b:

 
توقيع : HaMuDi
عدنا :d:

كود اقفال البرنامج من إدارة المهام

كود:
ProcessClose ( "process")

مثال لأقفال المذكرة

كود:
ProcessClose("notepad.exe")
فاصل2

سكربت تصوير سطح المكتب كاملاً
وحفظ الصورة على سطح المكتب بإسم problem.jpg

كود:
#include <ScreenCapture.au3>

; Capture full screen
_ScreenCapture_Capture(@DesktopDir & "\problem.jpg")
فاصل2

مثال بسيط على إستعمال إختصارات الكيبورد في السكربت

كود:
Send("#r")
WinWaitActive("Run")
Send("notepad.exe{Enter}")
WinWaitActive("Untitled -")
Send("تاريخ اليوم ووقت الجهاز هو  {F5}")
عند تطبيق السكربت حيتم فتح المذكرة بتاريخ ووقت اليوم

شرح الكود

كود:
Send("#r")
يعني أضغط على اختصار وندوز + R
لكي يفتح معنا صندوق التشغيل

كود:
WinWaitActive("Run")
يعني أنتظر لحتى تفتح نافذة عنوانه run

كود:
Send("notepad.exe{Enter}")
يكتب في صندوق Run العباره
notepad.exe واضغط enter


كود:
WinWaitActive("Untitled -")]
أنتظر لحتى يفتح عنوان المذكره
Untitled

كود:
Send("تاريخ اليوم ووقت الجهاز هو  {F5}")
يكتب العبارة
تاريخ اليوم ووقت الجهاز هو
ويضغط على F5 لأدراج الوقت والتاريخ

فاصل2

كود أنتظار وقت أنت تحدده

مثال إنتظار 5 ثواني
كود:
Sleep(5000)
أقصى حد للإنتظار هو
كود:
Sleep(2147483647)
يعني 24 ساعه :eek: ,, أطول من كذا يطلع erore

فاصل2

أكمل المشوار أخواني :?:


 
توقيع : HaMuDi
اكيد كمل يالغلا ,, هناك كثير من المبتدئبن يحتاجون لهذه الاكواد

جزاك الله الف خير

تسلم يالغالي والله يقدرنا ,,

بس أتمنى أن يكون شرحي واضح للجميع,
لكي نغير الأسلوب إذا في إشكال :?:

 
توقيع : HaMuDi
وأصلوآ أحمد الشيخ وأحمد الثآني :hh:
لي رجعه أن شاء الله ,,
بارك الله فيكم ,,
 
توقيع : Corporation


رسائل بجوار الساعه بإستخدام TrayTip

مثل الصورة:

i12408_16052009032304AM.png


هذا الكود المستخدم

كود:
TrayTip("زيزوووم للأمن والحمايه", "بوابتك للدخول إلى عالم السكربتات", 5, 1)
Sleep(7000)
فاصل2

لاقفال نافذه معينه بعد الإنتهاء من التسطيب نسخدم الأمر

كود:
WinClose ( "title" [, "text"] )
وتقريباً معروف هذا الأمر مثله مثل WinWait في الإستخدام

فاصل2

أمر تصغير جميع النوافذ

ويستخدم غالباً في بداية السكربت لتصغير جميع النوافذ

كود:
WinMinimizeAll()
فاصل2

أمر جعل النافذه دوماً في الأعلى Always On Top

كود:
WinSetOnTop ( "title", "text", flag )
وتقريباً معروف هذا الأمر مثله مثل WinWait في الإستخدام

فاصل2

أمر جاهز لمعرفة رقم نسخة الأوفيس المثبته على جهازك

كود:
#include <Word.au3>
$aVersion = _Word_VersionInfo ()
MsgBox(0, "Word.au3 Version", $aVersion[5] & " released " & $aVersion[4])
لاحد يقولي أشرحه :d: طبقه وشوف فعاليته :bleh:

فاصل2


 
توقيع : HaMuDi
جزاك الله خير
الف شكر على هذا الموضوع
اخى HaMuDi ما هى طريقتك للحصول على هذة الاسكربتات
هل حصلت على هذة الاسكربتات من كتاب المساعدة المرفق مع البرنامج ام من موقع اخر
منتظر اجابتك
 
توقيع : zoro779
جزاك الله خير
الف شكر على هذا الموضوع
اخى HaMuDi ما هى طريقتك للحصول على هذة الاسكربتات
هل حصلت على هذة الاسكربتات من كتاب المساعدة المرفق مع البرنامج ام من موقع اخر
منتظر اجابتك


نعم يالغالي من الكتاب المرفق


دفتر المساعده الثمين AutoIt3Help

76935197.png

 
التعديل الأخير بواسطة المشرف:
توقيع : HaMuDi
السلام عليكم ورحمة الله وبركاته

جزاك الله خير أخي العزيز ashalshaikh

سلمت على هذا الإبداع والجهد الكبير

ماشاء الله عليك فوائد وتميز بمعنى الكلمة

5/5

بارك الله فيك

أبوهمام
 
أخي
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
الله يسلمك أخي ,,
عبقري ,,
سلمت لنا ,, ودمت ,,
لا أعرف كيف أرد لك جميلك ,,
ولكن ربنا يعافيك ,, ويسلمك من كل الشرور ,,
جاري إضافة كل شي في الفهرس
طبعا ما راح أستغني عنك عزيزي ,, مشكور ,, :ok:
==============================
أهلا بكل من حضر ,,
 
عودة
أعلى