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

سؤال عن القراءة من قاعدة البيانات

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

السلام عليكم

عندي قاعدة بيانات بالاكسس تحتوي على جدول بهذا الشكل

datatable.JPG

سؤالي الاول : اذا اردت استخدام هذه الـData في رسم الـGraph فهل يكفي هذا الـtable ام احتاج الى عمل query

سؤالي الثاني و الاهم: ما هي طريقة قراءة الـData من جدول البيانات الى احداثي x مثلا في الـGraph ؟

ما اعنيه اني لو اردت تحديد العمود الاول (Field11 في الصورة) ليكون احداثي x و الصف الاول(الذي عليه السهم) ليكون احداثي y ..... فكيف اضع هذه المعلومات في الـGraph ؟

اختكم مَيمنة

تم تعديل هذه المشاركة بواسطة ميمنة في 30 مارس 2005 في 11:54

#2

اخت ميمنة

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

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

أم الاكسس نفسه المهم أن كنتي تستخدمين الفيجول وقاعدة بياناته الاكسس

تستطعين عمل الاحداثيات عن طريقة استدعاء البيانات في أداة MSFlexGridومن ثم عن طريق التحديد بالرقم الخلية تستطعين الحصول على القيم المطلوبه لأتمام العملية

وتستطيعن معرفة طريقة التحديد عن طريق عن هذا الرابط

MSFlexGrid

ارجو أن يكون هذا ما تريدين معرفته

تقبلي تحياتي B)

سجل ايميلك هنا

googlejb5.gif ليصلك كل ما هو مفيد في عالم البرمجة
#3

السلام عليكم

جزاك الله خيرا اخي الفاضل على الرد.. و معذرة على عدم التوضيح

البرنامج الذي اريد عمله بالفيجوال بيسك و قاعدة البيانات بالاكسس

باستخدام MSChart اريد رسم جدول البيانات الموضح في الصورة اعلاه

الذي قمت به للان هو

 Dim cnn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    '
    Dim strProvider As String
    Dim strDataSource As String
    Dim strSQL As String    ' SQL query string
    '
    CommonDialog1.CancelError = True
    On Error GoTo CancelOpen
    CommonDialog1.Flags = cdlOFNHideReadOnly
    CommonDialog1.DialogTitle = "Open MDB file"
    CommonDialog1.Filter = "MDB Files|*.mdb|All Files|*.*"
    CommonDialog1.ShowOpen

    If CommonDialog1.FileName = "" Then
        Exit Sub
    Else
        strProvider = "Microsoft.Jet.OLEDB.3.51"
        strDataSource = CommonDialog1.FileName
        strSQL = "SELECT * FROM xyAxis"
        '
        ' Open the connection
        cnn.Open "provider=" & strProvider & ";Data Source=" & _
        strDataSource
        ' Open the recordset
        'rst.Open "select * from [table]", cnn, adOpenDynamic
        rst.Open strSQL, cnn, adOpenStatic
        '
   
        With MSChart1
            Set .DataSource = rst
                .ShowLegend = True
                .chartType = VtChChartType3dArea
        End With
    End If

ما اريده هو جعل العمود الاول من جدول البيانات ليكون محور x في MSChart و الصف الاول من جدول البيانات ليكون محور y في MSChart

و جعل بقية البيانات محور z اي DataSource لـ MSChart

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

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