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

    عضو منذ:
    ‏8 يناير 2014
    عدد المشاركات:
    1,126
    الإعجابات المتلقاة:
    1,786
    نقاط الجائزة:
    255
    الإقامة:
    || Iraq ||
    نظام التشغيل:
    windows 8.1

    [​IMG]

    » الصلاة و السلام على أشرف المرسليـن ...~
    » الحمد لله وحده نحمده و نشكره و نستعينه و نستغفره و نعود بالله من شرور أنفسنا و من سيئات اعمالنا ...~
    » من يهده الله فلا مضل له و من يضلل فلن تجد له ولياً مرشدا ...~
    » و أشهد ألا إله إلا الله وحده لا شريك له و أن محمداً عبده و رسوله صلى الله عليه و سلم ...~
    » وعلى آله و صحبه أجمعين و من تبعهم بإحسان إلى يوم الدين ...~
    » ربنا لا علم لنا إلا ما علمتنا إنك أنت العليم الخبير ...~
    » ربنا لا فهم لنا إلا ما فهمتنا إنك أنت الجواد الكريم ...~
    » ربي اشرح لي صدري و يسر لي أمري و احلل عقدة من لساني يفقهوا قولي ...~


    [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    [ ~.. نفتحٌ فرومٌ جديدُ ..~ ]

    [​IMG]

    [ ~.. آتبعُ آلخطوآت آلتآلية ..~ ]

    [​IMG]

    [ ~.. نضيفُ آلآنُ كلآ منُ ..~ ]

    3 تكسًت بوكسْ..
    1 بْوتونً.


    [​IMG]

    [ ~.. نغيرُ آسمآءُ كلُ منهآ ، ندخلُ علىُ زرُ آلدخولُ ..~ ]

    [​IMG]

    [ ~.. نلصقُ آلكودُ آلمرفقُ ..~ ]

    [​IMG]

    Dim wc = New Net.WebClient()
    Dim utf8 = New UTF8Encoding

    'By Snharib'
    'Iq-Team'


    Dim page As String = utf8.GetString(wc.DownloadData("http://dynupdate.no-ip.com/dns?username=" & TextBox1.Text & "&password=" & TextBox2.Text & "&hostname=" & TextBox3.Text))
    ' MsgBox(status(1))
    Dim texter() As String = page.Split(":")
    RichTextBox1.Text = texter(1)
    If texter(1).Contains("0") Then
    MsgBox("Success - IP address is current, no update performed", MsgBoxStyle.Information)
    End If
    If texter(1).Contains("1") Then
    MsgBox("Success - DNS hostname update successful", MsgBoxStyle.Information)

    End If
    If texter(1).Contains("2") Then

    MsgBox("Error - Hostname supplied does not exist", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("3") Then
    MsgBox("Error - Invalid username", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("4") Then
    MsgBox("Error - Invalid password", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("5") Then
    MsgBox("Error - Too many updates sent. Updates are blocked until 1 hour passes since last status of 5 returned.", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("6") Then
    MsgBox("Error - Account disabled due to violation of No-IP terms of service. Our terms of service can be viewed at http://www.no-ip.com/legal/tos", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("7") Then
    MsgBox("Error - Invalid IP. Invalid IP submitted is improperly formated, is a private LAN RFC 1918 address, or an abuse blacklisted address.", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("8") Then
    MsgBox("Error - Disabled / Locked hostname", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("9") Then
    MsgBox("Host updated is configured as a web redirect and no update was performed.", MsgBoxStyle.Information)
    End If
    If texter(1).Contains("10") Then
    MsgBox("Error - Group supplied does not exist", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("11") Then
    MsgBox("Success - DNS group update is successful", MsgBoxStyle.Information)
    End If
    If texter(1).Contains("12") Then
    MsgBox("Success - DNS group is current, no update performed.", MsgBoxStyle.Information)
    End If
    If texter(1).Contains("13") Then
    MsgBox("Error - Update client support not available for supplied hostname or group", MsgBoxStyle.Critical)

    End If
    If texter(1).Contains("14") Then
    MsgBox("Error - Hostname supplied does not have offline settings configured. Returned if sending offline=YES on a host that does not have any offline actions configured.", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("99") Then
    MsgBox("Error - Client disabled. Client should exit and not perform any more updates without user intervention.", MsgBoxStyle.Critical)
    End If
    If texter(1).Contains("100") Then
    MsgBox("Error - User input error usually returned if missing required request parameters", MsgBoxStyle.Critical)
    End If



    [ ~.. نكتبُ آلكودُ آلتآليُ ..~ ]

    [​IMG]

    [ ~.. ستلآحظُ يوجدُ خطآءُ تستطيعُ آلسطيرة علية من خلآلُ آضآفة تكستُ بوكسُ..~ ]

    [​IMG]

    [ ~.. بعدُ آلتحديدُ علىُ آلتكستُ بوكسُ آكتبُ آلتآليُ ..~ ]

    [​IMG]

    [ ~.. ولآخفآئة آتبعُ آلآتيُ لآنة ليسُ مهمُ ..~ ]

    [​IMG]

    [ ~.. نحددُ علىُ تكستُ آلبآسووردُ لآخفآئة ..~ ]

    [​IMG]

    [ ~.. نضعُ [ * ] لآخفآئة علىُ شكلُ نجومُ ..~ ]

    [​IMG]

    [ ~.. كمآ شآهدنآ ظهرٌ علىَ شكلُ نجومُ ..~ ]

    [​IMG]

    [ ~.. آلصورُ آلتآلية تدلُ علىُ بيآنآت غيرُ صحيحة ..~ ]

    [​IMG]

    [ ~.. آلصورُ آلتآلية تدلُ علىُ بيآنآت صحيحة ..~ ]

    [​IMG]

    !

    آنتهى ـآ

     
    5 شخص معجب بهذا.
    جاري تحميل الصفحة...
  2. &الكنك&
    V • I • P

    عضو منذ:
    ‏27 أغسطس 2012
    عدد المشاركات:
    345
    الإعجابات المتلقاة:
    29
    نقاط الجائزة:
    75
    الوظيفة:
    ملازم في الجيش العراقي
    الإقامة:
    العراق
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    YouTube:
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    مبدع ابو حسين :{14}:
     
  3. ●¦ Snharib ¦●
    V • I • P

    عضو منذ:
    ‏8 يناير 2014
    عدد المشاركات:
    1,126
    الإعجابات المتلقاة:
    1,786
    نقاط الجائزة:
    255
    الإقامة:
    || Iraq ||
    نظام التشغيل:
    windows 8.1
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    منور حبيبي. )5:"
     
    1 person likes this.
  4. X104
    rank
    Developer

    عضو منذ:
    ‏29 يناير 2014
    عدد المشاركات:
    7
    الإعجابات المتلقاة:
    1
    نقاط الجائزة:
    15
    نظام التشغيل:
    windows 7
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    واللهً عاشت ايدك

    من زمان ادورً شرح :(

    ماذا تعتقد في مشاركة Snharib؟
    يعجبني ويستحق التقييم
     
  5. ТUЯКł ΛŁ HΛЯБł
    DeveloPer Plus

    عضو منذ:
    ‏17 يوليو 2012
    عدد المشاركات:
    109
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    40
    الوظيفة:
    طآلب جآمعي :(
    الإقامة:
    السعودية
    نظام التشغيل:
    windows 8
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    بارك الله فيك اخي

    مبدع :{14}:
     
  6. Ø2 - ĦÂĈҚЄR
    rankrank
    DeveloPer Plus

    عضو منذ:
    ‏26 أكتوبر 2012
    عدد المشاركات:
    60
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    20
    الوظيفة:
    NoN!!!!
    الإقامة:
    O2
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    ; وعليكم السلام ورحمة الله ;

    شكرا حبيبي بارك الله فيك

    موضوع رائع وتنسيق رائع

    موفق اخي :{1}:
     
  7. ●¦ Snharib ¦●
    V • I • P

    عضو منذ:
    ‏8 يناير 2014
    عدد المشاركات:
    1,126
    الإعجابات المتلقاة:
    1,786
    نقاط الجائزة:
    255
    الإقامة:
    || Iraq ||
    نظام التشغيل:
    windows 8.1
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    منورينً ..

    :{17}:
     
    1 person likes this.
  8. مـ☻ـجـ☻ـآهـ☻ـد <span style="background-color: #E0921B"><span styl
    DeveloPer Plus

    عضو منذ:
    ‏30 مارس 2012
    عدد المشاركات:
    146
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    40
    الإقامة:
    {ĜäŽã}
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    بآرك الله فيك اخوي جاري الاطلاع على الكود ’, )5:"
     
  9. تــــركــــي
    DeveloPer Plus

    عضو منذ:
    ‏25 ابريل 2012
    عدد المشاركات:
    165
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    40
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    مشكور بارك الله فيك في ميزان حسناتك
     
  10. Tej HAcKEr
    DeveloPer Plus

    عضو منذ:
    ‏15 ديسمبر 2011
    عدد المشاركات:
    116
    الإعجابات المتلقاة:
    3
    نقاط الجائزة:
    50
    الوظيفة:
    hacker
    الإقامة:
    Tunisia
    نظام التشغيل:
    Unix
    رد: [ شرحً ] عملً نوأي بيْ فيً برنامجً الأختراقً | Vb.Net] Add No-Ip To RaT]

    مشكوررررررر

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

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

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