::: كيفية استغلال الـ Autoit في إنشاء تثبيت صامت رااائع وسهل ,(للمحترفين والمبتدئين)

الحالة
مغلق و غير مفتوح للمزيد من الردود.
تابع
الجزء الثاني :ـ
كتابة السكربتات بالشكل المناسب

من قبل كتبت إني انتهيت من الأكواد التجميلية وبعد إعادة النظر رأيت إني نسيت أشرحها ,, :b:

2. أكواد تكميلية وتجميلية ,,,

ونحتاج منها كودين ,,, هما :ـ

1/ التأكد من وجود ملف FileExists

2/إطفاء عملية في النظام (مهمة في حالة الكراك)ProcessClose

acornlvs880895.gif



1/ الكود FILEEXISTS

ويكون على الصيغة التالية :ـ

كود: 
[NOT] FILEEXISTS ("FILENAME.EXE")
ولا أعرف طريقة للإستفادة منه إلا بوضعه مع IF
ويكون هكذا :ـ
كود: 
IF [NOT] FILEEXISTS ("FILENAME.EXE") THEN
الفعل إذا كان الملف موجود أو غير موجود (حسب وجود وعدم وجود not 
ENDIF
مع ملاحظة أن NOT تابعة لـ FILEEXISTS وليس لـ IF (ليه أنا قلت كذ ؟ا ,, رح تشوف )

مثال 1:ـ
نريد عندما يكون الملف التالي موجود يظهر رسالة ,, وعندما لا يكون موجود يظهر رسالة :ـ
C:\\Ashalshaikh.txt
فيكون هكذا ,,,
كود: 
IF FILEEXISTS ("C:\Ashalshaikh.txt") THEN
msgbox (0,"الملف موجود ","الملف موجود ")
exit
ENDIF
msgbox (0,"الملف غير موجود ","الملف غير موجود ")
أو

كود: 
IF [COLOR=red]not[/COLOR] FILEEXISTS ("C:\Ashalshaikh.txt") THEN
msgbox (0,"الملف غير موجود ","الملف غير موجود ")
exit
ENDIF
msgbox (0,"الملف موجود ","الملف موجود ")
exit
أو (غير مستحبة أبدا )

كود: 
IF exit[COLOR=red] not [/COLOR]FILEEXISTS ("C:\Ashalshaikh.txt") THEN
msgbox (0,"الملف غير موجود ","الملف غير موجود ")
exit
ENDIF

IF FILEEXISTS ("C:\Ashalshaikh.txt") THEN
msgbox (0,"الملف موجود ","الملف موجود ")
exit
ENDIF

exit

حاول إيجاد الفرق حسب فهمك للأكواد ,,,

التأكد من وجود عدة ملفات :ـ

تقريبا نفس الأكواد :ـ

مثال 2 /
التأكد من C:\Ashalshaikh.txt و C:\Ashalshaikh1.txt و C:\Ashalshaikh3.txt
كود: 
IF [COLOR=Indigo]not [/COLOR]FILEEXISTS ("C:\Ashalshaikh.txt") [COLOR=Red]or[/COLOR] [COLOR=Indigo]not[/COLOR] FILEEXISTS ("C:\Ashalshaikh3.txt") [COLOR=Red]or [/COLOR][COLOR=Indigo]not[/COLOR] FILEEXISTS ("C:\Ashalshaikh1.txt") THEN
msgbox (0,"إحدى أو جميع الملفات غير موجود ","حدى أو جميع الملفات غير موجود")
exit
ENDIF
exit
أنا أول قلت :ـ
مع ملاحظة أن NOT تابعة لـ FILEEXISTS وليس لـ IF
أنقر للتوسيع...
طيب لاحظ في الكود السابق أني كررت NOT مع إن IF واحدة ,,, ولو وضعت NOT واحدة لكان الكود خااااااطئ ,,

الإستفادة من FILEEXOSTS في موضوعنا :ـ
التأكد من كمال الملفات الضرورية للتثبيت مثل :ـ
ملف التثبيت SETUP.EXE
ملف الكراك CRACK.EXE
ملف الريجستري للسيريال KEY.REG

وهذا مثال للطريقة الأولى للإستفادة من الكود :ـ
كود: 
IF not FILEEXISTS ("SETUP.EXE") or not FILEEXISTS ("CRACK.EXE") or not FILEEXISTS ("KEY.REG ") THEN
msgbox (0,"إحدى أو جميع الملفات غير موجود ","حدى أو جميع الملفات غير موجود")
exit
ENDIF

أكود التنصيب وغيره ,,
طيب ملاحظة وهي :ـ
لاحظ أني لم أكتب المسار يعني لم أكتب مسار الملف CRACK.EXE :ـ
1:لن يتمكن السكريبت من العثور عليه ,,, لأن سنضغطه بالوينرار ويفكه في ملف مؤقت يعني ما ندري إيش الرابط بالضبط ,,,,
2: لأنها في نفس مجلد السكريبت (في حين فك الضغط عن الملفات < سيأتي شرحها >)

تعبتكم معاي ,,, دايما يقولون لي إنت تطول الشي وهو قصير , :q:

acornlvs880895.gif

2/الكود الثاني PROCESSCLOSE

ويستخدم لإطفاء ملف من إدارة المهام :

وتكون صيغته كما يلي :ـ
كود: 
PROCESSCLOSE ("PROCESS")
فقط ,, سهل جدا ,,, (مع ملاحظة أنه لو أنه كان البرنامج مطفئ فليس هناك تأثير على السكريبت يعني :ـ إذا وجده أطفأه وإذا لم يجده ذهب إلى الأمر اللي بعده ,,, )
,,, مثلا :ـ

عندك برنامج عملت السويتش وكل شي ,,, وإنه يتسجل عن طريق استبدال الملف الأصلي للبرنامج ,, إذا كيف تفعل لو كان الملف الأصلي شغال ,, لن تستطيع استبداله إلا بإطفاءه ,,,,,

كيف تعرف الـ process للبرنامج تابع معي :ـ
تشغل البرنامج ثم تضغط على ctrl + alt + delet
تظهر إدارة المهام .. تذهب للتبويب العمليات وتبحث عن عملية تشبه اسم البرنامج (مثلا ULTRA ISO(
zyzoom-89a7a27845.jpg


الآن تحفظ اسم العملية ,,,

مثال 1/
الشرح على البرنامج السابق (ULTRAISO(

سويتش التثبيت :ـ
كود: 
"setup.exe" /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SP
-
وكما ذكرنا نزيل علامتا التنصيص ليصبح ,

كود: 
setup.exe /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SP
-
وملف كراك مصنوع بالوينرار :ـ
كود: 
crack.exe /s
الآن الأكواد:ـ

بدون رسائل حتى نركز على الكود الأساسي ,,
كود: 
runwait ("setup.exe /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SP-")

PROCESSCLOSE ("ultraiso.exe"

run ("crack.exe")
الآن سوف يثبت البرنامج وإن كان التطبيق شغال سوف يطفأ ,,,

جرب الكود على برنامح آخر من دون تثبيت يعني بس ,,,
كود: 
processclose ("process")
وسترى أنه سيطفأ ,,,
acornlvs880895.gif

شفتوا كيف بسييييييييييييطة ,,,
acornlvs880895.gif


تطبيق شامل على الجزء الثاني
كتابة السكربت بالشكل المناسب :ـ

المعطيات :ـ
1, ملف تثبيت سويتشه
كود: 
"setup.exe" /s


2, ملف سيريال ,, باسم key.reg

مع رسائل تحذير وإعلامية والتأكد من وجود الملفات ,,, وتوديع في حالة الرفض ,,

====

ملاحظة مهمممممممة (نسيتها في البداية):ـ
أي ملف صيغته reg
بدون تفكير هذا سويتشه :ـ
كود: 
regedit /s filename.reg

حيث filename اسم الملف

نبدأ بسم الله في كتابة الأكواد :ـ

كود التأكد من الملفات :ـ
كود: 
if not fileExists ("setup.exe") or not fileExists ("key.reg") then

msgbox (0,"خطأ","جميع أو إحد الملفات ناقص "(
exit
endif
كود رسالة سؤال المستخدم عن التثبيت :ـ
كود: 
$answer = masgbox (4,"هل تريد التثبيت","هل تريد التثبيت"(
if $answer = 7 then
msgbox (0,"إلى اللقاء " , "إلى اللقاء "(
exit
endif


كود تشغيل سويتش التثبيت :ـ
كما تعلمنا سابقا نزيل علامتي التنصيص ,,

كود: 
runwait ("setup.exe /s")


كود تشغيل سويتش ملف reg ريجستري :ـ
كود: 
runwait ("regedit /s key.reg ")


والآن الكود الأخير وهو كود رسالة التنبيه بأن البرنامج إكتمل تثبيته :ـ
كود: 
msgbox (0,"تمت","تمت التثبيت بنجاح "(

ولا ننسى كود الخروج
كود: 
exit


الآن الصورة النهائية للكود :ـ
هي :ـ
كود: 
if not fileExists ("setup.exe") or not fileExists ("key.reg") then
msgbox (0,"خطأ","جميع أو إحد الملفات ناقص "(
exit
endif


$answer = masgbox (4,"هل تريد التثبيت","هل تريد التثبيت"(
كود: 
if $answer = 7 [SIZE=4]then
[/SIZE]
[SIZE=4] msgbox (0,"إلى اللقاء " , "إلى اللقاء "(
[/SIZE]exit 
[SIZE=4] endif

runwait ("setup.exe /s ")
runwait ("regedit /s key.reg ")

msgbox (0,"تمت","تمت التثبيت بنجاح "(

exit

[/SIZE]


بالله ماهو بسيط ,,,
acornlvs880895.gif

أخواني المتابعين للموضوع :ـ
أنا طالبكم في شي أعتبروه مثل الواجب في المدرسة ,,, ,, عشان :ـ
1, أتأكد إنكم متابعين وفاهمين (ويكفيني ولو واحد )
2,أتأكد إن الشرح مفهوم عند المعظم ,,,
3, أتأكد أني أتكلم مع من يسمعني ,, وأنا ما أهذر لحاااااالي :b: ,,,

أبيكم ترسلون لي الكود للتطبيق التالي :ـ

المعطيات :ـ

ملف تثبيت سويتشه :ـ
كود: 
"mp4-converter.exe" /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SP-


وكراك :ـ
مصنوع بالوينرار ,,,

وملف إعدادات بصيغة reg بإسم :ـ
set.reg

مع التأكد من وجود الملفات ورسائل التأكد ,, وتخيير المستخدم في التثبيت وتركيب الإعدادات ,,, ورسالة توديع في حال الرفض ,,

تكفون يا جماعة لا تسفهوني ,,,

نسيت كمان أرسلوه لي على الخاص ,,, وأنا رح أطرح الحل في اليوم التالي إن شاء الله ,,,,

acornlvs880895.gif

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




​
 
التعديل الأخير بواسطة المشرف:
توقيع : ashalshaikh
ماشاء الله عليك يا ِAdvance
فعلا متقدم جزاك الله خيرا وتم التقييم 5\5
​
 
توقيع : Demo-dashDemo-dash is verified member.
جزاك الله خير
 
توقيع : zoro779
يا أهلا وسهلا ,,,,,,, ,, تم تحديث المشاركة السابقة لي وإضافة تابع الجزء الثاني ,,,
 
توقيع : ashalshaikh
يعطيك العافية

أخوي هذا كود لتنزيل الفوتوشوب تلقائيا
لكن لاحط أخي جملة الرسالة باللون الأحمر تحت في الأخير هل هي صحيحة؟

يعطيك العافية جاري التقييم 5/5 تتاهل أكثر

كود: 
$SF_1 = "Setup.exe"

If WinExists ( $SF_1 ) Then Exit
AutoItWinSetTitle ( $SF_1)
Run('Setup.exe')
WinWait("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Information","To avoid restarting ")
If Not WinActive("Information","To avoid restarting ") Then WinActivate("Information","To avoid restarting ")
WinWaitActive("Information","To avoid restarting ")
Send("{SPACE}")
WinWait("Select Language","Choose the language ")
If Not WinActive("Select Language","Choose the language ") Then WinActivate("Select Language","Choose the language ")
WinWaitActive("Select Language","Choose the language ")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Software License Agreement","Please read the foll")
If Not WinActive("Software License Agreement","Please read the foll") Then WinActivate("Software License Agreement","Please read the foll")
WinWaitActive("Software License Agreement","Please read the foll")
Send("{ALTDOWN}a{ALTUP}")
WinWait("User Information","The following inform")
If Not WinActive("User Information","The following inform") Then WinActivate("User Information","The following inform")
WinWaitActive("User Information","The following inform")
Send("{TAB}taif{TAB}mansour{TAB}al{TAB}al{SPACE}mutiri{TAB}pc{TAB}104501221184132075819690{ALTDOWN}n{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","You have provided th")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","You have provided th") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","You have provided th")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","You have provided th")
Send("{ALTDOWN}y{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Adobe Photoshop 7.0 ME Setup","Select the file type")
If Not WinActive("Adobe Photoshop 7.0 ME Setup","Select the file type") Then WinActivate("Adobe Photoshop 7.0 ME Setup","Select the file type")
WinWaitActive("Adobe Photoshop 7.0 ME Setup","Select the file type")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.")
Send("n{ALTDOWN}{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re")
Send("{TAB}{TAB}{SPACE}{TAB}{ALTDOWN}f{ALTUP}{ALTDOWN}f{ALTUP}{SPACE}")
WinWait("Information","Thank you for choosi")
If Not WinActive("Information","Thank you for choosi") Then WinActivate("Information","Thank you for choosi")
WinWaitActive("Information","Thank you for choosi")
Send("{SPACE}")
  [COLOR=red]msgbox (0,"تمت تنزيل الفوتوشوب","تهانينا")
[/COLOR]
 
تم تحديث المشاركة السابقة ,,, تابع الجزء الثاني ,,,,
وإضافة التطبيقات ,,,,,
بتاريخ 18/11/1498هـ الساعة 11 م ,,,
 
توقيع : ashalshaikh
طائفي نت قال:
يعطيك العافية

أخوي هذا كود لتنزيل الفوتوشوب تلقائيا
لكن لاحط أخي جملة الرسالة باللون الأحمر تحت في الأخير هل هي صحيحة؟

يعطيك العافية جاري التقييم 5/5 تتاهل أكثر

كود: 
$SF_1 = "Setup.exe"

If WinExists ( $SF_1 ) Then Exit
AutoItWinSetTitle ( $SF_1)
Run('Setup.exe')
WinWait("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Welcome to the Photo")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Information","To avoid restarting ")
If Not WinActive("Information","To avoid restarting ") Then WinActivate("Information","To avoid restarting ")
WinWaitActive("Information","To avoid restarting ")
Send("{SPACE}")
WinWait("Select Language","Choose the language ")
If Not WinActive("Select Language","Choose the language ") Then WinActivate("Select Language","Choose the language ")
WinWaitActive("Select Language","Choose the language ")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Software License Agreement","Please read the foll")
If Not WinActive("Software License Agreement","Please read the foll") Then WinActivate("Software License Agreement","Please read the foll")
WinWaitActive("Software License Agreement","Please read the foll")
Send("{ALTDOWN}a{ALTUP}")
WinWait("User Information","The following inform")
If Not WinActive("User Information","The following inform") Then WinActivate("User Information","The following inform")
WinWaitActive("User Information","The following inform")
Send("{TAB}taif{TAB}mansour{TAB}al{TAB}al{SPACE}mutiri{TAB}pc{TAB}104501221184132075819690{ALTDOWN}n{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","You have provided th")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","You have provided th") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","You have provided th")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","You have provided th")
Send("{ALTDOWN}y{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Click the type of Se")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Adobe Photoshop 7.0 ME Setup","Select the file type")
If Not WinActive("Adobe Photoshop 7.0 ME Setup","Select the file type") Then WinActivate("Adobe Photoshop 7.0 ME Setup","Select the file type")
WinWaitActive("Adobe Photoshop 7.0 ME Setup","Select the file type")
Send("{ALTDOWN}n{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Adobe Photoshop 7.0.")
Send("n{ALTDOWN}{ALTUP}")
WinWait("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re")
If Not WinActive("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re") Then WinActivate("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re")
WinWaitActive("Adobe Photoshop 7.0.1 ME Setup","Display Photoshop Re")
Send("{TAB}{TAB}{SPACE}{TAB}{ALTDOWN}f{ALTUP}{ALTDOWN}f{ALTUP}{SPACE}")
WinWait("Information","Thank you for choosi")
If Not WinActive("Information","Thank you for choosi") Then WinActivate("Information","Thank you for choosi")
WinWaitActive("Information","Thank you for choosi")
Send("{SPACE}")
  [COLOR=red]msgbox (0,"تمت تنزيل الفوتوشوب","تهانينا")
[/COLOR]
أنقر للتوسيع...


يا هلا أخوي ,,, كود الرسالة صحيح ,,, وانتظر إذا لمست سأطرح كل ما أعرفه في الأوتووات :hh: علما بأني مبتدئ جدا جدا ,,, يعني الأكواد من أول الموضوع إلى آخرة ما تعدي 10 ,,, أنا مبتدئ جدا ,,,

بس ,, سؤال الكود هذا عاملة كتابة أو بالمسجل اللي يسجل الحركات والضغطات ,,,

إذا كان بالمسجل ,,, إرفعه لي وعطني رابط لأني محتاجله ولاني لاقيه ,,, كان عندي لاكني ضيعته ,,,
 
توقيع : ashalshaikh
ashalshaikh قال:
يا هلا أخوي ,,, كود الرسالة صحيح ,,, وانتظر إذا لمست إقبال سنتعمق شوي في موضوع الـ msgbox

بس ,, سؤال الكود هذا عاملة كتابة أو بالمسجل اللي يسجل الحركات والضغطات ,,,

إذا كان بالمسجل ,,, إرفعه لي وعطني رابط لأني محتاجله ولاني لاقيه ,,, كان عندي لاكني ضيعته ,,,
أنقر للتوسيع...


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


وهذا الرابط أخوي لكن أنا ما ادري هل طريقتي صحيحة وهي بنسخ جميع المجلدات التابعة أم المجلد الذي يحتوي على المسجل فقط

بإنتظارك
 
واصل يابطل

متابع بإهتمام
 
توقيع : عاشق 2
طائفي نت قال:
لا يالغالي بالمسجل
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي


وهذا الرابط أخوي لكن أنا ما ادري هل طريقتي صحيحة وهي بنسخ جميع المجلدات التابعة أم المجلد الذي يحتوي على المسجل فقط

بإنتظارك
أنقر للتوسيع...

مشكور ,,, هو المقصود ,,, ما قصرت يالنشمي ,,, :ok:
 
توقيع : ashalshaikh
صراحه قمه وشرح رائع انا استخدم autoit منذ فتره ولكن للحق استفدت من طرحك الكثير بارك الله فيك ووفقك اخي الكريم وسأكون متبع لما تطرحه فأنت مثال للتميز
والمنتدى يزخر بأمثالك
 
الله يعطيك العافية شرح رائع يبي طبيق عشان اتقن الله يسلمك ويجعل الجنة مثواك​
 
توقيع : الآمل الطائر
بارك الله فيكم ,, والله فرحتوني ,,

الآمل الطائر قال:
الله يعطيك العافية شرح رائع يبي طبيق عشان اتقن الله يسلمك ويجعل الجنة مثواك​
أنقر للتوسيع...

تراه سهل جدا ,,,, لو تلاحظ من أول شرح السكريبت إلى آخرة وأنا أعيد وأزيد في نفس السكربتات ولكن في كل مرة أزيد شي بسييييييييييط ,,, بإنتظار الواجب

الآمل الطائر قال:
انا اقترح تطبيق فيديو فضلاً لاآمراً​
أنقر للتوسيع...
يالغالي :ـ أشوف المسئلة صعبة شوي ,,, ممكن شرح فيديو في الجزء الثالث لأنه سهل ,,,, أما شغلة الأكواد هذي يبغالها كتابة ,,,

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

والله يالغالي ما سويت شئ بالعكس أنت صاحب الفضل في زيادة معرفتي به

وعيني عليك باردة ماشاء الله عليك

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

وعيني عليك باردة ماشاء الله عليك

مشكلتي مشغوووول جدا ولا يمديني أول واحد يطبق خصوصا إن عندي خلفية في البرمجة لكن لنا رجعة ولو بعد فترة
أنقر للتوسيع...

يا هلا بك في أي وقت ,,, ومشكور على الكلمات الحلوة ياجميل:hh:
 
توقيع : ashalshaikh
الجزء الثالث والأخير :ـ
التجهيز النهائي للتثبيت وصنعه في ملف واحد وعمل اللازم ,
acornlvs880895.gif


1:

تحويل السكربت من Au3 إلى exe حتى يشتغل في أجهزة ليس مثبت بها الأوتووات ,,


نشغل :ـ
ابدأ >كافة البرامج > autoit 3 > ثم :ـ
Compile Script to .exe

سيظهر :ـ
zyzoom-fc9f767063.jpg


3 : حدد مكان السكربت ,,
2: حدد مكان حفظ ملف exe
1 : اختيار الأيقونة

والمحددة بمربع أحمر يفضل تركها كما هي :ـ

وبعد الإكمال ,,, إضغط على convert انتظر ستجد ملف exe في المكان ,,,


مرحلة جمع الملفات في ملف واحد :ـ

أولا :ـ
ننسخ الملفات الضرورية للتنصيب مع السكربت المحول إلى exe في مجلد واحد :ـ

ثم نحددها كلها ونفعل التالي :ـ


zyzoom-30277fe157.jpg


ثم إضافة إلى الأرشيف

zyzoom-c3cccb1223.jpg


ثم :ـ
3.gif


4.gif


5.gif

وهذه هو الكود ​
quot-top-left.gif
اقتباس


quot-top-right-10.gif






quot-bot-left.gif

quot-bot-right.gif

Setup=script.exe
TempMode
Silent=1
Overwrite=1
مع ملاحظة تغيير script.exe باسم الملف المعمول بالأوتوات ,,

وإذا كان ملف التثبيت كبييييييييييييييير حجمه ضع هذا الكود ,,
Setup=script.exe
TempMode
Silent=2
Overwrite=1
مع ملاحظة تغيير script.exe باسم الملف المعمول بالأوتوات ,,
​

بعدها اوك اوك لكل شيئ ويبدا العمل ​

6.gif

يمكنت تغيير الأيقونة من خلال الوينرار ,,,,


acornlvs880895.gif

النهـــــــــــــــاية ,,

ورونا إبداعاتكم ,,
لا تنسونا من صالح الدعاء ,,

 
التعديل الأخير بواسطة المشرف:
توقيع : ashalshaikh
بيض الله وجهك يـ الذيب ,, تم الإطلااع على الجزء

الثالث ,, سلمت يمينك ولاا حرمك الله ما تتمنى

كل الود
 
توقيع : Al jNtEeL
الحالة
مغلق و غير مفتوح للمزيد من الردود.
عودة
أعلى