موضوع خاص لدعــم الـ AutoIt -- افكار ؛ مشاريع ؛ سورسات ؛ اسئله ؛ نقاشات ...... الخ

وضيفته يظهر ي النتيجة أكبر

 

تمام ,,​

جاري تفصيل خطوات الكود ,,​

كود:

$var = 30

كود:

[CENTER]$var1 = 25
[CENTER]if $var > $var1 then 
msgbox(0,"","العدد الاكبر 30")
else
msgbox(0,"","العدد الاصغر 25")
endif
msgbox(0,"","النتيجة ")[/CENTER]
[/CENTER]

السطر الاول

كود:

[COLOR=blue]$var = 30[/COLOR]

معناها أن المتغير = 30 وهو أكبر قيمة في الكود​

السطر الثاني

كود:

[COLOR=darkred]$var1 = 25[/COLOR]

معناها أن المتغير = 25 وهو أصغر قيمة في الكود​

السطر الثالث

كود:

[COLOR=red]if[/COLOR] [COLOR=darkred]$var[/COLOR] [COLOR=green]>[/COLOR] [COLOR=darkred]$var1[/COLOR] [COLOR=purple]then[/COLOR]

معناها : باستخدام IF وضعت شرط وهو ان المتغير الاول الذي يساوي 30 أكبر > من المتغير الثاني الذي قيمته 25 ... فإن​

السطر الرابع

كود:

msgbox(0,"","[COLOR=blue]العدد الاكبر 30[/COLOR]")

فإن : اذا كان الشرط متحقق أي 30 > 25 سيظهر الكود التالي ( العدد الاكبر 30 )​

السطر الخامس

كود:

[COLOR=darkorange]else[/COLOR]

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

السطر السادس

كود:

msgbox(0,"","[COLOR=darkred]العدد الاصغر 25[/COLOR]")

عند عدم تحقق الشرط الاول سينتقل الكود للأمر بعد ELSE وهو رسالة ( العدد الاصغر 25 )​

السطر السابع

كود:

[COLOR=navy]endif[/COLOR]

نهاية الشرط IF​

السطر الثامن

كود:

msgbox(0,"","النتيجة ")

سيظهر هذا الامر في كلا الحالتين .. اذا تحقق الشرط ام لم يتحقق ( النتيجة )​

ويمكنك اللعب بالشرط من عملية المقارنة [>] أكبر من أو [<] أصغر من في الكود​

أي استفسار أنا بالخدمة ياغالي​

 

خلص يا الغالي خطأ كان عندي أنه لدي 4 صنديق
صحيح
ولو أردات أظهار النتيجة نهائية في صندوق كيف سيكون كود ​

 

وضح أكثر ياغالي .. لكي استطيع فهمك

 

أريد الرقم في صندوق النتيجة
يعني 30 أما 25

كود:

msgbox(0,"","النتيجة  30أما 25 ")

أتمنى الاقوى حالي في هذه

if..
Else
endif

يعني متى توضع ومتى لا
لأن أضع else أو endif في أمكان تظهر لي
مثال

كود:

 $var = 30
$var1 =25
if $var > $var1 then
msgbox(0,""," 30 أنا الاول أكبر")
else
msgbox(0,"","25 ثاني أكبر من الاول")
endif
msgbox(0,"","النتيجة ")
EndIf

الان في سطر الاخير لم تحذف endf
يطلع كود تمام ولم نضاف يظهر خطأ

 

اها ,, قصدك اذا تحقق الشرط يظهر النتيجة مع الرقم ؟

 

نعم هذا هو

وسؤال لدرس جديد للأستاذ بندر

كود:

