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

  • بادئ الموضوع بادئ الموضوع ashalshaikh
  • تاريخ البدء تاريخ البدء
  • المشاهدات 114,207
فدى الرسول قال:
بعد ما نسينا كل شئ بترجعنا تانى
ع العموم بارك الله فيك
الدرس شوى مبهم
اتمنى تضع لنا امثله اكثر تبين اهمية المشروح فى الدرس
PHP: 
#cs ----------------------------------------------------------------------------
 
 AutoIt Version: 3.3.0.0
 Author:         myName
 
 Script Function:
    Template AutoIt script.
 
#ce ----------------------------------------------------------------------------
 
; Script Start - Add your code below here
 
m("يارب ")
m("الشيخ يحــن")
m("علينا بدروس وشروحات")
m("ويسهل علينا الدوال")
 
Func m($text,$Title="ادعو معى")
    MsgBox(16,$Title,$Text)
EndFunc
أنقر للتوسيع...
:hh::hh::hh::hh:
تطبيق جميل :d:

بس ليش النافذة صغيرة كذا

i28760_33.png


:i:
 

توقيع : Future Tank X-1
MAAX قال:
:hh::hh::hh::hh:
تطبيق جميل :d:

بس ليش النافذة صغيرة كذا

i28760_33.png


:i:
أنقر للتوسيع...

السلام عليكم ورحمت الله وبركاته
النافذة صغيرة لانى انا اخترت لها فى المسج بوكس 16 لو انت اخذت بالك منها
جزاك الله خير
شرفنى جداااااااااااااا مروركم الكريم
ننتظر مرور الشيخ :cr: ويقول لى ان الموضوع نايم :no: لا اعتقد ان الموضوع هو اللى نايم :bleh:
 
توقيع : فدى الرسول
بسم الله الرحمن الرحيم

ماشاء الله تبارك الله شغل ميه ميه :smile:

بما ان البعض متضايق ويقول ان الناس نايمه واخوي الشيخ يقول انه مشغول وعنده
مشاكل مع النت قلنا بنشاركم بشي بسيط :b:

الفكره :: تصميم اداه بسيطه لكشف ملف الهوست :d:

ومن المعروف ان الفيروسات تحاول تلعب بها الملف وتغييره

المهم في هذه المشاركه بنسوي واجهه بسيطه واضهار المكتوب داخل ملف الهوست
وبدون القدره على تغييرها يعني يكون للقراءه فقط << بالنسبه للتغيير امره سهل بس خلونا ناخذها حبه حبه :ok: وبعدها نكمل المشروع سوا :smile:

المشروع
_________________________________________

طبعاً صنع الواجه بسيط ويمكنكم التعديل فيه زي ماتحبون << واجهه بسيطه :cr:

امر كشف ملف الهوست << اهم شي


فيه اقتراحات او معلومات !!
​
 
توقيع : LINEZERO
واجهه بسيطه

i29663_815200993318PM.jpg


كود الواجهه :d:

PHP: 
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#RequireAdmin

$Form1 = GUICreate("Show Your HOSTS File By : LINEZERO", 625, 445, 193, 125) ; انشاء الوجهه الرئيسيه + العنوان
$Edit1 = GUICtrlCreateEdit("", 24, 72, 585, 345, $ES_READONLY) ; انشاء Edit control  << والله ماعرف اسمها بالعربي :)
GUICtrlSetData(-1, ""); Edit control  << لايوجد كتابه بالـ
$Button1 = GUICtrlCreateButton("Show", 48, 16, 81, 41, 0) ; انشاء زر :)
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif"); نوع الخط
GUICtrlSetColor(-1, 0xFF0000); لون الخط
$Button2 = GUICtrlCreateButton("ESC", 560, 24, 41, 33, 0); انشاء زر :)
GUISetState(@SW_SHOW) ; اظهار الواجهه
; ابقاء الواجهه قيد التشغيل حتى اغلاقها من قبل المستخدم
While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
 
توقيع : LINEZERO
كود اضهار ملف الهوست

PHP: 
$HOSTO = FileOpen(@SystemDir & "\Drivers\etc\hosts", 0)
; check if file can be open
            If $HOSTO = -1 Then
                MsgBox(0, "Failure", "Failed To open file")
                Exit
            EndIf
            ;read hosts file
            $HOSTR = FileRead(@SystemDir & "\Drivers\etc\hosts")
            If @error = -1 Then Exit
            GUICtrlSetData($Edit1, $HOSTR)
            FileClose($HOSTO)
 
