تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] استفسار بخصوص تحميل الصورة الى قاعدة البيانات
#1
السلام عليكم ورحمة الله

اريد اقوم بتحميل الصورة الى قاعدة البيتانات

بحثت كثير عن اي طريقه اغلبها ما مشى معاي 

انا استخدم قاعدة بيانات
SQLite


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

حتى لو اقوم بتنزيل الصورة في القاعده وفي فولدر خاص في البرنامج
ومن ثم عرضها  في فورم اخر

افيدوني بارك الله فيكم

وشكرا
الرد
تم الشكر بواسطة:
#2
SQLite
اليس هذا النوع للجوالات؟
وان كان يوجد للكمبيوتر فهل يمكن تدلني على رابط للتحميل لكي اجرب واساعد من يحتاج اذا شاء الله تعالى.
الرد
تم الشكر بواسطة: muharam , muharam , dubai.eig , dubai.eig
#3
(09-12-20, 12:52 AM)dubai.eig كتب : السلام عليكم ورحمة الله

اريد اقوم بتحميل الصورة الى قاعدة البيتانات

بحثت كثير عن اي طريقه اغلبها ما مشى معاي 

انا استخدم قاعدة بيانات
SQLite


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

حتى لو اقوم بتنزيل الصورة في القاعده وفي فولدر خاص في البرنامج
ومن ثم عرضها  في فورم اخر

افيدوني بارك الله فيكم

وشكرا

(09-12-20, 04:14 AM)سعود كتب : SQLite
اليس هذا النوع للجوالات؟
وان كان يوجد للكمبيوتر فهل يمكن تدلني على رابط للتحميل لكي اجرب واساعد من يحتاج اذا شاء الله تعالى.

اخي سعود

هذا الرابط يعرض الاصدارات المختلفه للمكتبه System.Data.SQLite.dll التي تحتاج اضافتها للمشروع
https://system.data.sqlite.org/index.htm...loads.wiki
بعد تنزيلها تحتاج منها فقط ملف المكتبه System.Data.SQLite.dll

في قاعدة البيانات SqLite يكون نوع بيانات الصوره BLOB ثم يتم التعامل مثل الاكسس والاسكيوال ك بيناري
هذا مثال
كود :
Dim ms As New IO.MemoryStream
PictureBox1.Image.Save(ms, Imaging.ImageFormat.Jpeg)
Dim b() As Byte = ms.GetBuffer()
Dim cmd As New SQLiteCommand("Insert Into table1(photo) values(@phpto)", con)
cmd.Parameters.AddWithValue("@phpto", b)

con.Open()
cmd.ExecuteNonQuery()
con.Close()

ومحرر SqLite اسمه DB Browser for SQLite يمكنك تنزيله من هذا الرابط
https://sqlitebrowser.org/dl
الرد
تم الشكر بواسطة: dubai.eig , سعود
#4
السلام عليكم
أنا دائما استخدم قاعدة بيانات sqlite3 مع فيجوال بيسك لأنها أفضل وأقوى من الاكسس 
بالنسبة لعرض الصور أو حفظها فهو لا يختلف عن قواعد البيانات الأخرى
هذا كود لعرض الصورة
PHP كود :
Try
 
           If Not IsDBNull(dt.Rows(0)("pic")) Then
                Dim img
() As Byte dt.Rows(0)("pic")
 
               Dim ms As New MemoryStream(img)
 
               picbox.Image Image.FromStream(ms)
 
           Else
                picbox
.Image Image.FromFile(Application.StartupPath "\nopic.png")
 
           End If
 
       Catch ex As Exception
            MsgBox
(ex.Message)
 
       End Try 

وهذا كود حفظ الصورة

PHP كود :
Try
 
   If Not IsDBNull(dt.Rows(0)("pic")) Then
        Dim img
() As Byte dt.Rows(0)("pic")
 
       Dim ms As New MemoryStream(img)
 
       picbox.Image Image.FromStream(ms)
 
   Else
        picbox
.Image Image.FromFile(Application.StartupPath "\nopic.png")
 
   End If
    
    
    
Dim cmd As New SQLiteCommand("insert into table (id, pic) values(@id,@pic) where id=@id"Con)
    
cmd.Parameters.AddWithValue("@pic"arrpic)

 
   Con.Open()
 
   cmd.ExecuteNonQuery()
 
   MsgBox("تمت العملية بنجاح ")
 
   Catch ex As Exception
            MsgBox
(ex.Message)
End Try 
الرد
تم الشكر بواسطة: dubai.eig


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] استفسار abomandel 3 108 15-04-21, 12:12 PM
آخر رد: abomandel
  [VB.NET] الكود المكافئ لعرض أسماء الجداول فى قاعدة البيانات mmaalmesry 3 176 08-04-21, 07:24 PM
آخر رد: mmaalmesry
  [VB.NET] اضافة البيانات من الداتاتابل الي الداتابيز احمد 2021 0 88 05-04-21, 11:10 PM
آخر رد: احمد 2021
  [VB.NET] نقل البيانات من الكمبو الي التريفيو احمد 2021 11 295 05-04-21, 03:28 AM
آخر رد: messry
  حفظ list box في قاعدة البيانات اعينوني,,,,,,, KIKO1992 1 373 04-04-21, 03:45 AM
آخر رد: messry
  حفظ الصورة و تبديلها بالأخرى محمد خيري 7 236 01-04-21, 03:00 PM
آخر رد: messry
  [VB.NET] سؤال بخصوص الطباعة M.SOFT 0 115 20-03-21, 10:10 PM
آخر رد: M.SOFT
  [سؤال] سؤال عن ListView و الربط مع قاعدة البيانات alims 1 196 18-03-21, 01:59 AM
آخر رد: alims
  ارجو المساعدة في عرض البيانات على التاتا جرد فيو moahmed.abdelmohsen 1 229 15-03-21, 09:38 PM
آخر رد: moahmed.abdelmohsen
  [سؤال] سؤال طريق اعمل بحث و اضافة و تعديل دخل قاعد البيانات فى نفس الوقت alims 1 213 15-03-21, 07:17 AM
آخر رد: alims

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


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