الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

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

مغلق
بدأه emi في 5 ديسمبر 2005 · 2 رد · 587 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

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

في البدايه استخدمت

Private Sub Form_Load()
Open App.Path & "\untitled.bmp" For Binary As 1
Image1.Picture = LoadPicture(App.Path & "\untitled.bmp")

End Sub

واشتغل بس المشكله انه قبل ما يطلع الفورم بتطلع مسج بتقول

Unable to bind to field or to datamember : ‘اسم الكولوم في قاعده البيانات

وبعدين لما اعمل ok بتروح المسج وبيطلع الفورم وفيه الصوره متل ما بدي.. لكني لا استطيع الحصول على الصوره التاليه

ثم جربت وعملت في الجدول الامتداد للصوره وفي الفورم ربطت التكست مع الجدول وعملت

Image1.Picture = LoadPicture(text1.text ")

نفس الموضوع طلعت الصوره ( بدون خطا ) لكني لم استطع الوصول للصوره التاليه رغم انه في التكست الامتداد يتغير .. لكن الصوره لا تتغير

انا اريد فقط عرض صوره من الجدول ثم الصور التاليه .. لا اريد كود معقد .. وكلما حاولت اعتقد اني اقتربت ابقى مكاني ..ارجو ان تساعدوني .. قرات انه عند استخدام الادو لا استطيع ربط الصوره بالاداه مثل الداتا كنترول وانه عليه استخدام الجمله

SQL = "select * from db"

لكني لا افهمها ولا اعرف كيف استخدمها .. اعتذر عن الاطاله .. اتمنى المساعده والسلام عليكم ورحمة الله وبركاته

#2

أختي الفاضلة :

بالنسبة للسطر التالي :

Open App.Path & "\untitled.bmp" For Binary As 1

فلا أرى ضرورة له نهائيا , يكفي وجود السطر الثاني.

بالنسبة لموضوع التعامل مع الصور من خلال قواعد البيانات فأجو منك قراءة الموضوع التالي و إن شاء الله تجدي الحل .

/index.ph...topic=79824&hl=

أما لتعديل الكود الذي وضعتيه فحاولي أن تمسحي الـ PictureBox أو الـ ImageBox قبل عرض الصورة الجديدة عن طريق :

ImageBox1.Picture = Empty

و لك مني جزيل الشكر ,,, (h)

____________________________________________________________________________

{ اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ } سورة الأنبياء (1)

____________________________________________________________________________

In a world without walls and fences, who needs Windows and Gates

مدونتي

#3

شكرا على الرد . .. خلاص اشتغل الحمد الله

هذا الموضوع مغلق.

مواضيع مشابهة