تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
دمج ملف exe مع صورة وإظهار الصورة
#1
إخواني أخواتي أقدم لكم مشروع كامل ، وهو منقول لدمج صورة مع ملف تنفيذي وفك التجميع في أي وقت

لكن أخواتي كود فك التجميع يعمل إذا كان حجم العمل غير كبير ، أما إذا كان أكثر من 50 ميغا فإنه يتوقف

أرجو المساعدة في تطوير كود فك التجميع..

وهذا رابط تحميل المشروع:
http://up.dev-point.com/downloadf-f89119...1-rar.html

وهذا كود فك التجميع ، أرجو من الإخوة تطويره
كود :
Try
            'تحويل بايتات الملف المدموج الى سترنج لعمل سبلت وفصل الملفين
            Dim x_byt As String = Encoding.GetEncoding(437).GetChars(main_by)
            Dim file_spl As [String]()
            'عمل سبلت ل =======\=======
            Dim spl_chrs As String() = {"=======\======="}
            file_spl = x_byt.Split(spl_chrs, StringSplitOptions.None)
            'فصل الملفين وتحويلهم الى بايتات
            img_by = Encoding.GetEncoding(437).GetBytes(file_spl(0))
            exe_by = Encoding.GetEncoding(437).GetBytes(file_spl(1))
            'نسخ الملفين ف المكان المحدد
            Dim y As FileInfo = New FileInfo(TextBox1.Text)
            File.WriteAllBytes(FolderBrowserDialog1.SelectedPath & "\" & y.Name, img_by)
            File.WriteAllBytes(FolderBrowserDialog1.SelectedPath & "\ex.mp4", exe_by)
            MsgBox("تم فك الدمج بنجاح", MsgBoxStyle.Information)
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  حفظ صورة الموظف في جدول مستقل أبووسم 3 179 18-11-16, 03:56 PM
آخر رد: أبووسم
  [VB.NET] كيفية تحميل صورة من قاعدة بيانات اكسس 2010 نوريس 2 104 09-11-16, 12:32 PM
آخر رد: نوريس
  [VB.NET] اريد إضافة صورة للموظف في جدول أخر بنفس قاعدة البيانات أبووسم 8 263 05-11-16, 12:00 PM
آخر رد: Adrees
  ;كيف اضع صورة لخلفية ريتش بوكس samira20 3 129 27-10-16, 07:22 AM
آخر رد: samira20
Information [VB.NET] طريقة عمل مربع حوار يعمل على ادخال صورة إلى قاعدة البيانات thevirus 1 73 24-10-16, 01:49 PM
آخر رد: Adrees
Smile [VB.NET] كيف يمكن عمل كشف حساب بشكل تفصيلي مرفق صورة توضيحية MH mekawy 0 106 16-10-16, 07:12 PM
آخر رد: MH mekawy
  هام وعاجل .... كيف يمكن عمل كشف حساب بشكل تفصيلي مرفق صورة توضيحية MH mekawy 0 134 16-10-16, 04:40 PM
آخر رد: MH mekawy
  [سؤال] عرض صورة في كريستال ريبورت crystal repoet اليوم مبتدئة وغداً محترفة 2 114 07-10-16, 06:59 AM
آخر رد: اليوم مبتدئة وغداً محترفة
  [سؤال] اظهار الصورة naden 3 146 03-10-16, 08:58 AM
آخر رد: silverlight
  [سؤال] تحريك الصورة naden 3 109 02-10-16, 01:13 AM
آخر رد: ممدوح

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم