• بادئ الموضوع بادئ الموضوع LINEZERO
  • تاريخ البدء تاريخ البدء
  • المشاهدات 95,724
يعطيك العافيه ،
لأن جالس أخترع حاجه :d:
فـ إنا ياعسل محتاج ايميلك بعد أذنك ،
لأن عندي سؤال خارج الدوره ،
 

كود على السريع :b: وان شاء الله يقوم بالعمل على اكمل وجه :king:​


كود:
[center][color=#000000][color=#aa0000]$foldername[/color] [color=#ff0000]=[/color] [color=#ff33ff][color=#ff33ff]@programfilesdir[/color][/color][/color]
[color=#000000][color=#aa0000]$destdir[/color] [color=#ff0000]=[/color] [color=#ff33ff][color=#ff33ff]@desktopdir[/color][/color][/color]
[color=#000000]scanfolder[color=#ff0000]([/color][color=#aa0000]$foldername[/color][color=#ff0000])[/color][/color]
[color=#000000][color=#0000ff]func[/color] scanfolder[color=#ff0000]([/color][color=#aa0000]$sourcefolder[/color][color=#ff0000])[/color][/color][color=#000000]
[color=#0000ff]local[/color] [color=#aa0000]$search[/color]
[color=#0000ff]local[/color] [color=#aa0000]$file[/color]
[color=#0000ff]local[/color] [color=#aa0000]$fileattributes[/color]
[color=#0000ff]local[/color] [color=#aa0000]$fullfilepath[/color]
[color=#aa0000]$search[/color] [color=#ff0000]=[/color] [color=#000090]filefindfirstfile[/color][color=#ff0000]([/color][color=#aa0000]$sourcefolder[/color] [color=#ff0000]&[/color] [color=#9999cc]"\*.*"[/color][color=#ff0000])[/color]
[color=#0000ff]while[/color] [color=#ac00a9]1[/color]
[color=#0000ff]if[/color] [color=#aa0000]$search[/color] [color=#ff0000]=[/color] [color=#ff0000]-[/color][color=#ac00a9]1[/color] [color=#0000ff]then[/color]
[color=blue]exitloop[/color]
[color=#0000ff]endif[/color]
[color=#aa0000]$file[/color] [color=#ff0000]=[/color] [color=blue]filefindnextfile[/color][color=#ff0000]([/color][color=#aa0000]$search[/color][color=#ff0000])[/color]
[color=blue]if[color=magenta] @error[/color] then exitloop[/color]
[color=#aa0000]$fullfilepath[/color] [color=#ff0000]=[/color] [color=#aa0000]$sourcefolder[/color] [color=#ff0000]&[/color] [color=#9999cc]"\"[/color] [color=#ff0000]&[/color] [color=#aa0000]$file[/color]
[color=#aa0000]$fileattributes[/color] [color=#ff0000]=[/color] [color=#000090]filegetattrib[/color][color=#ff0000]([/color][color=#aa0000]$fullfilepath[/color][color=#ff0000])[/color]
[color=#0000ff]if[/color] [color=#000090][color=#000090]string[/color]instr[/color][color=#ff0000]([/color][color=#aa0000]$fileattributes[/color][color=#ff0000],[/color][color=#9999cc]"d"[/color][color=#ff0000])[/color] [color=#0000ff]then[/color]
[color=#000090]dirmove[/color][color=#ff0000]([/color][color=#aa0000]$fullfilepath[/color][color=#ff0000],[/color][color=#aa0000]$destdir[/color][color=#ff0000],[/color][color=#ac00a9]1[/color][color=#ff0000])[/color]
[color=#0000ff]endif[/color]
[color=#0000ff]wend[/color]
[color=#000090]fileclose[/color][color=#ff0000]([/color][color=#aa0000]$search[/color][color=#ff0000])[/color]
[color=#0000ff]end[color=#0000ff]func[/color][/color][/color][/center]


3.gif
اتمنى منكم شرح الكود السابق
فالهدف من هذا المنتدى هو التعليم والاجر والكل يستفيد وليس عرض المهارات
وكا تعلمون وانتم ادرى بوضعنا المبتدئ في هذه اللغه فنحن لسنا خبراء ولا نعرف هذه الاكواد
اتمنى منك شرح سريح او بعد كل كود كتابة الشرح في الملاحضات بالفاصلة المنقوطه لكي الكل يستفيد
 
توقيع : الحلا تبي تتعلم
كود على السريع :b: وان شاء الله يقوم بالعمل على اكمل وجه :king:​


كود:
[center][color=#000000][color=#aa0000]$foldername[/color] [color=#ff0000]=[/color] [color=#ff33ff][color=#ff33ff]@programfilesdir[/color][/color][/color]
[color=#000000][color=#aa0000]$destdir[/color] [color=#ff0000]=[/color] [color=#ff33ff][color=#ff33ff]@desktopdir[/color][/color][/color]
[color=#000000]scanfolder[color=#ff0000]([/color][color=#aa0000]$foldername[/color][color=#ff0000])[/color][/color]
[color=#000000][color=#0000ff]func[/color] scanfolder[color=#ff0000]([/color][color=#aa0000]$sourcefolder[/color][color=#ff0000])[/color][/color][color=#000000]
[color=#0000ff]local[/color] [color=#aa0000]$search[/color]
[color=#0000ff]local[/color] [color=#aa0000]$file[/color]
[color=#0000ff]local[/color] [color=#aa0000]$fileattributes[/color]
[color=#0000ff]local[/color] [color=#aa0000]$fullfilepath[/color]
[color=#aa0000]$search[/color] [color=#ff0000]=[/color] [color=#000090]filefindfirstfile[/color][color=#ff0000]([/color][color=#aa0000]$sourcefolder[/color] [color=#ff0000]&[/color] [color=#9999cc]"\*.*"[/color][color=#ff0000])[/color]
[color=#0000ff]while[/color] [color=#ac00a9]1[/color]
[color=#0000ff]if[/color] [color=#aa0000]$search[/color] [color=#ff0000]=[/color] [color=#ff0000]-[/color][color=#ac00a9]1[/color] [color=#0000ff]then[/color]
[color=blue]exitloop[/color]
[color=#0000ff]endif[/color]
[color=#aa0000]$file[/color] [color=#ff0000]=[/color] [color=blue]filefindnextfile[/color][color=#ff0000]([/color][color=#aa0000]$search[/color][color=#ff0000])[/color]
[color=blue]if[color=magenta] @error[/color] then exitloop[/color]
[color=#aa0000]$fullfilepath[/color] [color=#ff0000]=[/color] [color=#aa0000]$sourcefolder[/color] [color=#ff0000]&[/color] [color=#9999cc]"\"[/color] [color=#ff0000]&[/color] [color=#aa0000]$file[/color]
[color=#aa0000]$fileattributes[/color] [color=#ff0000]=[/color] [color=#000090]filegetattrib[/color][color=#ff0000]([/color][color=#aa0000]$fullfilepath[/color][color=#ff0000])[/color]
[color=#0000ff]if[/color] [color=#000090][color=#000090]string[/color]instr[/color][color=#ff0000]([/color][color=#aa0000]$fileattributes[/color][color=#ff0000],[/color][color=#9999cc]"d"[/color][color=#ff0000])[/color] [color=#0000ff]then[/color]
[color=#000090]dirmove[/color][color=#ff0000]([/color][color=#aa0000]$fullfilepath[/color][color=#ff0000],[/color][color=#aa0000]$destdir[/color][color=#ff0000],[/color][color=#ac00a9]1[/color][color=#ff0000])[/color]
[color=#0000ff]endif[/color]
[color=#0000ff]wend[/color]
[color=#000090]fileclose[/color][color=#ff0000]([/color][color=#aa0000]$search[/color][color=#ff0000])[/color]
[color=#0000ff]end[color=#0000ff]func[/color][/color][/color][/center]


3.gif

الله لا يهينك يا شيخنا يا بندر
الله يخليك وفي ميزان حسناتك ان شاء الله
لو تسمح وتتكرم وتفضل علينا وتكتب بعد كل كووود الشرح بالملاحظات بالفاصلة المنقوطه
وجزاك الله الف خير
 
توقيع : الحلا تبي تتعلم
يعطيك العافيه ،
لأن جالس أخترع حاجه :d:
فـ إنا ياعسل محتاج ايميلك بعد أذنك ،
لأن عندي سؤال خارج الدوره ،

الايميل جاك على التقييم :d:
ويبدء بـ linezer0 :hh:​
 
توقيع : LINEZERO
اتمنى منكم شرح الكود السابق
فالهدف من هذا المنتدى هو التعليم والاجر والكل يستفيد وليس عرض المهارات
وكا تعلمون وانتم ادرى بوضعنا المبتدئ في هذه اللغه فنحن لسنا خبراء ولا نعرف هذه الاكواد
اتمنى منك شرح سريح او بعد كل كود كتابة الشرح في الملاحضات بالفاصلة المنقوطه لكي الكل يستفيد

صعبه ان اقوم بشرح الكود كمل ..
ولكن تابع دورة الاوتوات فستجد كل مايسرك :q:​
 
توقيع : LINEZERO
فيه مشكله باالاضافات ،
اضفتك انا و ماوصلتك أتوقع ،
ارسلت لك ايميلي ع التقييم
 
فيه مشكله باالاضافات ،
اضفتك انا و ماوصلتك أتوقع ،
ارسلت لك ايميلي ع التقييم

حاولت اضيفك بس يقول توكل على الله :d:​
 
توقيع : LINEZERO

آستفسار بسيط
كيف اضيف صور لبرنامجي بــ AutoIt ..؟
 
الله يعطيك العافيه أخوي ، بالنسبه لـ أمر
حذف المستندات مايشتغل وياي ،
لأن أنا ابي احذف المستندات و المجلدات إلي داخلها و سطح المكتب كذالك
 
معذرة, التأخر عن المتابعة كان خارج عن إرادتي :smile:

الله يعطيك العافيه أخوي ، بالنسبه لـ أمر
حذف المستندات مايشتغل وياي ،
لأن أنا ابي احذف المستندات و المجلدات إلي داخلها و سطح المكتب كذالك

تحتاج لتحرير البرامج التي تتعامل مع المستندات من الذاكرة أولاً,
جرب أن تحذف مجلد المستندات في نظام وهمي ... بالتأكيد سيعمل
ولكن بوجود برامج لم تقم بتحرير نفسها من الذاكرة لا يمكن الحذف

الخلاصة : حاول حل المشكلة بإضافة unlocker لبرنامجك وإستعمله بالمعاملات (Parameter)
 
توقيع : Alzri2
بالنسبة لإضافة صور هذا يحتاج لتعلم gui وستطرح بالدورة إن شاء الله قريبا
 
الى الشباب الطيبه كود إنشاء مولد سريال مع تسجيل برنامج

الى الشباب الطيبه كود إنشاء مولد سريال مع تسجيل برنامج
أخرشي شتغلتو هذا البرنامج الصغير
PHP:
#notrayicon
#include <buttonconstants.au3>
#include <editconstants.au3>
#include <guiconstantsex.au3>
#include <staticconstants.au3>
#include <windowsconstants.au3>
$form1 = guicreate("iCare data Recovery Software keys", 357, 90, 304, 299)
$invalue = guictrlcreateinput("", 56, 24, 241, 21)
$bunget = guictrlcreatebutton("توليد", 90, 56, 60, 25, $ws_group)
$label1 = guictrlcreatelabel("السريال", 12, 24, 40, 17)
$DFR=guictrlcreatebutton("تسجيل", 210, 56, 60, 25)
guisetstate(@sw_show)
while 1
   $nmsg = guigetmsg()
   switch $nmsg
       case $gui_event_close
           exit
     Case $DFR
   RegWrite("HKEY_CURRENT_USER\Software\iCare", "REGCODE", "REG_MULTI_SZ",$getnum)
       case $bunget
           if guictrlread($invalue) = "9AKTGSG5CKB_F2LJ6WAVHSGNFIENBA3Z" then
               $getnum = "22HBHACHDOVBC4MVE6K3AKG5FWEJE4JV"
           elseif guictrlread($invalue) = "22HBHACHDOVBC4MVE6K3AKG5FWEJE4JV" then
               $getnum = "12KTAM3Z4W1_AUXHAWAVBKG98KMT4UDL"
     elseif guictrlread($invalue) = "12KTAM3Z4W1_AUXHAWAVBKG98KMT4UDL" then
               $getnum = "BE4V4SL5DIPN82FL8SK_F4OX2WPDHMJT"
         elseif guictrlread($invalue) = "BE4V4SL5DIPN82FL8SK_F4OX2WPDHMJT" then
    $getnum = "5QA7CQMBE2A766J954A78695CEPVE63R"
   elseif guictrlread($invalue) = "5QA7CQMBE2A766J954A78695CEPVE63R" then
    $getnum = "6UJR5OGH9CMZ4SC966DZ70ABBQ7BH8J1"
     elseif guictrlread($invalue) = "6UJR5OGH9CMZ4SC966DZ70ABBQ7BH8J1" then
               $getnum = "9AKTGSG5CKB_F2LJ6WAVHSGNFIENBA3Z"
           else
               $getnum = "9AKTGSG5CKB_F2LJ6WAVHSGNFIENBA3Z"
     endif
         guictrlsetdata($invalue,$getnum)
   endswitch
wend
عطوني رأيكم:ok:
 
توقيع : ocab
السلام عليكم
اولا انا بحييكم على المجهود العالى اووووووى بالمنتدى وخاصة بلغة الاوتويت
اللغة ديه انا لسة مبتدا فيها ومتابع الدورة والحمد لله بدأت اتجاوب معها لسهولتها
وانا براجع سورسات لبرامج وجدت دالة اسمها Func وايضا Sleep
وبصراحة الدرس الخاص بالمتغيرات انا مفهمتوش
ياريت توضح اخى ايه الفائدة من المتغيرات اساسا
وشكرا مرة اخرى اخى
 
اخواني ,,

اللي عنده أمر تصغير حجم صورة , ياليت لو يتفضل ويسدحه هنا

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

ماشاء الله مجهود رائع بـ الدوره لاكن عندي استفسار بعد أذن الجميع ،

انا الأن شفت درس عملية البروسيس ، لاكن عندي سؤال ،

لو مثلاً ، أريد تشغيل برنامج ، لاكن اذا كان عملية البروسيس التاليه ع سبيل المثال mony.exe شغاله ، عدم تشغيل برنامجي ، اذا اغلقت العمليه mony.exe يشتغل البرنامج حقي ،

و إذا كان برنامجي شغال ، و اشتغلت عملية mony.exe اقتل عمليت برنامجي في البروسيس ، و تشغيلها بعد ماتغلق عملية mone.exe ،
فهل أحد يحاول معاي بهذه الفكره
 
السلام عليكم
أخواني الكرام اريد كود تحميل ملف من رابط دون فتح الرابط وحفظ الملف علي سطح المكتب
ممكن بعد اذنكم
 
توقيع : فدى الرسول
السلام عليكم
أخواني الكرام اريد كود تحميل ملف من رابط دون فتح الرابط وحفظ الملف علي سطح المكتب
ممكن بعد اذنكم


إستخدم هذي الدالة
كود:
InetGet ( "URL" [,"filename" [, options [, background]]] )

url :الرابط مسبوق بـhttp://


 
توقيع : waget
بارك الله فيك طيب وباقي شرح الكود
options
filename
background

وكيف أحدد له سطح المكتب كـ مكان للتحميل

 
توقيع : فدى الرسول
استاذي الكريم أين انت
 
توقيع : فدى الرسول
السلام عليكم و رحمة الله تعالى و بركاته
و انا اكتب هده السطور وجدت نفسي عاجزا عن شكرك فالكلمات لا تعطيك حقك يا استاد
فانا اقدر تعبك في تحضير الدروس بهدا المستوى الراقي و من يقوم بمثل عملك هدا هم قلة
ارجوا من الله تعالى ان ينصر بك و بامثالك الاسلام و المسلمين
و ان يجعل لك بعملك هدا منزلا بالجنة ان شاء الله انت و والديك
السبب الاول لتسجيلي بهدا المنتدى هو لشكرك و بما انني هنا فعندي سؤال يا استاد
انا تعرفت على هده اللغة مند ايام قليلة لكني لم اتواصل معها لقلة الشروحات . اما الان فقد تغيرت نظرتي بفظلكم و الحمد لله
استاد من خلال هده اللغة هل يمكننا التعامل مع كل النوافد التي تظهر على الشاشة مثلما يتم اثناء التنصيب الصامت . مثلا اختيار نعم او لا او الغاء او شطب خيار او ادخال بيانات
ارجوا اني لم اثقل عليكم و بارك الله فيكم
السلام عليكم و رحمة الله
اخوكم في الله جمال
 
عودة
أعلى