22-03-23, 04:09 AM (آخر تعديل لهذه المشاركة : 22-03-23, 06:31 PM {2} بواسطة Taha Okla.)
(21-03-23, 11:47 PM)hamada salah90 كتب : هذا مرفق لما أريد التعديل عليه
هل جربت هذا المثال قبل أن ترفعه ؟؟
هل لما تضغط ع زر التقرير بيعرض لك التقرير ؟؟ أو في شي نسيت ترفقه مع المشروع وراح يعطي رسالة خطأ لعد وجود هذا الشيء؟؟
أنشء مشروع جديد وضع فيه الأكواد التي تسبب المشكلة
وجربه قبل أن ترفعه .. إذا كان يعمل كما يعمل لديك وقت المشكلة : قم وقتها برفعه، وليس أن ترفعه بدون أن ترفع الفورم الذي فيه المشكلة..
لو ترفع مشروعك بدون ما تعتمد على أزرار وأدوات من خارج الفيجول بيزك أفضل،
حتى يستطيع الشخص اللي بيفكر يساعدك لما ينزل عنده الكود : يشغله ويصل لمكان المشكلة بدون ما يحتاج يفكر بالمشاكل الثانية
الناتجة عن نقص الأدوات أو الأكواد التي لم ترفقها ويصل لمكان المشكلة بالتحديد ويعالجها هي دون ما يضيع وقته على اصلاح المشاكل
الثانية ويضيع وقته ثم يمل ويتركك بنصف الطريق فلا هو ساعدك ولا أنت استفدت من طول انتظارك لمن يأتي ويحل المشكلة ...
22-03-23, 08:52 PM (آخر تعديل لهذه المشاركة : 22-03-23, 09:15 PM {2} بواسطة hamada salah90.)
(22-03-23, 04:09 AM)Taha Okla كتب :
(21-03-23, 11:47 PM)hamada salah90 كتب : هذا مرفق لما أريد التعديل عليه
هل جربت هذا المثال قبل أن ترفعه ؟؟
هل لما تضغط ع زر التقرير بيعرض لك التقرير ؟؟ أو في شي نسيت ترفقه مع المشروع وراح يعطي رسالة خطأ لعد وجود هذا الشيء؟؟
أنشء مشروع جديد وضع فيه الأكواد التي تسبب المشكلة
وجربه قبل أن ترفعه .. إذا كان يعمل كما يعمل لديك وقت المشكلة : قم وقتها برفعه، وليس أن ترفعه بدون أن ترفع الفورم الذي فيه المشكلة..
لو ترفع مشروعك بدون ما تعتمد على أزرار وأدوات من خارج الفيجول بيزك أفضل،
حتى يستطيع الشخص اللي بيفكر يساعدك لما ينزل عنده الكود : يشغله ويصل لمكان المشكلة بدون ما يحتاج يفكر بالمشاكل الثانية
الناتجة عن نقص الأدوات أو الأكواد التي لم ترفقها ويصل لمكان المشكلة بالتحديد ويعالجها هي دون ما يضيع وقته على اصلاح المشاكل
الثانية ويضيع وقته ثم يمل ويتركك بنصف الطريق فلا هو ساعدك ولا أنت استفدت من طول انتظارك لمن يأتي ويحل المشكلة ...
آسف أخي الغالي
لكن المقصد ألا أشتت حضراتكم عن المقصود من كلامي فقط
26-03-23, 03:05 PM (آخر تعديل لهذه المشاركة : 26-03-23, 03:12 PM {2} بواسطة sanyor77.)
وعليكم السلام ورحمة الله وبركاته يمكنك حساب حاصل ضرب السعر والكمية في استعلام SQL وعرض النتيجة في تقرير Data report. سأشرح كيفية القيام بذلك. أولاً، ستحتاج لتعديل استعلام SQL الخاص بك بحيث يحسب حاصل ضرب السعر والكمية ويضيفه كحقل جديد في النتائج. قد يبدو الاستعلام مشابهًا لما يلي:
كود :
SELECT Price, Quantity, Price * Quantity as Total FROM YourTableName
حيث يتم استبدال "YourTableName" باسم الجدول الخاص بك في قاعدة البيانات. ثم، في تقرير Data report، قم بإضافة عنصر نص جديد (Text) لعرض الإجمالي وقم بتعيين خاصية DataField الخاصة به إلى "Total"، والذي هو اسم الحقل الذي أضفناه في الاستعلام السابق. بهذه الطريقة، سيتم حساب حاصل ضرب السعر والكمية وعرضه في التقرير Data report.
قمت بتعديل الكود حسب طلبك، كما يلي:
كود :
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strSQL As String
' قم بتعديل هذه السطور للاتصال بقاعدة البيانات الخاصة بك
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=YourDatabase.mdb;"
cnn.Open
' استعلام SQL لجلب السعر والكمية وحساب الإجمالي
strSQL = "SELECT Price, Quantity, Price * Quantity as Total FROM YourTableName"
' تنفيذ الاستعلام وتخزين النتائج في مجموعة السجلات rs
rs.Open strSQL, cnn, adOpenStatic, adLockReadOnly
' ربط مصدر البيانات في تقرير DataReport بمجموعة السجلات rs
Set DataReport1.DataSource = rs
' عرض التقرير
DataReport1.Show
في تقرير Data report، قم بإضافة عناصر النص (Text) لعرض السعر والكمية والإجمالي. وقم بتعيين خاصية DataField لكل عنصر نص بالطريقة التالية:
لعرض السعر: قم بتعيين DataField إلى "Price".
لعرض الكمية: قم بتعيين DataField إلى "Quantity".
لعرض الإجمالي: قم بتعيين DataField إلى "Total".
بهذه الطريقة، ستظهر الأسعار والكميات والإجمالي في تقرير Data report بناءً على البيانات الموجودة في قاعدة البيانات الخاصة بك. لا تنسَ تعديل أسماء الجدول والأعمدة ومعلومات الاتصال بقاعدة البيانات حسب تطبيقك.