حفظ صورة داخل قاعدة بيانات

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

default حفظ صورة داخل قاعدة بيانات

مُساهمة من طرف Admin في الخميس أكتوبر 19, 2006 11:28 pm

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

يشترط جعل سجل في قاعدة البيانات من نوع مذكرة لحفظ الصورة فيه
سيتم حفظ الصورة على شكل Binary
ثم استرجاعها
اليك الطريقة
حفظ الصورة
Private Sub Command1_Click()
On Error Resume Next
Open com.FileName For Binary As 1
Sor = String(LOF(1), vbNullChar)
Get 1, , Sor
rs.AddNew
rs(0) = Sor
rs.Update
Close 1
End Sub


هنا
com.FileName
تعني مسار الصورةالتي تريد حفظها في قاعدة البيانات

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

Private Sub Command2_Click()
On Error Resume Next
If rs.EOF = False Then
rs.MoveNext
Sor = rs(0)
Open App.Path & "\dd.jpg" For Binary As 1
Put 1, , Sor
Close 1
Image1.Picture = LoadPicture(App.Path & "\dd.jpg")
End If
End Sub

------------------------------
إذا أعجبك موضوع من مواضيعي فلا تقل شكـراً ...
بل قل الآتـي ::
اللهم اغفر له ولوالديه ولزوجته وابنائه ولأخوانه واخواته ولسائر المسلمين ماتقدم من ذنبهم وما تأخر..
وقِهم عذاب القبر وعذاب النار..
و أدخلهم الفردوس الأعلى مع الأنبياء والشهداء والصالحين ..
واجعل دعاءهم مستجاب في الدنيا والآخرة ..
اللـهم آميـن..اللـهم آميـن..اللـهم آميـن..

اخوكم جاد القرعان
الأردن- الطفيلة
jadquraan@yahoo.com
jad_quraansoft@hotmail.com
00962777765709


عدل سابقا من قبل في الخميس أغسطس 16, 2007 10:33 am عدل 1 مرات
avatar
Admin
jadquraan
jadquraan

عدد الرسائل : 125
العمر : 34
تاريخ التسجيل : 19/10/2006

معاينة صفحة البيانات الشخصي للعضو http://jad4vb.lightbb.com

الرجوع الى أعلى الصفحة اذهب الى الأسفل

default شكر

مُساهمة من طرف العـطوي في الأربعاء نوفمبر 15, 2006 2:45 pm

شكرا لك يا جاد

العـطوي
عضو متميز
عضو متميز

عدد الرسائل : 43
تاريخ التسجيل : 06/11/2006

معاينة صفحة البيانات الشخصي للعضو

الرجوع الى أعلى الصفحة اذهب الى الأسفل

default رد: حفظ صورة داخل قاعدة بيانات

مُساهمة من طرف Miss AnGeL في الجمعة ديسمبر 08, 2006 3:23 pm

جزاك الله خير اخي جاااد

درس رائع وافادني كثير

بارك الله فيك

Smile

Miss AnGeL
عضو
عضو

عدد الرسائل : 7
تاريخ التسجيل : 08/12/2006

معاينة صفحة البيانات الشخصي للعضو

الرجوع الى أعلى الصفحة اذهب الى الأسفل

default رد: حفظ صورة داخل قاعدة بيانات

مُساهمة من طرف mohasoli في الأحد يناير 21, 2007 4:49 pm

جزاكم الله خير

mohasoli
عضو
عضو

عدد الرسائل : 3
تاريخ التسجيل : 21/01/2007

معاينة صفحة البيانات الشخصي للعضو

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى