1. إستبعاد الملاحظة

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

الموضوع في 'ركن مدونات الأعضاء' بواسطة format, بتاريخ ‏يونيو 28, 2011.

?

هل أستمر بكتابة بالغة AutoIt v3 Script

الإستطلاع مغلق ‏ديسمبر 1, 2016
  1. نعم

    1 صوت
    100.0%
  2. لا

    0 صوت
    0.0%
  1. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    السلام عليكم ورحمة الله وبركاته
    اليوم الاداة من صنعي مبرمجة عن طريق الاوتيت سكربت يقوم بتثبيت صامت لكافة اصدارة الفايرفوكس
    الاداة يجب انت تكون بنفس المجلد الفايرفوكس

    الكود البرمجي للتطوير والاستفادة منه
    كود PHP:
    #RequireAdmin
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=Firefox.ico
    #AutoIt3Wrapper_Res_Comment=م.حاتم محسن الحناوي
    #AutoIt3Wrapper_Res_Description=اداة التثبيت صامت لكل البرامج الفايرفوكس
    #AutoIt3Wrapper_Res_LegalCopyright=حاتم محسن الحناوي
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    $inpu=InputBox('اداة التثبيت صامت لبرنامج الفايرفوكس لجميع الاصدارات','ادخل اسم الملف استاب الفايرفوكس','','')
    if 
    $inpu Then
        RunWait
    ($inpu&".exe"&" -ms")
    MsgBox(64,'المبرمج حاتم محسن الحناوي','تم الانتهاء من التثبيت البرنامج الفايرفوكس',2)
    Exit
    Else
        
    MsgBox(16,'رسالة من المبرمج حاتم محسن الحناوي','ادخل اسم الملف التثبيت الصامت')
    EndIf
     
    آخر تعديل: ‏فبراير 9, 2017
    ضياء نورالدين و MagicianMiDo32 معجبون بهذا.
  2. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    كود:
    Example()
    
    Func Example()
        ProgressOn("Internet Download Manager", 'جاري اغلاق العملية', "0%")
        $cc='IDMan.exe'
    if ProcessExists($cc) Then
        ProcessWaitClose($cc)
        EndIf
    
    ;جاري تفعيل البرنامج
        For $i = 10 To 100 Step 10
            Sleep(500)
            ProgressSet($i, $i & "%")
        Next
        ProgressOff()
    EndFunc
    
     
  3. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    اللهم اني عبدك ابن عبدك ناصيتي بيدك اسألك بكل اسم هو لك انت تغفر ل صاحبي .. ثامر الحمد وان ترزقه جناتك ..
    اللهم انك عفوا كريم عفو تحب العفو .. فا اعفو عن صاحبي ثامر الحمد ..
    http://forum.zyzoom.net/threads/204716/
     
  4. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    مرحباً جميعا اليوم راح اطرح اشياء مميزة .. بحب اشارك كل متابعيني ..
    على المدونة زيزووم ..
    طرح راح ينقسم الى قسمين !
    قسم الاول هو كيف تثبيت صامت للانترنت دولاند منجر "Internet Download Manager" بكود من صنع اخوكم حاتم محسن الحناوي ..
    وراح اطرح قسم القسم الثاني كود تفعيل مع الكراك ..
    وطرح الثالث هو تولبر .. ليس له اي اكواد الي يهمنا اول قسمين ! ..
    البرنامج / تقوم بتحميل من هنا .. IDM
    الكود الاول
    هو ان تضع البرنامج مع السورس بنفس المكان وتغيير اسمه الى IDM

    كود:
    #RequireAdmin
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=icon\IDM.ico
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <Process.au3>
    ;;هنا غير الاسم الى اسم البرنامج الموجود
    ;يشترط ان يكون البرنامج مع نفس موقع السكربت
    
    $IDM='IDM.exe'
    RegWrite('HKCU\Software\DownloadManager', 'LanguageID','REG_DWORD',Number('9'))
    if ProcessExists("IDMan.exe") and ProcessExists ("IEMonitor.exe") Then
     ProcessClose("IDMan.exe")
            ProcessClose("IEMonitor.exe")
    EndIf
    If FileExists(@ProgramFilesDir & "\" & "Internet Download Manager") Then
    DirRemove(@ProgramFilesDir & "\" & "Internet Download Manager",1)
    EndIf
    If FileExists(@ProgramFilesDir & "\" & "Internet Download Manager\IDMan.exe") Then
        $msg=MsgBox(4+64,'هل ترغب في الغاء النسخة الحالية ل تثبيت النسخة الجديدة',9)
        if $msg=6 Then
            ProcessClose("IDMan.exe")
            ProcessClose("IEMonitor.exe")
    MsgBox(48,'رسالة من المبرمج','قم بالغاء تثبيت البرنامج'&@CRLF&'Internet Download Manager',3)
    _RunDos('C:\Windows\System32\rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl,,0')
    EXIT
        ElseIf $msg=7 Then
    EXIT
    EndIf
    EndIf
    _IDM()
    Func _IDM()
    ShellExecuteWait(@ScriptDir&'\'&$IDM)
    BlockInput(1)
    WinWaitActive('[CLASS:#32770]')
    WinWaitActive('Internet Download Manager Installation Wizard')
    ControlClick('Internet Download Manager Installation Wizard','&Next >',1008)
    WinWaitActive('[CLASS:#32770]')
    WinWaitActive('Please read IDM license')
    ControlClick('Please read IDM license','',1063)
    ControlClick('Please read IDM license','&Next >',1008)
    WinWaitActive('[CLASS:#32770]')
    WinWaitActive('Choose Destination Location')
    ControlClick('Choose Destination Location','&Next >',1008)
    WinWaitActive('[CLASS:#32770]')
    WinWaitActive('Start Installation of Internet Download Manager')
    ControlClick('Start Installation of Internet Download Manager','&Next >',1008)
    WinWaitActive('[CLASS:#32770]')
    WinWaitActive('Installation Complete')
    ControlClick('Installation Complete','&Finish >',1009)
    ProcessWait('IDMan.exe')
    ProcessClose("IDMan.exe")
    ProcessClose("IEMonitor.exe")
    RegWrite('HKCU\Software\DownloadManager', 'LanguageID','REG_DWORD',Number('1'))
    BlockInput(0)
    EndFunc
    
    القسم الثاني وهو الكود الدمج مع الكراك .. وتفعيله بالرجستري

    هاهو هنا جاهز للتحميل


    كود:
    #RequireAdmin
    
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=IDM.ico
    #AutoIt3Wrapper_Res_Comment=by HaTeM MoHsEn HeNawi
    #AutoIt3Wrapper_Res_Description=crack IDM Version: 6.26 v3
    #AutoIt3Wrapper_Res_Fileversion=3.4.1.1
    #AutoIt3Wrapper_Res_LegalCopyright=by HaTeM MoHsEn HiNawi
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #Region
    #EndRegion
    #Region
    #EndRegion
    If NOT FileExists(@ProgramFilesDir & "\" & "Internet Download Manager") Then
        MsgBox(16, "IDM", "قم بتثبيت البرنامج" & @CRLF & "Internet Download Manager", 3)
        Exit
    EndIf
    
    _key()
    
    Func _key()
        $processexists = ProcessExists("IDMan.exe")
        $processexists2= ProcessExists("IEMonitor.exe")
        If $processexists Or $processexists2 Then
            ProcessClose("IDMan.exe")
            ProcessClose("IEMonitor.exe")
            MsgBox(48, "IDM", "أعتذر منك تم اغلاق للتفعيل" & @CRLF & "Internet Download Manager", 2)
        EndIf
        FileInstall("IDMan.exe", @ProgramFilesDir & "\" & "Internet Download Manager\IDMan.exe", 1)
        RegWrite("HKLM\SOFTWARE\Internet Download Manager", "AdvIntDriverEnabled2", "REG_DWORD", Number("1"))
        RegWrite("HKLM\SOFTWARE\Internet Download Manager", "FName", "REG_SZ", "Hatem")
        RegWrite("HKLM\SOFTWARE\Internet Download Manager", "Serial", "REG_SZ", "HE3TB-8J3SY-FP9SC-6RKR2")
        RegWrite("HKLM\SOFTWARE\Internet Download Manager", "LName", "REG_SZ", "")
        RegWrite("HKLM\SOFTWARE\Internet Download Manager", "Email", "REG_SZ", "saeed@absba.com")
        MsgBox(64, "اخوكم حاتم محسن الحناوي", "تم تفعيل البرنامج" & @CRLF & "Internet Download Manager", 2)
    
    EndFunc
    



    القسم الثالث

    التولبر للتحميل
     
    أعجب بهذه المشاركة binalshami
  5. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    دالة التحقق من الويندز اي اصدار
    كود:
    If @OSVersion = "WIN_7" Then MsgBox(64, "Info", "You are at windows 7 !!")
    If @OSVersion = "WIN_VISTA" Then MsgBox(64, "Info", "You are at windows vista !!")
    If @OSVersion = "WIN_XP" Then MsgBox(64, "Info", "You are at windows XP !!")
    If @OSVersion = "WIN_7" Or @OSVersion = "WIN_VISTA" Then MsgBox(64, "Info", "You are at windows 7 or windows vista !!")
    if @OSVersion = 'WIN_10' Then MsgBox(64, "Info", "You are at windows 10 !!")
    If @OSVersion = "WIN_8" Then MsgBox(64, "Info", "You are at windows 8 !!")
    تحقق نواة الويندز 64 ام 32 (86)

    كود:
    If @OSArch = "X86" Then
    MsgBox(0,'','x86')
    EndIf
    
    If @OSArch = "X64" Then
    MsgBox(64,'','x64')
    EndIf
    
    



    كيف نقوم بتشغيل البرامج .. الي تحتاج نواة 86 ام 64

    وندمجه في برامجنا .. او في نفس المكان التشغيل المطلوب ..
    كود PHP:
    #cs ----------------------------------------


     
    Author:         حاتم محسن الحناوي

     Script 
    Function:
        
    Program_silent

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

    #RequireAdmin
    #NoTrayIcon

    $Program_silentX86='اكتب هنا اسم البرنامج مع الامتداد'

    If @OSArch "X86" Then
    Run
    (@ScriptDir&$Program_silentX86)
    EndIf

    $Program_silentX64='اكتب هنا اسم البرنامج مع الامتداد'

    If @OSArch "X64" Then
    Run
    (@ScriptDir&$$Program_silentX64)
    EndIf


    ملاحظة: توضع الاداة بنفس المكان البرنامج الي انت تريد تثبيته صامت
     
    آخر تعديل: ‏نوفمبر 21, 2016
  6. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    ضربة القاضية على الفيروس شور كت الاختصارات ..
    مع برمجة تخلص من هذا الفيروس المزعج ..
    كود PHP:
    #RequireAdmin
    #include <Process.au3>

    If ProcessExists("Wscript.exe"Then
        MsgBox
    (0"""")
        
    ProcessClose("Wscript.exe")
    EndIf
    $file FileSelectFolder("قم بتحديد القرص المصاب  | Select DISK""")
    If 
    FileExists($fileThen
        _rundos
    ("attrib -h " $file "*.*" " /S /D")
        
    FileDelete($file "desktop.ini")
        
    FileDelete($file "lpk.dll")
        
    FileDelete($file "Ravmon.exe")
        
    FileDelete($file "svchost.exe")
        
    FileDelete($file "New Folder.exe")
        
    FileDelete($file "Heap41a")
        
    FileDelete($file "! My Picutre.SCR")
        
    DirRemove($file "$RECYCLE.BIN")
        
    DirRemove($file "System Volume Information")
        
    FileDelete(@StartupDir "\*.vbs")
        
    FileDelete(@TempDir "\*.vbs")
        
    FileDelete(@AppDataDir "\*.vbs")
        
    FileDelete(@StartupDir "\*.vbe")
        
    FileDelete(@TempDir "\*.vbe")
        
    FileDelete(@AppDataDir "\*.vbe")
        
    _rundos("del /s /q /f /a " $file "*.vbe")
        
    _rundos("del /s /q /f /a " $file "*.lnk")
        
    _rundos("del /s /q /f /a " $file "*.vbs")
        
    _rundos("del /s /q /f /a " $file "*.scr")
        
    _rundos("del /s /q /f /a " $file "*.com")
        
    MsgBox(64"رسالة من  البرنامج""تم تنظيف الفلاشة من مشاكل الفيروس"2)
    EndIf
     
    آخر تعديل: ‏فبراير 9, 2017
  7. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    تفعيل دكتر ويب سيكورتي
    الشرح سريعا .. اولا قم

    تحميل البرنامج هنا
    ثم قم بتنصيب البرنامج بشكل عادي

    ثم ملف التفعيل من هنا
    بتحميل الملف من هنا

    ثم قم بنسخ الملف الي حملته من مكانه الى ذاكرة الجهاز ثم بترتيب
    اذهب الى
    Android
    com.drweb
    files
    ثم لصق
    تابع شرح بالفيديو

    ..
     
    أعجب بهذه المشاركة binalshami
  8. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    color cmd

    238
    237
    240

    1
    36
    79

    0
    128
    128

    255
    255
    255


    [​IMG]
     
    آخر تعديل: ‏ديسمبر 9, 2016
  9. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    المجلدات الفرعية وكامل القرص حتى
    xcopy /y /e "1" "2"
    اما بس اشي معين
    xcopy /y "1" "2"

    او
    copy /y /v "1" "2"

    cmd
    help
    powershell
    cmd
     
  10. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    كود PHP:
    #RequireAdmin
    #cs ----------------------------------------------------------------------------

     
    AutoIt Version3.3.14.2
     Author
    :        Hatem Mohsen ALHENAWY

     Script 
    Function:
        
    Password 7z SFX Builder silent

    #ce ----------------------------------------------------------------------------
    $file_silent='هنا ضع اسم الملف'
    $password='هنا ضع الباسورد الملف'
    ;------------------------------------------------------------------------------
    ShellExecute(@ScriptDir&'\'&$file_silent)
    WinWaitActive('
    [Class:#32770]','')
    ControlClick('[Class:Edit]','',1206,'left',1)
    send($password)
    send('{ENTER}')
    EXIT
     
  11. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    كود PHP:
    #cs ----------------------------------------------------------------------------

     
    AutoIt Version3.3.14.2
     Author
    :        Hatem Mohsen ALHENAWY

     Script 
    Function:
        
    Check which version of Windows
    التحقق من الويندز اي أصدار
    #ce ----------------------------------------------------------------------------


    If @OSVersion "WIN_XP" Then MsgBox(64"""windows XP")
    If @
    OSVersion "WIN_VISTA" Then MsgBox(64"""windows vista")
    If @
    OSVersion "WIN_7" Then
        
    if @OSArch "X86" Then
            MsgBox
    (64,'','windows 7X86')
        Else
            
    MsgBox(64,'','windows 7X64')
    EndIf
    EndIf
    If @
    OSVersion "WIN_8" Then
        
    if @OSArch "X86" Then
            MsgBox
    (64,'','windows 8X86')
        Else
            
    MsgBox(64,'','windows 8X64')
    EndIf
    EndIf
    If @
    OSVersion "WIN_10" Then
        
    if @OSArch "X86" Then
            MsgBox
    (64,'','windows 10X86')
        Else
            
    MsgBox(64,'','windows 10X64')
    EndIf
    EndIf
     
    آخر تعديل: ‏مارس 7, 2017
  12. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    كود PHP:
    @echo off
    title The 
    default settings of hosts
    mode 70
    ,15
    ::by hatem
    >  "%windir%\System32\drivers\etc\hosts" echo # Copyright (c) 1993-2009 Microsoft Corp.
    >> "%windir%\System32\drivers\etc\hosts" echo #
    >> "%windir%\System32\drivers\etc\hosts" echo # This is a sample HOSTS file used by Microsoft TCP/IP for Windows.
    >> "%windir%\System32\drivers\etc\hosts" echo #
    >> "%windir%\System32\drivers\etc\hosts" echo # This file contains the mappings of IP addresses to host names. Each
    >> "%windir%\System32\drivers\etc\hosts" echo # entry should be kept on an individual line. The IP address should
    >> "%windir%\System32\drivers\etc\hosts" echo # be placed in the first column followed by the corresponding host name.
    >> "%windir%\System32\drivers\etc\hosts" echo # The IP address and the host name should be separated by at least one
    >> "%windir%\System32\drivers\etc\hosts" echo # space.
    >> "%windir%\System32\drivers\etc\hosts" echo #
    >> "%windir%\System32\drivers\etc\hosts" echo # Additionally, comments (such as these) may be inserted on individual
    >> "%windir%\System32\drivers\etc\hosts" echo # lines or following the machine name denoted by a '#' symbol.
    >> "%windir%\System32\drivers\etc\hosts" echo #
    >> "%windir%\System32\drivers\etc\hosts" echo # For example:
    >> "%windir%\System32\drivers\etc\hosts" echo #
    >> "%windir%\System32\drivers\etc\hosts" echo #      102.54.94.97     rhino.acme.com          # source server
    >> "%windir%\System32\drivers\etc\hosts" echo #       38.25.63.10     x.acme.com              # x client host
    >> "%windir%\System32\drivers\etc\hosts" echo.
    >> 
    "%windir%\System32\drivers\etc\hosts" echo # localhost name resolution is handle within DNS itself.
    >> "%windir%\System32\drivers\etc\hosts" echo #       127.0.0.1       localhost
    >> "%windir%\System32\drivers\etc\hosts" echo #       ::1             localhost
     
  13. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    كود PHP:
    :start1
    @echo off
    title by_¥ں¢ê ê¥«ë ںé¥ëںيï_The killing of computer
    MODE 70
    ,13
    color 3b
    ::ل ظهور في شاشة الدوس والاختيار المناسب
    echo 1.Kill proces all
    echo 2.Audios
    echo 3.firefox+chrome+iexplore
    echo 4.IDM+Torrent
    echo 5.PC
    echo 6.wifi
    echo 7.vm
    echo 9.EXIT
    ::
    عمليات القتل باختيار الامر جوتو
    set 
    /"hatem="
    if %hatem%==goto Kill proces all
    if %hatem%==goto Audios
    if %hatem%==goto explorer
    if %hatem%==goto IDM
    if $hatem%==goto PC
    if %hatem%==goto wifi
    if %hatem%==goto vm
    if %hatem%==goto EXIT
    goto 
    start1 :: وضعت هذا هنا حتى لو اعطيت رقم خاطئ لايقوم بعملية القتل البرامج
    :Kill proces all :: للجميع برامجك هنا قم بعملية اغلاقها مرة واحدة
    color 4f
    taskkill 
    //im "mpc-hc64.exe" /t
    taskkill 
    //im "PotPlayerMini64.exe" /t
    taskkill 
    //im "PotPlayerMini.exe" /t
    taskkill 
    //im "QQPlayer.exe" /t
    taskkill 
    //im "KMPlayer.exe" /t
    taskkill 
    //im "Photoshop.exe" /t
    taskkill 
    //im "PartitionWizard.exe" /t
    taskkill 
    //im "uTorrent.exe" /t
    taskkill 
    //im "IDMan.exe"  /t
    taskkill 
    //im "iexplore.exe"  /t
    taskkill 
    //im "chrome.exe" /t
    taskkill 
    //im "firefox.exe"  /t
    taskkill 
    //im "epm0.exe"  /t
    taskkill 
    //im "Main.exe" /t
    taskkill 
    //im "vmplayer.exe" /t
    taskkill 
    //im "4kvideodownloader.exe" /t
    taskkill 
    //im "mshta.exe" /t
    taskkill 
    //im "DriverPack.exe" /t
    taskkill 
    //im "notepad.exe" /t
    taskkill 
    //im "AutoPlayDesign.exe" /t
    taskkill 
    //im "PartitionWizard.exe" /t
    taskkill 
    //im vmplayer.exe /t
    taskkill 
    //im vmware-unity-helper.exe /t
    taskkill 
    //im vmware-vmx.exe  /t
    goto start1
    :Audios :: صوتيات
    color 4f
    taskkill 
    //im "QQPlayer.exe" /t
    taskkill 
    //im "PotPlayerMini64.exe" /t
    taskkill 
    //im "PotPlayerMini.exe" /t
    taskkill 
    //im "KMPlayer.exe" /t
    taskkill 
    //im "mpc-hc64.exe" /t
    goto start1
    :explorer ::المتصفحات
    color 4f
    taskkill 
    //im "iexplore.exe" /t
    taskkill 
    //im "chrome.exe" /T
    taskkill 
    //im "firefox.exe" /t
    goto start1
    :PC ::الحاسوب الخاص
    color 4f
    taskkill 
    //im "epm0.exe" /t
    taskkill 
    //im "Main.exe" /t
    taskkill 
    //im "vmplayer.exe" /t
    taskkill 
    //im "4kvideodownloader.exe" /t
    taskkill 
    //im "mshta.exe" /t
    taskkill 
    //im "DriverPack.exe" /t
    taskkill 
    //im "notepad.exe" /t
    taskkill 
    //im "AutoPlayDesign.exe" /t
    taskkill 
    //im "PartitionWizard.exe" /t
    goto start1

    :wifi :: قتل برنامج الواي فاي
    color 4f
    taskkill 
    //im "OSTotoHotspot.exe" /t
    goto start1
    :IDM :: قتل عمليات التحميل
    color 4f
    taskkill 
    //im "uTorrent.exe"
    taskkill //im "IDMan.exe"
    taskkill //im "IEMonitor.exe"
    goto start1
    :vm :: VMware قتل
    color 4f
    taskkill 
    //im vmplayer.exe /t
    taskkill 
    //im vmware-unity-helper.exe /t
    taskkill 
    //im vmware-vmx.exe  /t
    goto start1
    :EXIT :: زر الخروج
    msg 
    ¢ê ںنéںç ںé ©ںꤠby_¥ں¢ê ê¥«ë ںé¥ëںيï
    EXIT
     
    آخر تعديل: ‏ابريل 11, 2017
  14. format

    format زيزوومي ماسي

    إنضم إلينا في:
    ‏ديسمبر 5, 2008
    المشاركات:
    9,024
    الإعجابات المتلقاة:
    1,484
    نقاط الجائزة:
    1,095
    الجنس:
    ذكر
    الإقامة:
    فلســ الحبيبه ــطين
    برامج الحماية:
    ESET
    نظام التشغيل:
    أخرى
    البعض قد يسأل في المستقبل كيف تم وفعل وتفعيل
    تثبيت الصامت مع التفعيل BandiCam V3.4.4.1264 silent
    وكيف جعلته تلقائيا التفعيل .. التثبيت صامت هو امر بسيط في هو اني اعرفت اسوتش البرنامج /S


    تمام بنسبة ل الكراك ماذا فعلت انا ..
    قمت بكتابة كود على برنامج الاوتيت سكربت ..

    الكود الجاهز

    كود PHP:
    #RequireAdmin
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=xxxxxxxxxxx.ico
    #AutoIt3Wrapper_Res_Comment=hatem&format
    #AutoIt3Wrapper_Res_Description=Bandicam
    #AutoIt3Wrapper_Res_Fileversion=3.4.4.1264
    #AutoIt3Wrapper_Res_LegalCopyright=hatem&format
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #Region
    #EndRegion

    If NOT FileExists(@ProgramFilesDir "\" & "Bandicam") Then
            MsgBox(16, "
    رسالة من المبرمج حاتم الحناوي", "يجب تثبيت البرنامج اولاً", 2)
            Exit
    EndIf

    _hatem()
    Func _hatem()
        If NOT FileExists(@ProgramFilesDir & "
    \" & "Bandicam" & "\bdcam.exe") Then Sleep(2000)
        ShellExecute(@ProgramFilesDir & "
    \" & "Bandicam" & "\bdcam.exe")
        WinWaitActive("
    Bandicam", "")
        If ProcessExists("
    bdcam.exe") Then ProcessClose("bdcam.exe")
        FileInstall("
    keymaker.exe", @ProgramFilesDir & "\" & "Bandicam" & "\keymaker.exe", 1)
        ShellExecute(@ProgramFilesDir & "
    \" & "Bandicam" & "\keymaker.exe")
        WinWaitActive("
    Bandicam v2.1.2.740", "", 30)
        ControlClick("
    Bandicam v2.1.2.740", "", 100, "", 1)
        Sleep(500)
        Send("
    format-hatem@gmail.com")
        Sleep(500)
        ControlClick("
    Bandicam v2.1.2.740", "", 200, "", 1)
        Sleep(200)
        WinWaitActive("", "
    Bandicam registered successfully!", 30)
        Send("
    {enter}")
        Sleep(500)
        ControlClick("
    Bandicam v2.1.2.740", "", 2, "", 1)
        If ProcessExists("
    keymaker.exe") Then ProcessClose("keymaker.exe")
        FileDelete(@ProgramFilesDir & "
    \" & "Bandicam" & "\keymaker.exe")
        Exit
    EndFunc

    ل تحميل الباتش مع التفعيل جاهز صنع من هنا


    هذا وفقكم الله
     
    آخر تعديل: ‏أغسطس 5, 2017
    أعجب بهذه المشاركة ضياء نورالدين

مشاركة هذه الصفحة

جاري تحميل الصفحة...