توقيع : LINEZERO
الشكل النهائي للاداة

i29689_815200995704PM.jpg



السورس كود للاداه كامل

PHP: 
#cs ----------------------------------------------------------------------------
    
    AutoIt Version: 3.3.0.0
    Author:         LINEZERO :: Bandar Al-Shmrani
    
    Script Function:
    Show Your HOSTS File
    
#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#RequireAdmin
$HOSTO = FileOpen(@SystemDir & "\Drivers\etc\hosts", 0)
$Form1 = GUICreate("Show Your HOSTS File By : LINEZERO", 625, 445, 193, 125) 
$Edit1 = GUICtrlCreateEdit("", 24, 72, 585, 345, $ES_READONLY) 
GUICtrlSetData(-1, "")
$Button1 = GUICtrlCreateButton("Show", 48, 16, 81, 41, 0) 
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$Button2 = GUICtrlCreateButton("ESC", 560, 24, 41, 33, 0)
GUISetState(@SW_SHOW) 
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Button1
            ; check if file can be open
            If $HOSTO = -1 Then
                MsgBox(0, "Failure", "Failed To open file")
                Exit
            EndIf
            ;read hosts file
            $HOSTR = FileRead(@SystemDir & "\Drivers\etc\hosts")
            If @error = -1 Then Exit
            GUICtrlSetData($Edit1, $HOSTR)
            FileClose($HOSTO)
        Case $Button2
            Exit
    EndSwitch
WEnd

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
 
توقيع : LINEZERO
مشكوووووووووووور
 
توقيع : habe
عودة يا حبايب !!
رجعت وسافرت من جديد ,, أخذت لي كم يوم في ............ !! :bleh:
فدى الرسول قال:
بعد ما نسينا كل شئ بترجعنا تانى
ع العموم بارك الله فيك
الدرس شوى مبهم
اتمنى تضع لنا امثله اكثر تبين اهمية المشروح فى الدرس
PHP: 
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.0.0
 Author:         myName

 Script Function:
    Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

m("يارب ")
m("الشيخ يحــن")
m("علينا بدروس وشروحات")
m("ويسهل علينا الدوال")

Func m($text,$Title="ادعو معى")
    MsgBox(16,$Title,$Text)
EndFunc
أنقر للتوسيع...
أهلاااااااااااا أخي !!
تطبيق رائع ,,
تسلم ياغالي ,,
رائع فهمت كل شيء ممتاز أخي !!
إن شاء الله رح أعمل درس جديد لضبط المخرجات !!



فدى الرسول قال:
السلام عليكم ورحمت الله وبركاته
النافذة صغيرة لانى انا اخترت لها فى المسج بوكس 16 لو انت اخذت بالك منها
جزاك الله خير
شرفنى جداااااااااااااا مروركم الكريم
ننتظر مرور الشيخ :cr: ويقول لى ان الموضوع نايم :no: لا اعتقد ان الموضوع هو اللى نايم :bleh:
أنقر للتوسيع...
:q:
بندر® قال:
بسم الله الرحمن الرحيم

ماشاء الله تبارك الله شغل ميه ميه :smile:

بما ان البعض متضايق ويقول ان الناس نايمه واخوي الشيخ يقول انه مشغول وعنده
مشاكل مع النت قلنا بنشاركم بشي بسيط :b:

الفكره :: تصميم اداه بسيطه لكشف ملف الهوست :d:

ومن المعروف ان الفيروسات تحاول تلعب بها الملف وتغييره

المهم في هذه المشاركه بنسوي واجهه بسيطه واضهار المكتوب داخل ملف الهوست
وبدون القدره على تغييرها يعني يكون للقراءه فقط << بالنسبه للتغيير امره سهل بس خلونا ناخذها حبه حبه :ok: وبعدها نكمل المشروع سوا :smile:

المشروع
_________________________________________

طبعاً صنع الواجه بسيط ويمكنكم التعديل فيه زي ماتحبون << واجهه بسيطه :cr:

امر كشف ملف الهوست << اهم شي


فيه اقتراحات او معلومات !!
​
أنقر للتوسيع...
تسلم ياغالي ,, فكرة أكثر من ممتازة !!
سلمت يمناك ,,
وتسلم ياغالي على تنشيط الموضوع !!
بندر® قال:
كود اضهار ملف الهوست