[COLOR=#000000][FONT=Courier New][COLOR=#0000bb]$dir[/COLOR][COLOR=#007700]=[/COLOR][COLOR=#0000bb]DirCopy[/COLOR][COLOR=#007700](@[/COLOR][COLOR=#0000bb]ProgramFilesDir [/COLOR][COLOR=#007700]& [/COLOR][COLOR=#dd0000]"\WinRAR"[/COLOR][COLOR=#007700], @[/COLOR][COLOR=#0000bb]DesktopDir [/COLOR][COLOR=#007700]&[/COLOR][COLOR=#dd0000]"\BackUpFolder" [/COLOR][COLOR=#007700],[/COLOR][COLOR=#0000bb]1[/COLOR][/FONT][FONT=Courier New][COLOR=#007700])
if [/COLOR][COLOR=#0000bb]$dir[/COLOR][COLOR=#007700]=[/COLOR][/FONT][FONT=Courier New][COLOR=#0000bb]1 Then
 MsgBox[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000bb]0[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]""[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]"done"[/COLOR][/FONT][FONT=Courier New][COLOR=#007700])
Else
 [/COLOR][COLOR=#0000bb]MsgBox[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000bb]0[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]""[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]"error"[/COLOR][/FONT][FONT=Courier New][COLOR=#007700])
EndIf  
[/COLOR][COLOR=#0000bb][/COLOR][/FONT][/COLOR]اذا لم يكن موجود المجلد المنسوخه اليه الملفات فانه سيتم محاولة انشاءه تلقائياً

طيب هكذا غير أسم مجلد لو اردنا أبقى أسم على حاله

 

حبيب قلبي رامي ,,, هل جميع استفسارتك متعلقة بالدورة ؟

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

لكي تستفيد وتفيد غيرك ونتعلم كلنا ..

بانتظارك في موضوع الدورة

ودي وتقديري

 

اخوي بندر عذرا على الكتابة بهذا الموضوع​

ولكن راسلتك من امس على الخاص علشان الدورة ​

وللحين مافي اي رد منك ,, اقدر اشترك معاكم بالدورة حاليا ام تم الأكتفاء !!!​

 

تقدر ونص ..
:d: يتم مراسلة الاداره​

 

والله انا جيت اجرب هذا الامر

كود PHP:

if FileExists "c:\boot.ini" Then
    MsgBox ( 0+64+262144, "Note","You are runnig Windows XP")
Else
    MsgBox ( 0+64+262144, "Note","You are runnig Windows Vista or 7")
EndIf

جاتني رسالة خطأ



ليش وشنو الحل

 

راجع الدورة الأصلية للـ AutoIt لتلاحظ أن كل المعاملات (Parameters) دائماً ما تكتب داخل ()

ذلك يعني أن في هذه الحالة ستكون :

كود:

FileExists[COLOR=Red]([/COLOR]"c:\boot.ini"[COLOR=Red])[/COLOR]

بالتوفيق
​

 

الله يرحم والديك مشكوور

 

http://www.zyzoom.org/vb/showthread.php?t=197404&page=4


وعن إذن اخواني
hmammou & alzri2
ممكن اعدل الكود لكي يصبح اكثر احترافي وفعالية

كود:

if FileExists(@HomeDrive &"\boot.ini") Then
    ; هنا قم بوضع الاكواد والسورسات التي تريد تنفيذها في ويندوز اكس بي
Else
    ; هنا قم بوضع الاكواد التي تريد تنفيذها في ويندوز سفن
EndIf 

 

هل من الممكن استخدام الكود التالي بدل عن الكود الماضي

كود:

OSVerision

al-awady-ocab-alzri2
ومن ما يعرفهم وهل يخفى علينا العلماء
المنتدى ومن فيه والكل يشهد بخبراتهم في الاتوات وحبهم بمساعدة الاخرين ولا يحبون الاحتكار بالعلم فهم كانوا دائما يقدمون المساعدة في دروس الشيخ بعكس الاخرين في منتديات اخرى غير منتدى زيزوم

اتمنى من الاعضاء الذذين ذكرتهم مشاركتنا في هذه الدروس لكي الكل يستفيد ولكي تعم الفائدة على الكل
فهالدف من هذه الدورة هي الاستفادة ونشر العلم والتطور ورقي المواضيع في منتدى زيزوم

 

جيد وصولكي لها بنفسكِ

بالنسبة لـ OSVersion@

فهي تعتبر من الماكرو وترجع القيم الآتيه :
​

كود:

Returns one of the following: "WIN_2008R2", "WIN_7", "WIN_2008", "WIN_VISTA",  "WIN_2003", "WIN_XP", "WIN_XPe", "WIN_2000".

وفي حالتنا إذا أردنا الحصول على نفس الناتج أو أدق قليلاً فبالتالي :

كود:

If @OSVersion = "WIN_7" Then MsgBox(64, "Info", "You are at windows 7 !!")
If @OSVersion = "WIN_VISTA" Then MsgBox(64, "Info", "You are at windows vista !!")
If @OSVersion = "WIN_XP" Then MsgBox(64, "Info", "You are at windows XP !!")
If @OSVersion = "WIN_7" Or @OSVersion = "WIN_VISTA" Then MsgBox(64, "Info", "You are at windows 7 or windows vista !!")

بالنسبة للسطر الأخير فهو يشرح طريقة إضافة شرطين متتاليين وتم إستعمال الرابط or ولكم التجربة لمثال آخر على الرابط And

للإستزادة يوجد موضوع بعنوان : Macro Reference - System Info في كتاب المساعدة المرفق مع اللغة

أما بالنسبة لموضوع العمليات المنطقية مثل or و and فيوجد موضوع بإسم :
Language Reference - Operators

والسلام عليكم
​

 

سوعال خارجي :d:

وراه ذي مو راضيه تشتغل ؟
كنها محذوفة



جربتها على اكسبي وسفن وتعيي تشتغل

 

المشكلة ليست من عندك المشكلة من SciTE

هذا الملف موجود به الذي تريد :
http://www.autoitscript.com/cgi-bin/getfile.pl?../autoit3/scite/download/SciTE4AutoIt3.zip

بالتوفيق

 

بارك الله فيك .. ورفع قدرك


تحياتي

​

 

اعمل لها خصائص وشوف مسارها وانسخه وشغل المسار على run

وإذا اشتغل فهناك مشكلة غير معروفة :q:

وإذا لا فهو غير موجود بجهازك :d: