[au3-G] :: استفسارات ، مشاكل ، حلول ,, إضافات ,, دروس تقوية ,, أوامر جاهزة ,, أمثلة ,, في AutoIt 3

  • بادئ الموضوع بادئ الموضوع ashalshaikh
  • تاريخ البدء تاريخ البدء
  • المشاهدات 114,207
القنـاص قال:
خلك قوي زي هذا :d:

appfullproxy.gif
أنقر للتوسيع...


:hh:
:hh::hh:
:hh::hh::hh:
:hh:
:hh:
:hh:
 

توقيع : Future Tank X-1
bawar قال:
السلام عليكم ورحمته الله وبركاته
جزاك الله خيرا اخي ashalshaikh لوتكرمت بان ترفع لنا الاداة فك حوالي 99.99999999999999999% من أدوات الأوتيت بأداة بسييييييييطة جدا لانني محتاجة لهذه الاداة بقصد تطوير بعض البرنامج والسكربتات ولدي سؤال حول كيفية حماية
البرنامج معين بواسة سريال المصنع للهارد ديسك وليس سريال القرص (C)لانه يتغير بعد كل الفرمته ولكن هناك سكربت معرفة سريال المصنع وهي
كود: 
$colItems = ""
$strComputer = "localhost"
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT SerialNumber FROM Win32_PhysicalMedia")
If IsObj($colItems) then
 For $objItem In $colItems
  MsgBox(0, "Serial", StringStripWS($objItem.SerialNumber, 3))
 Next
EndIf
ارجوا منك ان تساعدني لكيفية جعل السكربت مرتبا لتحقق من السريال المقصود شرط لايضهر السريال في هذه الحال للمستخدم مجرد التحقيق من السريال الهارد اذا كان السريال صحيحا يعمل باقي السكربتات التي بعدها واذا كان السريال ليس صحيحا يغلق السكربت
واعطاء مسج بوكس للمستخدم ان يخبره لايستطيع استخدام البرناج وهذه لحماية المشروع ان لايعمل الا على الجهاز المطلوب مثلا هذه سريال المصنع للهارد ديسك عندي 442135640672 وشكرا واسف على الازعاج وارجومنك ان تفهم قصدي لان ادراكي للغة العربية ضعيفة وشكرا لك مرة اخرى
ولا تنسى ان ترفع لنا اوتعطيني الاداة على الخاص مع شرح بسيط للاداة لوسمحت :i:
أنقر للتوسيع...

أنا آسف ,, بخصوص الفك ,, أنا آسف فعلا :b::er:
وبالنسبة للكود !! فقط فقط ضع شرط بدل المسج بوكس ,,,
وبإمكانك استخدام الأمر DriveGetSerial لجلب سيريال الدرايف :smile:
تفضل هذا الكود بعد التعديل
كود: 
[color="#aa0000"]$colItems[/Color] [color="#ff0000"]=[/Color] [color="#9999cc"]""[/Color]
[color="#aa0000"]$strComputer[/Color] [color="#ff0000"]=[/Color] [color="#9999cc"]"localhost"[/Color]
[color="#aa0000"]$objWMIService[/Color] [color="#ff0000"]=[/Color] [color="#000090"]ObjGet[/Color][color="#ff0000"]([/Color][color="#9999cc"]"winmgmts:\\"[/Color] [color="#ff0000"]&[/Color] [color="#aa0000"]$strComputer[/Color] [color="#ff0000"]&[/Color] [color="#9999cc"]"\root\CIMV2"[/Color][color="#ff0000"])[/Color]
[color="#aa0000"]$colItems[/Color] [color="#ff0000"]=[/Color] [color="#aa0000"]$objWMIService[/Color][color="#0000ff"].ExecQuery[/Color][color="#ff0000"]([/Color][color="#9999cc"]"SELECT SerialNumber FROM Win32_PhysicalMedia"[/Color][color="#ff0000"])[/Color]
[color="#0000ff"]If[/Color] [color="#000090"]IsObj[/Color][color="#ff0000"]([/Color][color="#aa0000"]$colItems[/Color][color="#ff0000"])[/Color] [color="#0000ff"]Then[/Color]
    [color="#0000ff"]FOr[/Color] [color="#aa0000"]$objItem[/Color] [color="#0000ff"]In[/Color] [color="#aa0000"]$colItems[/Color]
        [color="#0000ff"]If[/Color] [color="#000090"]StrIngStripWS[/Color][color="#ff0000"]([/Color][color="#aa0000"]$objItem[/Color][color="#0000ff"].SerialNumber[/Color][color="#ff0000"],[/Color] [color="#ac00a9"]3[/Color][color="#ff0000"])[/Color] [color="#ff0000"]<[/Color][color="#ff0000"]>[/Color] [color="#ac00a9"]1[/Color][color="#ac00a9"]2[/Color][color="#ac00a9"]3[/Color][color="#ac00a9"]4[/Color][color="#ac00a9"]5[/Color][color="#ac00a9"]6[/Color][color="#ac00a9"]7[/Color][color="#ac00a9"]8[/Color][color="#ac00a9"]9[/Color][color="#ac00a9"]1[/Color][color="#ac00a9"]2[/Color][color="#ac00a9"]3[/Color][color="#ac00a9"]4[/Color][color="#ac00a9"]5[/Color][color="#ac00a9"]6[/Color][color="#ac00a9"]7[/Color][color="#ac00a9"]8[/Color][color="#ac00a9"]9[/Color] [color="#0000ff"]Then[/Color] [color="#0000ff"]Exit[/Color]
    [color="#0000ff"]Next[/Color]
[color="#0000ff"]EndIf[/Color]

فدى الرسول قال:
السلام عليكم ورحمت الله وبركاته
هى ممكن تقول عليها اداة لكنها 210 كيلو تقربيا لكنها موجودة بالبرنامج نفسه المهم انك تعرف الاصدار اللى هتفكه كام عتقد انى افشيت سر :i::bleh:
انا بفضل الله وجدت طريقة فك السورس وكل السورسات:hh:
أنقر للتوسيع...
وعليكم السلام ,,
طبعا ليست هذه :bleh::bleh::bleh::bleh::bleh: ركز في كلامي تجد مكتبوب (( ليست المرفقة )) :bleh:
القنـاص قال:
امر TraySetState

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

صيغة الامر

كود: 
[COLOR=#000090]TraySetState[/COLOR] [COLOR=#ff0000]([/COLOR] [COLOR=#ff0000][[/COLOR] flag [COLOR=#ff0000]][/COLOR] [COLOR=#ff0000])[/COLOR]
flag = لها 5 حالات

1 = يقوم بإظهار الايقونة
2 = اخفاء الايقونة
4 = يقوم بعمل فلاش في الايقونة (تظهر و تختفي)
8 = يقوم بإيقاف الفلاش في الايقونة
16 = يرجع الايقونة مثل ما كانت (يعني بدون فلاش و اذا كانت مخفية تظهر)

مثال

كود: 
[COLOR=#000090]TraySetState[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]Sleep[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]TraySetState[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]8[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]Sleep[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]TraySetState[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]2[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]Sleep[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]3[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]TraySetState[/COLOR] [COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]1[/COLOR][COLOR=#ac00a9]6[/COLOR][COLOR=#ff0000])[/COLOR]
ملاحظة : استخدمت اداتك يا الشيخ لأن ما عندي وورد ولا بحمله ^_^

تهياتي :d:
أنقر للتوسيع...
ماشاءا لله تبارك الله ,,
دائما تدهشنا بدروسك ,!!!
بخصوص الأداة حتى أنا أستخدمها الآن !! لأن ما عندي وورد كمان خخخخخخخخخخ :hh::smile:

yahweh قال:
بارك الله فيك مجهود جبار تشكر عليه وعندي سؤال :d:

كيف اقدر استخدم الواجهة الرسوميه في البرنامج يعني قصدي اني كيف اقدر اسوي زي كذا :d:


i22157_m.png




كيف :d:

​
أنقر للتوسيع...
إذا كنت تريد شرح فستنتظر طويلا :q:
أما عطني المواصفات التي تريدها ورح أعطيك وحدة جاهزة :smile: يعني الطول العرض الأزرار
وحبذا لو تخططلي النافذة التي تريدها بالرسام يعني ترسمها لي كخطوط !! :smile:
 
توقيع : ashalshaikh
آسف شباب ,,
يمكن ما أجي إلا نادرا ,,
أعذروني :q::er::er::er::er::er::er:
بارك الله فيكم !!ّ
 
توقيع : ashalshaikh
Future Tank X-1 قال:
^^
قلت للشيخ اشرحها ( مع اني اعرفها ) ,,
قال : تحتاج وقت طووووووووووويل ,,
بالمناسبه المصنوع بالاتو في هذه الصوره فقط الازرار ,,
اما الباقي خلفيه ,,
:d:
أنقر للتوسيع...

تعرف :d: فضي صندوق الرسايل الخاصه بتجيك رسايل من عندي كثيره :hh:

ashalshaikh قال:
إذا كنت تريد شرح فستنتظر طويلا :q:
أما عطني المواصفات التي تريدها ورح أعطيك وحدة جاهزة :smile: يعني الطول العرض الأزرار
وحبذا لو تخططلي النافذة التي تريدها بالرسام يعني ترسمها لي كخطوط !! :smile:
أنقر للتوسيع...


يعطيك العافيه ويبارك فيك لا والله في راسي اني اسوي برنامج وقاعد اخطط له لكن ان شاء الله نصبر وتنزل الشرح قريب باذن الله <<<<<<<<<<<<<< اقول لاتطول بس :d:

​
 
توقيع : النقيب
بارك الله فيك اخي ashalshaikh لا مشكلة بخصوص الاداة الفك ويعمل الكود العمل المطلوب بعد التعديلك فيه

الف شكر لك اخي العزيز وجزاك الله خير الجزاء
 
والله هالموضوع كبير ومشوق وجميل
 
توقيع : معاذ الفلسطينى
bawar قال:
بارك الله فيك اخي ashalshaikh لا مشكلة بخصوص الاداة الفك ويعمل الكود العمل المطلوب بعد التعديلك فيه

الف شكر لك اخي العزيز وجزاك الله خير الجزاء
أنقر للتوسيع...
الله يبارك فيك !!
أريد أسألك الكود إنت عامله ؟؟؟؟
:smile:
 
توقيع : ashalshaikh
:bleh::bleh::bleh::bleh:
ashalshaikh قال:
الله يبارك فيك !!
أريد أسألك الكود إنت عامله ؟؟؟؟
:smile:
أنقر للتوسيع...

اولا السلام عليكم ورحمته الله وبركاته اخي الكريم الكود ليس من صنعي وجدتها بعد بحث طويل
في موقع البرنامج نفسه واردت ان استفيد منه وكل اعضاء الكرام والكود لها فوائد كثيرة لحماية
البرنامج والادواة المصنوعة بواسطة AutoIt حتى لايعمل المشروع الا على الجهاز المطلوب بواسطة
سريال المصنع لان سريال المصنع لن يتغير بواسطة الفورمات على عكس سريال احدى الدرايفرات
لانه يتغير بعد كل عملية الفورمات للقرص وهذا لايفيدنا لهذا الغرض
انا استفدت كثيرا من دروسك وشروحاتك في الموضوع AutoItومن شروحات باقي الاخوان في هذا الموضوع في المنتدى جزاكم الله خير الجزاء وبارك الله فيكم وفي باقي الاخوان الذين ساهموا في تسهيل تعليم اللغة البرمجة AutoIt حتى يستفيد كل من يريد التعلم في هذا المجال واقول لكم مرة اخرى جزاكم الله خيرا وبارك الله فيكم والى الامام :b::q::ok:
 
bawar قال:
:bleh::bleh::bleh::bleh:

اولا السلام عليكم ورحمته الله وبركاته اخي الكريم الكود ليس من صنعي وجدتها بعد بحث طويل
في موقع البرنامج نفسه واردت ان استفيد منه وكل اعضاء الكرام والكود لها فوائد كثيرة لحماية
البرنامج والادواة المصنوعة بواسطة AutoIt حتى لايعمل المشروع الا على الجهاز المطلوب بواسطة
سريال المصنع لان سريال المصنع لن يتغير بواسطة الفورمات على عكس سريال احدى الدرايفرات
لانه يتغير بعد كل عملية الفورمات للقرص وهذا لايفيدنا لهذا الغرض
انا استفدت كثيرا من دروسك وشروحاتك في الموضوع AutoItومن شروحات باقي الاخوان في هذا الموضوع في المنتدى جزاكم الله خير الجزاء وبارك الله فيكم وفي باقي الاخوان الذين ساهموا في تسهيل تعليم اللغة البرمجة AutoIt حتى يستفيد كل من يريد التعلم في هذا المجال واقول لكم مرة اخرى جزاكم الله خيرا وبارك الله فيكم والى الامام :b::q::ok:
أنقر للتوسيع...
وعليكم السلام ,,
شكرا لك ياغالي ,, وجزاك الله خير !! معلومات ممتازة !!
تعرف ليش سألتك هذا السؤال !!! لسببين
1) لأن في الكود COM/Obj وهذه حتى الآن ماني فاهم منها ولا أنملة (حلوة أنملة:d:) حاولت كثير ولكن :no: ,,, فقلت علك تساعدنا فيها :b:
2) عشان أعرف إذا أفدتك أو لا ,, لأنك إن كنت كتبت الـ COM/Obj فلا أظن أن مبتغاك فقط IF :smile:

شكرا لك !!
 
توقيع : ashalshaikh
القسم الثاني من الفهرس

شروحات الأوامر الكاملة


 (( من أراد أن يشاركنا ,, أرجو منه وضع كل أمر في مشاركة للترتيب ))
​

سورسات وأمثلة


بارك الله فيكم

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

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

​

دروس تقوية ,, ​

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


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

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

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

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


تم تعديل الفهرس بتاريخ تعديل المشاركة في الأسفل
​
 
توقيع : ashalshaikh
توقيع : النقيب
yahweh قال:
اخوي الشيخ في درس مكرر ارجو ان تعدل الرابط :ok:



​
أنقر للتوسيع...
معك حق :b:
تم التصحيح ولكن ليس عن طريق الفهرس بل الدرس :er:
شكرا لك
القنـاص قال:
احس ان الشيخ يبي يقول لك

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

لا بالعكس
:d:
جزاه الله خير ,, وجزاك
 
توقيع : ashalshaikh
توقيع : النقيب
:d: << يعني بالعربي متابع ,,
 
توقيع : Future Tank X-1
السلام عليكم ورحمة الله وبركاته

اخي هل اجد حل لنجمة ميكروسوفت

وشكراً
 
abukaasm قال:
السلام عليكم ورحمة الله وبركاته