PHP: 
$HOSTO = FileOpen(@SystemDir & "\Drivers\etc\hosts", 0)
; check if file can be open
            If $HOSTO = -1 Then
                MsgBox(0, "Failure", "Failed To open file")
                Exit
            EndIf
            ;read hosts file
            $HOSTR = FileRead(@SystemDir & "\Drivers\etc\hosts")
            If @error = -1 Then Exit
            GUICtrlSetData($Edit1, $HOSTR)
            FileClose($HOSTO)
أنقر للتوسيع...

بندر® قال:
الشكل النهائي للاداة

i29689_815200995704PM.jpg



السورس كود للاداه كامل

PHP: 
#cs ----------------------------------------------------------------------------
    
    AutoIt Version: 3.3.0.0
    Author:         LINEZERO :: Bandar Al-Shmrani
    
    Script Function:
    Show Your HOSTS File
    
#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#RequireAdmin
$HOSTO = FileOpen(@SystemDir & "\Drivers\etc\hosts", 0)
$Form1 = GUICreate("Show Your HOSTS File By : LINEZERO", 625, 445, 193, 125) 
$Edit1 = GUICtrlCreateEdit("", 24, 72, 585, 345, $ES_READONLY) 
GUICtrlSetData(-1, "")
$Button1 = GUICtrlCreateButton("Show", 48, 16, 81, 41, 0) 
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$Button2 = GUICtrlCreateButton("ESC", 560, 24, 41, 33, 0)
GUISetState(@SW_SHOW) 
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Button1
            ; check if file can be open
            If $HOSTO = -1 Then
                MsgBox(0, "Failure", "Failed To open file")
                Exit
            EndIf
            ;read hosts file
            $HOSTR = FileRead(@SystemDir & "\Drivers\etc\hosts")
            If @error = -1 Then Exit
            GUICtrlSetData($Edit1, $HOSTR)
            FileClose($HOSTO)
        Case $Button2
            Exit
    EndSwitch
WEnd
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
أنقر للتوسيع...
تسلم إيدك ياغالي ,,
والله إبداع !!

أفكار :ـ

  • وضع أزرار في الأسفل أو في اليمين أو في اليسار << حتى لو تكون فاضية تضع فيها أي شي
  • خاصية التعديل أظن أنها سهلة !! ما تحتاج إلا تغيير الـ Style :d: وزر
  • خاصية النسخ الإحتياطي
  • خاصية إرجاعه إلى الإفتراضيات !! :ok:
فيه اقتراح أظن إنه صعب شوي :d: وهو تحويل الـ Edit إلى ListView يكون أسهل (للمستخدم) وأفضل وأجمل
ولكن صعب جدا جدا جدا في التنفيذ :b: <<< ولي محاولة قديمة ورجعت خائبا :d: ولكني أظنك تستطيع :ok:

شكرا لك أخي !!



وأعتذر عن الغياب
 
توقيع : ashalshaikh
بندر® قال:
الشكل النهائي للاداة​


i29689_815200995704PM.jpg


السورس كود للاداه كامل​


PHP: 
#cs ----------------------------------------------------------------------------
PHP: 
[CENTER]    
    AutoIt Version: 3.3.0.0
    Author:         LINEZERO :: Bandar Al-Shmrani
    
    Script Function:
    Show Your HOSTS File
    
#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#RequireAdmin
$HOSTO = FileOpen(@SystemDir & "\Drivers\etc\hosts", 0)
$Form1 = GUICreate("Show Your HOSTS File By : LINEZERO", 625, 445, 193, 125) 
$Edit1 = GUICtrlCreateEdit("", 24, 72, 585, 345, $ES_READONLY) 
GUICtrlSetData(-1, "")
$Button1 = GUICtrlCreateButton("Show", 48, 16, 81, 41, 0) 
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$Button2 = GUICtrlCreateButton("ESC", 560, 24, 41, 33, 0)
GUISetState(@SW_SHOW) 
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Button1
            ; check if file can be open
            If $HOSTO = -1 Then
                MsgBox(0, "Failure", "Failed To open file")
                Exit
            EndIf
            ;read hosts file
            $HOSTR = FileRead(@SystemDir & "\Drivers\etc\hosts")
            If @error = -1 Then Exit
            GUICtrlSetData($Edit1, $HOSTR)
            FileClose($HOSTO)
        Case $Button2
            Exit
    EndSwitch
WEnd

[/CENTER]


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

رائع جداا اخوي بندر :ok:
لو تضيف له زر لاستعادة الافتراضيات للهوست
:king:
​
 
عودة يا حبايب !!
رجعت وسافرت من جديد ,, أخذت لي كم يوم في ............ !! :bleh:
أنقر للتوسيع...

