السلام عليكم
عندي قاعدة بيانات لمعلومات شخصية الاسم والمواليد والعنوان وصورة الشخص
هل يمكن استعمال ريبورت اكتف لاظهار البيانات ؟
مع خالص التقديـــــــــــــــــــــــــــــــــــر
وعليكم السلام ورحمة الله وبركاته
اكيد بتقدر..
ولكن انا ما جربت من قبل..
اذا عندك مثال .. ارفعه حتى نجرب فيه
العمليه هي اكواد ربط اداة عرض الصور بالحقل المناسب بقاعدة البيانات لا اكثر.
شكرا لكم على اهتمامكم سارفع المثال في وقت لاحق
نعم يوجد وعندي مشروع سأحاول رفعه لك عندما ادخل من الحاسوب
شكرا لك على الاهتمام وانتظر منكم واناشاكر لك
خذ هذا الكود عدل فيه حسب اسم قاعدة البيانات والجدول واسم التقرير
كود :
If Trim(TextID.Text) = "" Then
MsgBox "يجب إختيـار الاســم", vbCritical + vbMsgBoxRight + vbMsgBoxRtlReading, "تنبيــه"
TextIDI.SetFocus
Exit Sub: End If
Dim x As String
x = TextID.Text
Unload Report1
Report1.DataControl1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
App.Path & "\Data.Base\Data_Base.mdb;Persist Security Info=False"
If RS.RecordCount <= 0 Then
MsgBox "عفــواً ... لا يوجد سجل ", vbCritical + vbMsgBoxRight + vbMsgBoxRtlReading, "تنبيــه"
TextID.SetFocus
Exit Sub: End If
Report1.DataControl1.Source = "Select * From [TBL_Student] Where [ID_Code] = '" & x & "'"
If Not Textpic.Text = "" Then
Report1.Image1.Picture = LoadPicture(Textpic.Text)
Else
Report1.Image1.Picture = LoadPicture()
End If
'Report1.LName.Caption = Form_school.Text3.Text
'Report1.Caption = " ÇÓÊãÜÇÑÉ ÈíÇäÜÇÊ ØÇáÜÜÈ" & " " & Form_documents.CombCategory.Text
'Report1.Caption = " ÇÓÊãÜÇÑÉ ÈíÇäÜÇÊ ÇáØÇáÜÜÈ : " & " " & Form_documents.Textname.Text & " * ááÕÜÜÜÝ : " & Form_documents.CombClass.Text & " * ÇáÔÚÈÜÜÜÉ : " & Form_documents.CombCClass.Text & " * ÕÝÉ ÇáÞíÏ : " & Form_documents.CombCategory.Text
'Report1.LT.Caption = " ÇÓÊãÜÇÑÉ ÈíÇäÜÇÊ ØÇáÜÜÈ" & " " & Form_documents.CombCategory.Text
Report1.Show: Report1.Visible = True: Report1.Show
ولو لم يضبط معك سوف أرفع لك مثال
شكرا جزيلا لجنايكم الكريم ورعايتكم واهتمامكم
نظريا واضح الكود واكون شاكرا لكم اذا اكرمتنا بمثال يوضح الفكرة عمليا
........................................................................................................................
مع اني عندي قاعدة بيانات
فيها حقلان
الاول : الاسم
الثاني : الصورة الشخصية له
محفوظة بقاعدة البيانات نفسها وليس في ملف خارجي
تقبل تحياتي وتقديري لكم
(11-09-22, 01:24 PM)gonm64 كتب : [ -> ]شكرا جزيلا لجنايكم الكريم ورعايتكم واهتمامكم
نظريا واضح الكود واكون شاكرا لكم اذا اكرمتنا بمثال يوضح الفكرة عمليا
........................................................................................................................
مع اني عندي قاعدة بيانات
فيها حقلان
الاول : الاسم
الثاني : الصورة الشخصية له
محفوظة بقاعدة البيانات نفسها وليس في ملف خارجي
تقبل تحياتي وتقديري لكم
من المستحسن حفظ الصور في ملف خارجي .
على كل حال عندما ادخل الجهاز أحاول عمل مثال إن شاء الله