اخي هل اجد حل لنجمة ميكروسوفت

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

السلام عليكم
اخى الفاضل هذا الموضوع خاص بالبرمجة ال AU3
ولا يتم الاستفسار او طلب اى شئ خارج عن هذا تفضل بالمرور الى قسم مشاكل الحاسب وسيتم الرد عليك ان شاء الله
======================
:?: لا اعلم اين ذهب الشيخ لا ارى له دروس ع الساحه :cr:
هل هو مشغول :no:
هل هو مرهق :i: لا اعتقد:no:
هل نفذت جعبته من الدروس :eek:
واين الاخوة نريد جديد:bleh:
استودعكم الله
 
توقيع : فدى الرسول
بالنسبه للشيخ هو :: مشغول حاليأً
 
توقيع : Future Tank X-1
ما رأيكم الآن بعمل مشروع جماعي :king:

بالنسبة للمشروع فهو من إختياركم ...

سيكون المشروع على حسب ما تعلمتوه من الأخ أحمد :cool:

هيا ما بكم تنتظرون ..

إختاروا المشروع

وكلاً يريد المشاركة يقول أنه سيشارك فيه :u:

بالمناسبة :

نريد أن يكون المشروع طويل قليلاً ... ولايدخل فيه أي واجهة للبرنامج :hh:

منتظر الردود :er:
 
توقيع : الزري2
يجب تسجيل الدخول أو التسجيل كي تتمكن من الرد هنا.
عودة
أعلى