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

    عضو منذ:
    ‏2 يوليو 2016
    عدد المشاركات:
    20
    الإعجابات المتلقاة:
    10
    نقاط الجائزة:
    15
    الإقامة:
    Ksa
    السلام عليكم ورحمه الله وبركاته

    كيفكم اعضاء عراق تيم
    اليوم اول مشاركه لي ف المنتدى

    اتيت اليكم ب شرح عمل برنامج تحويل السيرفر الى خورازميات

    رابط الشرح على اليوتيوب

    الخورازميه gzip

    كود:
    Imports System.IO.Compression
    Imports System.IO
    
    Public Class Compression
    
        Public Shared Function Compress(ByVal bytData() As Byte) As Byte()
            Using oMS As New MemoryStream()
                'GZip object that compress the file
                Using oGZipStream As New GZipStream(oMS, CompressionMode.Compress)
                    'Write to the Stream object from the buffer
                    oGZipStream.Write(bytData, 0, bytData.Length)
                    oGZipStream.Close()
                    ReDim bytData(oMS.ToArray.Length - 1)
                    bytData = oMS.ToArray
                End Using
                oMS.Close()
            End Using
            Return bytData
        End Function
    
        Public Shared Function Decompress(ByVal bytData() As Byte) As Byte()
            Using oMS As New MemoryStream(bytData)
                Using oGZipStream As New GZipStream(oMS, CompressionMode.Decompress)
                    Const CHUNK As Integer = 1024
                    Dim intTotalBytesRead As Integer = 0
                    Do
                        ' Enlarge the buffer.
                        ReDim Preserve bytData(intTotalBytesRead + CHUNK - 1)
                        ' Read the next chunk.
                        Dim intBytesRead As Integer = oGZipStream.Read(bytData, intTotalBytesRead, CHUNK)
                        intTotalBytesRead += intBytesRead
                        ' See if we're done.
                        If intBytesRead < CHUNK Then
                            ' We're done. Make the buffer fit the data.
                            ReDim Preserve bytData(intTotalBytesRead - 1)
                            Exit Do
                        End If
                    Loop
                    oGZipStream.Close()
                End Using
                oMS.Close()
            End Using
            Return bytData
        End Function
    
    End Class
    اهداء الى
    Screeam
    Dr.srag
     
    جاري تحميل الصفحة...
  2. FLASH
    rank
    New Developer

    عضو منذ:
    ‏2 يوليو 2016
    عدد المشاركات:
    20
    الإعجابات المتلقاة:
    10
    نقاط الجائزة:
    15
    الإقامة:
    Ksa
  3. Mira Mrmr .::|| زهره منتدى عراق تيم ||::.
    V • I • P

    عضو منذ:
    ‏9 يوليو 2015
    عدد المشاركات:
    644
    الإعجابات المتلقاة:
    132
    نقاط الجائزة:
    105
    الجنس:
    أنثى
    الإقامة:
    Baghdad
    نظام التشغيل:
    windows 8.1
    Facebook:
    YouTube:
  4. FLASH
    rank
    New Developer

    عضو منذ:
    ‏2 يوليو 2016
    عدد المشاركات:
    20
    الإعجابات المتلقاة:
    10
    نقاط الجائزة:
    15
    الإقامة:
    Ksa
    نورتي
     
  5. Ameer Eagle V.I.P
    طاقم الإدارة

    عضو منذ:
    ‏7 يونيو 2014
    عدد المشاركات:
    2,922
    الإعجابات المتلقاة:
    2,777
    نقاط الجائزة:
    555
    الجنس:
    ذكر
    الوظيفة:
    Student
    الإقامة:
    IraQ
    نظام التشغيل:
    windows 7
  6. FLASH
    rank
    New Developer

    عضو منذ:
    ‏2 يوليو 2016
    عدد المشاركات:
    20
    الإعجابات المتلقاة:
    10
    نقاط الجائزة:
    15
    الإقامة:
    Ksa
    تعيش ايامك حبيبي
     
  7. مسہہٰتہہٰر بٰٰرايہٰمر ᎿᎻᎬ ᏞᎥᏫᏁ
    موقوف لمخالفة الشروط

    عضو منذ:
    ‏1 فبراير 2016
    عدد المشاركات:
    246
    الإعجابات المتلقاة:
    53
    نقاط الجائزة:
    75
    الجنس:
    ذكر
    الوظيفة:
    طالب
    الإقامة:
    العراق
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Visual Basic
    Facebook:
    YouTube:
  8. FLASH
    rank
    New Developer

    عضو منذ:
    ‏2 يوليو 2016
    عدد المشاركات:
    20
    الإعجابات المتلقاة:
    10
    نقاط الجائزة:
    15
    الإقامة:
    Ksa
    تعيش ايامك ياعيني
     
  9. Dr.SYMLINK
    rank
    Developer

    عضو منذ:
    ‏4 يناير 2015
    عدد المشاركات:
    30
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    30
    نظام التشغيل:
    windows 7
    اللغة البرمجية:
    Python
    مجهوود رائع بارك الله فيك ياغالي
     
  10. Mohmaed اداري شؤون الاعضاء
    طاقم الإدارة

    عضو منذ:
    ‏12 ابريل 2015
    عدد المشاركات:
    821
    الإعجابات المتلقاة:
    707
    نقاط الجائزة:
    515
    الإقامة:
    IRAQ
    نظام التشغيل:
    wifite
    اللغة البرمجية:
    Visual Basic
    مبدع موضوع متعوب عليه
    شكرا لك على مجهودك يغالي
     
حالة الموضوع:
مغلق

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

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