[Easy4ever]

معليش أخوي كنت متغيب يومين وماشفت الموضوع

بشوف عندي حل المشكلة وإذا ضبطت برد لك

جاري التجربة ..

[shado1796]

انشاء الله تلقالها حل .. عموما رد لي خبر ،،، ويعطيك العافية

[Easy4ever]

ماضبطت معي
بحثت في النت لقيت انه في حقل اسمه image :confused:
أنظر الشرح هنا

[shado1796]

Easy 4ever كتب :ماضبطت معي
بحثت في النت لقيت انه في حقل اسمه image :confused:
أنظر الشرح هنا

[COLOR="#FF0000"]
هل جربته ؟؟ :confused: ... انا سوف اجرب واوافيك بما يحدث ارجوا ان تكون معي جزاك الله خير[/COLOR]

[Easy4ever]

shado1796 كتب :

هل جربته ؟؟ :confused: ... انا سوف اجرب واوافيك بما يحدث ارجوا ان تكون معي جزاك الله خير

نعم ولاكن لم تفلح معي مع اني شفت الطريقه بالموقع إللي طرحته في المشاركة السابقة وشفتها إيضا بالموقع القديم الذي إغلق

هل عرفت الطريقة ؟!

[shado1796]

Easy 4ever كتب :نعم ولاكن لم تفلح معي مع اني شفت الطريقه بالموقع إللي طرحته في المشاركة السابقة وشفتها إيضا بالموقع القديم الذي إغلق

هل عرفت الطريقة ؟!

لم تضبط ! لم اجد الحل للان ،،، يمكن راح افتح موضوع في قسم قواعد البيانات انشاء الله

[Easy4ever]

أخي أنظر لهذا المثال للأخ sajad من هنا
في مشاركة رقم 16

[shado1796]

Easy 4ever كتب :أخي أنظر لهذا المثال للأخ sajad من هنا
في مشاركة رقم 16

اشكرك الف شكر لمساندتي في حل مشكلتي ،،،، جاري التجربة ...

[shado1796]

اخي حاولت اغير جلب الصورة من البرنامج الي في المثال الخاص بsajad وليس من خارج البرنامج يعني فتح صورة ،،، انا اريده ان يحفظ الصورة من البرنامج مثلا PictureBox46.image
وهذه هي اوامر المثال الخاص ب sajad

هذي اكواد التعريفات

كود :

Dim selec As String = "select * from users"
    Private sqlcon As SqlConnection
    Private sqladpt As SqlDataAdapter
    Private sqlbuilder As SqlCommandBuilder
    Private mytable As New DataTable()
    Private myset As DataSet
    Private row As DataRow
    Private m As MemoryStream

هذا الامر يستخدم لجلب الصورة والتحويل

كود :

OpenFileDialog1.Filter = "Image Filese|*.jpg;*.bmp;*.gif;*tiff;*png"
        OpenFileDialog1.ShowDialog()
        '''''''''''''''''''''''''''''''
        PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
        Dim img As Byte() = File.ReadAllBytes(OpenFileDialog1.FileName)
        m = New MemoryStream()
        m.Write(img, 0, img.Length)
        m.Flush()

هذا امر الحفظ

كود :

row = mytable.NewRow()
        row("id") = CInt(id_txt.Text)
        row("name") = name_txt.Text
        row("photo") = m.ToArray()
        mytable.Rows.Add(row)
        sqladpt.Update(mytable)

[COLOR="#FF0000"]
وايضا كيف اعرف ماذا وضع نوع الحقل في قاعدة البيانات ،،
ياليت تعدلي الكود على اساس اخذ الصورة من نفس البرنامج وتقولي نوع الحقل الي استخدمه
جزاك الله خير
[/COLOR]

[shado1796]

Up Up Up Up