سؤال خاص بالفيديو الاوديو وتحويلها الي مصفوفه (011000010 ) واضافتها ال قاعدة بيانات sql server

لا يفضل حفظ ملفات الصور والصوت والفيديو في قاعدة البيانات سحتاج الي مساحة كبيرة ويهدد قاعدة البيانات بسبب البطء يفضل وضعها في القرص الصلب وحفظ مسار الملف في قاعدة البيانات

الاستاذ الفاضل karimSoft اولا اشكرك جزيل الشكر علي سرعة الاستجابه

ثانيا انا لا ارغب في حفظ الملف كفيديو او صوت كما هو بل اريد الزر ان يقوم بتحويل الملف الي نص بصيغة 01000101000101110 وهكذا ثم يحفظ النص في قاعدة البيانات وبذلك نتلاشي كبر حجم الملف وقاعدة البيانات

ثم عند استدعاء النص 0010110010 يتم تحوله الي ملف فيديو او صوت كما كان مره اخري وحفظه في الهارد

هل وصلت حضرتك الفكره

UP UP

يا شباب طيب حد يعبرني بس ويقولي انت سؤالك مش مفهوم او ما تطلب مستحيل او الموضوع صعب اسأل في منتدي كذا الاجنبي !!!!

ارجو الاهتمام لان مشروعي متوقف علي هذه النقطه فقط

bambeno_fox_7 كتب:

يا شباب طيب حد يعبرني بس ويقولي انت سؤالك مش مفهوم او ما تطلب مستحيل او الموضوع صعب اسأل في منتدي كذا الاجنبي !!!!

 

ارجو الاهتمام لان مشروعي متوقف علي هذه النقطه فقط

السلام عليكم ...

1. يمكن قراءة أي ملف كبايتات :

   byte[] test = File.ReadAllBytes("d:/1.png");

    الآن كل كل عنصر بالمصفوفة test  يمثل عدد صحيح من 0 إلى 255 و يمكن تحويله لنص من الأصفار و الواحدات كمايلي : 

    byte[] test = File.ReadAllBytes("d:/1.png");            for(int i = 0 ; i < test.Length ; i++)                Console.WriteLine(test + "= " +  Convert.ToString(test ,2));

    الأصفار على الشمال سيتم تجاهلها , يمكنك معالجة ذلك ..

2. أو جرب هذا الكود :

    byte[] bytes = System.IO.File.ReadAllBytes("d:/1.png");
               System.Collections.BitArray bits = new System.Collections.BitArray(bytes);
   
               for (int counter = 0; counter < bits.Length; counter++)
               {
                   Console.Write(bits[counter] ? "1" : "0");
                   if ((counter + 1) % 8 == 0)
                       Console.WriteLine();
               }

    

اولا اشكرك استاذ حسام علي الاهتمام والرد ولكن لم استطع تطبيق الاكواد علي مشروعي فهل من الممكن ان تمدني بمثال او ان ارسل لك نسخه من الفورم التي لدي وتضع لي الاكواد بها حتي استطيع فهمها والتعامل معها علما بأن هذه النقطه هي اساس مشروعي والمشروع شبه مكتمل ومتوقف عليها ولك جزيل الشكر مره اخري

السلام عليكم ..

صديقي ... ضع الكود في حدث الــ Click لأي Button  و سيعمل مباشرة .... بهذا تكون قد صنعت مثالا .

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

اخي العزيز انت ممكن تستعمل هذه الطريقة البسيطة التالية

عند جلب الملف من OpenDialog تأخذ المسار الخاص بالملف وتحفظة في متغير StreamReader كالاتي

  Dim SR As IO.StreamReader
        
        o.ShowDialog()
        SR = New IO.StreamReader(o.FileName)
      datarow("ColumnName)=  SR.ReadToEnd()

ثم تحفظة في قاعدة البيانات بالطريقة المعتاده في العمود ميديا الخاص به وانا افترضت انك متصل بقاعدة البياناات

ثانيا اذا اردت جلت الميديا من هذا العمود الخاص بها في قاعدة البيانات وتشغيلة في الميديا بلير الخاص ببرنامجك اتبع الطريقة البسيطة الاتيه :

انشئ دالة ترجع بنوع الميديا التي تريدها لتشغيلها وليكن في مثالنا صورة كالاتي

 وانا افترضت انك متصل بقاعدة بيانات اوراكل

 Public Function Get_Media() As Bitmap                '02/04/2013 (Hisham saad)
        Dim _cmd As New OracleCommand
        Dim _ad As New OracleDataAdapter
        Dim _dt As New DataTable

        Get_Media= Nothing

        _cmd.Connection = ConnectionStr.connString
        _cmd.CommandType = CommandType.Text
        _cmd.CommandText = "select cmcd, cmpic from accmp"
        _ad.SelectCommand = _cmd
        _ad.Fill(_dt)


        If _dt.Rows.Count > 0 Then
            If Not IsDBNull(_dt.Rows(0)(1)) Then
                Dim Blob As Byte() = _dt.Rows(0)(1)
                Dim FSM As New MemoryStream(Blob)

                Return Image.FromStream(FSM)
            End If
        End If

    End Function

بعد ذلك اظن انك تعلم ما عليك فعله بالقيمة التي رجعت من الدالة

اتمني ان اكون افدتك