تسلم أخي العزيز ناصر
والله لم ارى ابداعا كهذا
والله مارايت افضل منكم حقا ابداع
شكرا أخي العزيز ناصر شرح رائع ووضحت الصورة جزاك الله خيرا
أما بالنسبة لاسكربت الداون لود هوا أني وجدت شرح لاسكربت لالتنصيب الصامت لبرنامج الداون لود وعندما قمت بتنفيزه كانت تأتيني رسائل خطء وإليك الإسكريبت اللزي قمت بتجربته
بعد الإنتهآء من تسطيب البرنآمج قم بإغلآقه، وتآبع الخطوة التآلية..
قم بنسخ البآتش لمجلد تنصيب البرنآمج، على أحد المسآرين (حسب نوآة جهآزك)
PHP:
C:\Program Files (x86)\Internet Download Manager
PHP:
C:\Program Files\Internet Download Manager
وأول مآ سوف نقوم بنسخه لمجلد العمل، هو ملف تفعيل الـidm الذي قمنآ بصنعه بعد إستخدآمنآ للبآتشِ قبل قليل،
والآن سوف نقوم بإستيرآد قيم تسجيـل الـidm. من الريجستري
قم بالضغط على زري الويندوز + زر R من الكيبورد معــاً
لينتج إليك بعدهآ نآفذة (RUN)
ملآحظة هآمة!، لربمآ قد لآحظ البعض منكم بأن مسآر تسجيـل البيآنآت للنوآة الـx64 وذلك لآن نظآم التشغيل لَدي، للنوآة الـx64
وعليه فآن هذآ الملف لن يتفعل لأصحآب الويندوزآت x32 ، لذى سوف نقوم الآن بنسخ نفس البيآنآت ووضعهآ تحت مسآر الـx32 بملف الريجستري، (طبق كالتآلي..)
الآن سوف نقوم بتشغيل أدآة تسريع الدوآنلود مآنجر التآلية..
قم بفتح الريجستري مرةَ أخرى وطبق الآتي، طبق الخطوآت التآلي، للوصول لمجلد DownloadManager
ليصبح بعدهآ شكل الملف كالتآلي...
قم الآن بحفظ ملف الريجستري ومن ثم قم بنقله لمجلد العمل،
حسنـاً، الآن نكون قد أنهينآ ثلث الموضوع، ننتقل الآن للجآنب العملي الأصعب نوعاً مآ، وسوف نستهل بطريقة عمل البرنآمج صآمتـاً من خلآل برنآمج الـ auto it
قم أولاً بنقـل برنآمج الـدوآنلود مآنجر إلى مجلد العمل أعد تسميته إلى idmsetup
بعد ذلك قم بتغيير لغة البرنآمج لديك إلى الإنجليزية، (سوف أشرح لك لآحقــً سبب هذه الخطوة )
سوف نبداً أولاً: بكتآبة الـ3 أوآمر الأسآسية..
PHP:
#NoTrayIcon
#RequireAdminProcessClose('IDMan.exe')
PHP:
RegWrite('HKCU\Software\DownloadManager', 'LanguageID','REG_DWORD',Number('9'))
دعني أشرح لكم الآتي،،
أتذكرون قبل قليل عندمآ طلبت منكم تغيير لغة الـIDM للإنجليزية!.
واللغة العربية الرقم (1) وللفرنسية الرقم (12) وهكذآ...
وسبب إضآفتنآ للأمر فوق، هو لتحويل معآلج التنصيب للغة الإنجليزية
وبالتآلي لن توآجه برمجية ال Auto it مشآكلاً بالتعرف على نصوص كل نآفذة من نوآفذ البرنآمج
(سوف يتوضح الأمر لكم تماماً بعد قليل)، تآبعو معي...
PHP:
WinWaitActive("Internet Download Manager Installation Wizard", "Next >")ControlClick("Internet Download Manager Installation Wizard", "Next >", 1008)
PHP:
WinWaitActive("Please read IDM license", "Next >")ControlClick("Please read IDM license", "Next >", 1008)
PHP:
WinWaitActive("Choose Destination Location", "Next >")ControlClick("Choose Destination Location", "Next >", 1008)
PHP:
WinWaitActive("Start Installation of Internet Download Manager", "Next >")ControlClick("Start Installation of Internet Download Manager", "Next >", 1008)
PHP:
WinWaitActive("Installation Complete", "Finish >")ControlClick("Installation Complete", "Finish >", 1009)
أعتقد بأن الفكرة توضحت لكم بخصوص تغيير اللغة، فالفكرة كلهآ تعتمد على النصوص، والتي نقوم بإدخآلهآ للبرنآمج ضمن متغييرآت،
(إنتظر قليلاً، إذآ وجدت كذآ، فقم بكذآ)
ولو لم تقم بإضآفة الكود وكآنت لغة البرنآمج حسب لغة جهآزك ألآ وهي الفرنسية أو الروسية، فلن تنجح العملية، لان النصوص بالنآفذة غير النصوص الموجودة بالبرنآمج والتي يستخدمهآ البرنآمج كمعرف.
لنتآبع..
PHP:
ProcessWait('IDMan.exe')ProcessClose('IDMan.exe')ProcessClose("IEMonitor.exe")
PHP:
RegWrite('HKCU\Software\DownloadManager', 'LanguageID','REG_DWORD',Number('1'))
هذه الأوآمر كآملة
PHP:
#NoTrayIcon
#RequireAdminProcessClose('IDMan.exe') RegWrite('HKCU\Software\DownloadManager', 'LanguageID','REG_DWORD',Number('9')) Run("idmsetup.exe")WinWaitActive("Internet Download Manager Installation Wizard", "Next >")ControlClick("Internet Download Manager Installation Wizard", "Next >", 1008)
WinWaitActive("Please read IDM license", "Next >")ControlClick("Please read IDM license", "Next >", 1008)
WinWaitActive("Choose Destination Location", "Next >")ControlClick("Choose Destination Location", "Next >", 1008)
WinWaitActive("Start Installation of Internet Download Manager", "Next >")ControlClick("Start Installation of Internet Download Manager", "Next >", 1008)
WinWaitActive("Installation Complete", "Finish >")ControlClick("Installation Complete", "Finish >", 1009)
ProcessWait('IDMan.exe')ProcessClose('IDMan.exe')ProcessClose("IEMonitor.exe")
RegWrite('HKCU\Software\DownloadManager', 'LanguageID','REG_DWORD',Number('1'))
قم الآن بحفظ الملف وأغلقه
دعنآ الآن نقوم بتجربة البرمجية، ونرى نتآج مآ قمنآ ببرمجته
ننتقل الآن للثلث الأخير من موضوعنآ لليوم
الآن قم بإنشآء مستند نص جديد وإلصقه به الآتي..
PHP:
@echo off:START
CLS
title Made By: Basherxxx
MODE 68,15
color 9fEcho.
Echo ------------------------------------------
Echo WWW.IBDA3GATE.COMEcho.
Echo IDM 6.25 Build 15 (Apr/15/2016) FullEcho ------------------------------------------
Echo.
echo Hello Mr [%username%] - Activated -
Echo - Themes Included -
echo Please Wait For A Second .... - Accelerated -
echo -----------------------------
Echo.
echo Today is: %date%
Echo -------------------------
taskkill /IM IDM.exe /F > NUL
ping -n 4 127.0.0.1>nul"%~dp0idm installer.exe"
taskkill /IM IDMan.exe /F > NUL
taskkill /IM IDMGrHlp.exe /F > NUL
taskkill /IM IEMonitor.exe /F > NUL
"%~dp0REG.exe"
"%~dp0IDMOptimizer.exe"
@Set xOS=x64@If "%PROCESSOR_ARCHITECTURE%"=="x86" If Not Defined PROCESSOR_ARCHITEW6432 Set xOS=x86@If %xOS%==x64 (
xcopy /E /Y "%~dp0XXX" "%PROGRAMFILES(x86)%\Internet Download Manager"copy /Y "%~dp0IDMan.exe" "%PROGRAMFILES(x86)%\Internet Download Manager"copy /Y "%~dp0IDMan.exe.BAK" "%PROGRAMFILES(x86)%\Internet Download Manager"
) ELSE (
xcopy /E /Y "%~dp0XXX" "%PROGRAMFILES%\Internet Download Manager"copy /Y "%~dp0IDMan.exe" "%PROGRAMFILES%\Internet Download Manager"copy /Y "%~dp0IDMan.exe.BAK" "%PROGRAMFILES%\Internet Download Manager"
)
"%~dp0WinMsg.exe" -t "Note .. " -f "%~dp0note.txt" -c OK,Exclamation,SystemModel -w 30exit
بالنسبة لمن لآحظ الأمر "%~dp0" ولم يعرف فآئدته،
فهذآ الأمر الهآم يستوجب عليك وضعه قبل كل إسم برنآمجٍ أو إسم مجلدٍ، عندمآ تريد صنع بآتش يستوجب عليك تشغيله " كمسؤول"
وشكرا لك أخي العزيز ناصر وبارك الله فيك وجزاك خير الجزاء وجعله في ميزان حسناتك يوم القيامة تحياتي.