الحمدلله على السلاامة
:)
وش كنا نقول
وين رحت :bleh:
 
MAAX قال:
رائع جداا اخوي بندر :ok:
لو تضيف له زر لاستعادة الافتراضيات للهوست
:king:
[/CENTER]
أنقر للتوسيع...

هلا وغلا اخوي نور :smile:

نحط له اازرار ماهو زر واحد :q:

بس وش الافضل زر استعادة الافتراضيات ام زر للتعديل على الملف من قبل المستخدم ثم حفظ التغيرات ؟؟

ووش رايك نضع زر لحفظ تقرير نصي عن ملف الهوست :d:
 
توقيع : LINEZERO
بندر® قال:
هلا وغلا اخوي نور :smile:

نحط له اازرار ماهو زر واحد :q:

بس وش الافضل زر استعادة الافتراضيات ام زر للتعديل على الملف من قبل المستخدم ثم حفظ التغيرات ؟؟

ووش رايك نضع زر لحفظ تقرير نصي عن ملف الهوست :d:
أنقر للتوسيع...
والله زر للتعديل من قبل المستخدم قليل من يستفيد منها :q:
الافضل استعادة افتراضيات + زر لحفظ تقرير نصي عن ملف الهوست
ويصير استخدامه نفس هذي الاداة

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


:d::d:
 
MAAX قال:
الحمدلله على السلاامة
:)
وش كنا نقول
وين رحت :bleh:
أنقر للتوسيع...
:d::d:
رحت مكان ثاني :bleh:
هههههههههههه

أخوي بندر أي مساعدة وإلا شي تراني بالخدمة ..
<<<< شخبار عن مشروعك الأول اللي خبرتني عنه قديما << حلوة قديما :d:
---------------------------------------------------------------------
جاري إعداد جزء من درس المخرجات :d:
 
توقيع : ashalshaikh


ashalshaikh

بارك الله فيك . وفي الأخوان الكرام


< متابع بصمت :d: & يلطش أوامر جاهزة :d:

 ​
 
توقيع : Rays

أخوي بندر أي مساعدة وإلا شي تراني بالخدمة ..
<<<< شخبار عن مشروعك الأول اللي خبرتني عنه قديما << حلوة قديما :d:
أنقر للتوسيع...
مانستغني عن الخدمه لا الظاهر ان نور يبي يوهقنا :d:

وبالنسبه للمشروع من قدمه ماعاد اذكر وشهو :b:
 
توقيع : LINEZERO
MAAX قال:
والله زر للتعديل من قبل المستخدم قليل من يستفيد منها :q:
الافضل استعادة افتراضيات + زر لحفظ تقرير نصي عن ملف الهوست
ويصير استخدامه نفس هذي الاداة

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


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

الاداه حقتنا بتكون افضل لانها تدعم الفستا :d:

وبعد احنا مانبي نسويها مثل الاداة نبي خيارات وافكار افضل ؟؟

وش اقتراحاتك ؟ واقتراحات الاعضاء ؟؟

دام الشيخ متواجد خلوه يساعدني :smile:
 
توقيع : LINEZERO
Rays قال:


ashalshaikh

بارك الله فيك . وفي الأخوان الكرام


< متابع بصمت :d: & يلطش أوامر جاهزة :d:

 ​
أنقر للتوسيع...
:d:
أهلا بك ,,
بندر® قال:
مانستغني عن الخدمه لا الظاهر ان نور يبي يوهقنا :d:

وبالنسبه للمشروع من قدمه ماعاد اذكر وشهو :b:
أنقر للتوسيع...

:b:
هههههه
حق الـ StartUp :d: .. :smile:
لا تكون زيي ,, أبدأ فيه يومين وبعدين أتركه :q:
بندر® قال:
الاداه حقتنا بتكون افضل لانها تدعم الفستا :d:

وبعد احنا مانبي نسويها مثل الاداة نبي خيارات وافكار افضل ؟؟

وش اقتراحاتك ؟ واقتراحات الاعضاء ؟؟

دام الشيخ متواجد خلوه يساعدني :smile:
أنقر للتوسيع...
توجد أفكار كتبتها في الصفحة قبل :d: !!! :smile:
 
توقيع : ashalshaikh
معليش أخواني ما أعديت شي في الدرس ,,
جانا ضيوف وانشغلت !!
جاري الإعداد !! ولكن جزء منه حتى نتدرج !!
 
توقيع : ashalshaikh
يجب تسجيل الدخول أو التسجيل كي تتمكن من الرد هنا.
عودة
أعلى