1. أهلا وسهلاً بكم في :: IQ-TeaM FORUM :: .
    إذا كانت هذه الزيارة الأولى أو لديك الرغبة بالانضمام لأعضاء شبكة عراق تيم فيجب الاطلاع على خصوصية الشبكه فربما بقائك زائر افضل لك من الانضمام بحيث أن قوانين شبكة عراق تيم لا تتناسب مع اهتماماتك .
    • للأطلاع على الخصوصية وسياسة الاستخدام - التفاصيل
    • بعد الاطلاع على سياسة الموقع وقوانين شبكة عراق تيم يمكنك التسجيل معنا - تسجيل عضو جديد
    إستبعاد الملاحظة
الكاتب : M o H a N a D | المشاهدات : 650 | الردود : 30
  1. M o H a N a D مشرف

    الأنتساب:
    ‏1 أغسطس 2015
    المشاركات:
    241
    الإعجابات المتلقاة:
    8
    نقاط الجائزة:
    50
    الجنس:
    ذكر
    الإقامة:
    عٍاٌلِـمِـ لِـاٌ يٌـسُكُنه غَيٌـرُيٌـ
    نظام التشغيل:
    windows 8.1
    اللغة البرمجية:
    Visual Basic
    Facebook:



    [​IMG]
    [​IMG]
    [​IMG]
    [​IMG]
    اهلاآ بـكم جميعآ زوؤآر و أاعضأاء المنتدي العظيم .
    بعد أن شآهدت موضوع الآخ ȤōŘϴ " هنآ " فـكرت ان هو أفآد المنتدي بنسبة 50% ليش ما اكملها انا الي 100% :ُxe@:طبعاً فهمت الـفكرة من خلآل كلآمه و طورت الـفكرة و كتبت الـسورس و نجحت الـطريقة قولت متغلآش عليكوا :3
    أاذن نـدخل لكيفية برمجة الـبرنآمج .. [​IMG]
    [​IMG]
    الـشرح .
    [​IMG]
    1- ضـيف 1 بوتن Button .
    2- ضيف 1 Tixt Box .
    الآن اجعلها بهذآ الـشكل ( مثآل ) .

    [​IMG]
    دآخـل الـزر Button ضـع هذآ الـكود .
    كود:
    If ((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((Me.CyberTextBox1.Text = "servecounterstrike.com") Or (Me.CyberTextBox1.Text = "serveblog.net")) Or (Me.CyberTextBox1.Text = "servebeer.com")) Or (Me.CyberTextBox1.Text = "redirectme.net")) Or (Me.CyberTextBox1.Text = "no-ip.org")) Or (Me.CyberTextBox1.Text = "no-ip.info")) Or (Me.CyberTextBox1.Text = "no-ip.biz")) Or (Me.CyberTextBox1.Text = "myvnc.com")) Or (Me.CyberTextBox1.Text = "myftp.org")) Or (Me.CyberTextBox1.Text = "myftp.biz")) Or (Me.CyberTextBox1.Text = "hopto.org")) Or (Me.CyberTextBox1.Text = "bounceme.net")) Or (Me.CyberTextBox1.Text = "3utilities.com")) Or (Me.CyberTextBox1.Text = "workisboring.com")) Or (Me.CyberTextBox1.Text = "webhop.me")) Or (Me.CyberTextBox1.Text = "unusualperson.com")) Or (Me.CyberTextBox1.Text = "ufcfan.org")) Or (Me.CyberTextBox1.Text = "stufftoread.com")) Or (Me.CyberTextBox1.Text = "servesarcasm.com")) Or (Me.CyberTextBox1.Text = "servep2p.com")) Or (Me.CyberTextBox1.Text = "servehumour.com")) Or (Me.CyberTextBox1.Text = "serveexchange.com")) Or (Me.CyberTextBox1.Text = "securitytactics.com")) Or (Me.CyberTextBox1.Text = "securityexploit.com")) Or (Me.CyberTextBox1.Text = "read-books.org")) Or (Me.CyberTextBox1.Text = "quicksytes.com")) Or (Me.CyberTextBox1.Text = "privatizehealthinsurance.net")) Or (Me.CyberTextBox1.Text = "pointto.us")) Or (Me.CyberTextBox1.Text = "point2this.com")) Or (Me.CyberTextBox1.Text = "pgafan.net")) Or (Me.CyberTextBox1.Text = "noip.me")) Or (Me.CyberTextBox1.Text = "no-ip.net")) Or (Me.CyberTextBox1.Text = "no-ip.co.uk")) Or (Me.CyberTextBox1.Text = "no-ip.ca")) Or (Me.CyberTextBox1.Text = "nhlfan.net")) Or (Me.CyberTextBox1.Text = "nflfan.org")) Or (Me.CyberTextBox1.Text = "net-freaks.com")) Or (Me.CyberTextBox1.Text = "mysecuritycamera.org")) Or (Me.CyberTextBox1.Text = "mysecuritycamera.net")) Or (Me.CyberTextBox1.Text = "mysecuritycamera.com")) Or (Me.CyberTextBox1.Text = "mypax.net")) Or (Me.CyberTextBox1.Text = "mymedlapc.net")) Or (Me.CyberTextBox1.Text = "myeffect.net")) Or (Me.CyberTextBox1.Text = "mydissent.net")) Or (Me.CyberTextBox1.Text = "myactivedirectory.com")) Or (Me.CyberTextBox1.Text = "mmafan.biz")) Or (Me.CyberTextBox1.Text = "mlbfan.org")) Or (Me.CyberTextBox1.Text = "loginto.me")) Or (Me.CyberTextBox1.Text = "ilovecollege.info")) Or (Me.CyberTextBox1.Text = "hopto.me")) Or (Me.CyberTextBox1.Text = "homesecuritypc.com")) Or (Me.CyberTextBox1.Text = "homesecuritymac.com")) Or (Me.CyberTextBox1.Text = "health-careform.com")) Or (Me.CyberTextBox1.Text = "golffan.us")) Or (Me.CyberTextBox1.Text = "geekgalaxy.com")) Or (Me.CyberTextBox1.Text = "fantasyleague.cc")) Or (Me.CyberTextBox1.Text = "eating-organic.net")) Or (Me.CyberTextBox1.Text = "dynns.com")) Or (Me.CyberTextBox1.Text = "dvrcam.info")) Or (Me.CyberTextBox1.Text = "dnsiskinky.com")) Or (Me.CyberTextBox1.Text = "dnsfor.me")) Or (Me.CyberTextBox1.Text = "ditchyourip.com")) Or (Me.CyberTextBox1.Text = "ddns.net")) Or (Me.CyberTextBox1.Text = "ddns.me")) Or (Me.CyberTextBox1.Text = "damnserver.com")) Or (Me.CyberTextBox1.Text = "couchpotatofries.org")) Or (Me.CyberTextBox1.Text = "collegefan.org")) Or (Me.CyberTextBox1.Text = "ciscofreak.com")) Or (Me.CyberTextBox1.Text = "cable-modem.org")) Or (Me.CyberTextBox1.Text = "brasilia.me")) Or (Me.CyberTextBox1.Text = "blogsyte.com")) Or (Me.CyberTextBox1.Text = "zapto.org")) Or (Me.CyberTextBox1.Text = "sytes.net")) Or (Me.CyberTextBox1.Text = "servequake.com")) Or (Me.CyberTextBox1.Text = "servepics.com")) Or (Me.CyberTextBox1.Text = "servemp3.com")) Or (Me.CyberTextBox1.Text = "servehttp.com")) Or (Me.CyberTextBox1.Text = "servehalflife.com")) Or (Me.CyberTextBox1.Text = "servagame.com")) Or (Me.CyberTextBox1.Text = "serveftp.com")) Then
                MessageBox.Show("[ هذا الهوست موجود في موقع NO- IP ]", "Warning !!", MessageBoxButtons.OK, MessageBoxIcon.Asterisk)
            Else
                MessageBox.Show("[ هذا الهوست غير موجود في موقع NO- IP ]", "Warning !!", MessageBoxButtons.OK, MessageBoxIcon.Hand)
            End If
    *=== تحديد كود ===*
    الآن آجل اسم التيكست بوكس Tixtbox هذا الآسم .
    "
    CyberTextBox1 "
    لتصبح بهذا الشكل .

    [​IMG]


    الآن قـم بعمل حفظ للمشروع :ُ{age}:ُ
    [​IMG]
    صـورة للبرنأامج بعد انهاء العمل .
    [​IMG]
    [​IMG]
    .
    [​IMG]
    .
    [​IMG]
    [​IMG]
    [​IMG]


    A-R, Mr-Cancer و South Hack معجبون بهذا.
     
    Mohmaed و Dr Ali معجبون بهذا.
  2. M o H a N a D مشرف

    الأنتساب:
    ‏1 أغسطس 2015
    المشاركات:
    241
    الإعجابات المتلقاة:
    8
    نقاط الجائزة:
    50
    الجنس:
    ذكر
    الإقامة:
    عٍاٌلِـمِـ لِـاٌ يٌـسُكُنه غَيٌـرُيٌـ
    نظام التشغيل:
    windows 8.1
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    .. طلب من الآخوة المشرفين أاو المرآقبين التعديل ع الموضوع و حذف " A-R, Mr-Cancer و South Hack معجبون بهذا. " سوري خطأا بدون قصد ..
     
  3. جـعـفـر الـشـمـري DeveloPer Plus

    الأنتساب:
    ‏26 أغسطس 2015
    المشاركات:
    526
    الإعجابات المتلقاة:
    9
    نقاط الجائزة:
    50
    الإقامة:
    العراق
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    YouTube:
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    بارك الله بيك
     
  4. M o H a N a D مشرف

    الأنتساب:
    ‏1 أغسطس 2015
    المشاركات:
    241
    الإعجابات المتلقاة:
    8
    نقاط الجائزة:
    50
    الجنس:
    ذكر
    الإقامة:
    عٍاٌلِـمِـ لِـاٌ يٌـسُكُنه غَيٌـرُيٌـ
    نظام التشغيل:
    windows 8.1
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    .. شكراً لـك
    تسلم عالمرور ..
     
  5. ȤōŘϴ DeveloPer Plus

    الأنتساب:
    ‏24 أكتوبر 2014
    المشاركات:
    303
    الإعجابات المتلقاة:
    6
    نقاط الجائزة:
    50
    نظام التشغيل:
    windows 8.1
    اللغة البرمجية:
    Visual Basic
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    بارك الله فيك اخي بانتظار تطوير البرنامج ,

    [​IMG]
     
  6. M o H a N a D مشرف

    الأنتساب:
    ‏1 أغسطس 2015
    المشاركات:
    241
    الإعجابات المتلقاة:
    8
    نقاط الجائزة:
    50
    الجنس:
    ذكر
    الإقامة:
    عٍاٌلِـمِـ لِـاٌ يٌـسُكُنه غَيٌـرُيٌـ
    نظام التشغيل:
    windows 8.1
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    انشالله الآعضاء يطورونه للآفضل [​IMG]
    فرحآن أانت :{14}:​
     
  7. ᎷᎥᏁᎯ ᎷᎯᏃᎬᏁ Developer

    الأنتساب:
    ‏26 فبراير 2015
    المشاركات:
    58
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    30
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    شرح جميل شكرا اخى على هذا الموضوع الجميل
    استمر يا بطل
     
  8. سكيورتي ارهابي ExpErt DeveloPer

    الأنتساب:
    ‏1 سبتمبر 2014
    المشاركات:
    701
    الإعجابات المتلقاة:
    48
    نقاط الجائزة:
    75
    الوظيفة:
    ماكسي مول
    الإقامة:
    دوله العراق العظيم
    نظام التشغيل:
    Linux
    اللغة البرمجية:
    Visual Basic
    Facebook:
    YouTube:
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    وعليكم السلام بارك الله بيك حبيبي


    تطوير ملحوض جيدا احسنت


    تحيه لك
     
  9. Windows Hacker V • I • P

    الأنتساب:
    ‏26 يوليو 2014
    المشاركات:
    636
    الإعجابات المتلقاة:
    14
    نقاط الجائزة:
    50
    الإقامة:
    |[ Occupied Bahrain ]|
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    عآشت آيدك آخي َ..

    و لكنّ وجب آلتنويه إن آلبرنآمج لآ يتحقق إن كآن وهمي آم لآ
    فقط يتحقق آذآ كآن آلهوست مرتبط بآلنو آيبي


    و ليس إن كآن حقيقي آم لآ


    :{3!}::{1!}:
     
  10. M o H a N a D مشرف

    الأنتساب:
    ‏1 أغسطس 2015
    المشاركات:
    241
    الإعجابات المتلقاة:
    8
    نقاط الجائزة:
    50
    الجنس:
    ذكر
    الإقامة:
    عٍاٌلِـمِـ لِـاٌ يٌـسُكُنه غَيٌـرُيٌـ
    نظام التشغيل:
    windows 8.1
    اللغة البرمجية:
    Visual Basic
    Facebook:
    رد: كـيـف تـبـرمـج Host Sniper مثل بـرنآمج الآخ ȤōŘϴ .

    .. شكراً علي مرورك
    نورتني و الله ..
     

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