كيف أضع شارت بالصفحة ASP

مغلق

بدأه فانكشن في 9 مايو 2004 · 8 رد · 755 مشاهدة · في منتدى تصميم صفحات الويب

#19 مايو 2004 في 00:49 صاحب الموضوع

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

ارجو الاجابة .

#29 مايو 2004 في 00:57

السلام عليكم

اخي فانكشن ما وظيفة الشرط الذي تريده أن ينفذه.

MCP

MCTS:.Net Framework 2.0: Web Applications

MCPD:Web Developer

http://www.arabmoheet.net

#39 مايو 2004 في 15:31

اهلا اخي عبدالله .. سوف اشرح الذي اريده .

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

قاعدة البيانات جاهزة والاستعلام سيكون بالشكل التالي :-

1- اسم الموظف .

2- عدد المعاملات التي لم ينجزها . .

وأريد أن يظهر شارت : يكون المحور هو اسم الموظف .

كما هو بالصورة ، مع ملاحظة أن يقوم الشارت بتحديث نفسة تلقائيا من خلال قاعدة البيانات .

ارجو توضيح كيف أضع الشارت على الصفحة .

#49 مايو 2004 في 22:57

السلام عليكم

لعمل الشارت فهو بسيط أشبه بعملية الاستفتاء، بحيث كل موظف عندما ينجز معاملة سوف تضاف إلى مجموع المعاملات التي قد قام بعملها.

فسوف يتم حساب الشارت لكل شخص.

حيث سوف تتم عن طريق مجموع المعاملات التي قام بتنفيذها الموظف مقسمة على مجموع المعاملات لكل الموظفين، فذلك سوف يتم حساب الشارت لكل موظف.

مع تحياتي

MCP

MCTS:.Net Framework 2.0: Web Applications

MCPD:Web Developer

http://www.arabmoheet.net

#59 مايو 2004 في 23:36

اهلا اخي عبدالله . وشكرا على اجابتك

لقد حصلت على كود من موقع ميكروسوفت .

واتوقع انه يفيد الجميع بإذن الله .

انسخ الكود وضعه فقط في صفحة HTML

<html>
<body>

<object id=ChartSpace1 classid=CLSID:0002E500-0000-0000-C000-000000000046 style="width:100%;height:350"></object>

<script language=vbscript>

Sub Window_OnLoad()

    Dim oChart
    Dim oSeries1, oSeries2
    dim oConst
    
    'Ensure ChartSpace1 is empty:
    ChartSpace1.Clear

    Set oConst = ChartSpace1.Constants

    'Create a new chart in the ChartSpace
    Set oChart = ChartSpace1.Charts.Add
    
    'Add a series of type Column
    Set oSeries1 = oChart.SeriesCollection.Add
    With oSeries1
        .Caption = "Sales"
        .SetData oConst.chDimCategories, oConst.chDataLiteral, _
                 Array("1994", "1995", "1996", "1997")
        .SetData oConst.chDimValues, oConst.chDataLiteral, _
                 Array(50, 60, 55, 59)
        .Type = oConst.chChartTypeColumnClustered
    End With
    
    'Add a second series of type Line
    Set oSeries2 = oChart.SeriesCollection.Add
    With oSeries2
        .Caption = "Profit"
        .SetData oConst.chDimCategories, oConst.chDataLiteral, _
                 Array("1994", "1995", "1996", "1997")
        .SetData oConst.chDimValues, oConst.chDataLiteral, _
                 Array(39, 47, 52, 46)
        .Type = oConst.chChartTypeLine
    End With
    
    'Add a second value axis to the Chart
    oChart.Axes.Add oChart.Scalings(oConst.chDimValues), _
                 oConst.chAxisPositionRight, oConst.chValueAxis

    'Display the legend
    oChart.HasLegend = True
    oChart.Legend.Position = oConst.chLegendPositionBottom
    
    'Display the title for the chart
    oChart.HasTitle = True
    oChart.Title.Caption = "Four Year Overview"

End Sub

</script>
</body>
</html>

تم تعديل هذه المشاركة بواسطة فانكشن في 9 مايو 2004 في 23:39

#69 مايو 2004 في 23:58

السلام عليكم

شكراً يا اخي فانكشن على هذا الكود الجميل، وان شاءلله اليوم سوف أحاول بالتعامل معه، بحيث أن يتم عرض أسماء الموظفين من قواعد البيانات، وإظهار النسبة بينهم.

مع تحياتي

MCP

MCTS:.Net Framework 2.0: Web Applications

MCPD:Web Developer

http://www.arabmoheet.net