دخول

**ahmed eldouskey**

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

بيع شراء قبض صرف والحقلين الى عايز المجموع بتاعهم مدين و دائن

عايز جملة select الى تعطيني اجمالى كل واحد من دول

برجاء المساعدة ضروري

انا لاقيت حل وان شاء الله يؤدي بالغرض وان شاء الله محتاج نصائحكم
SELECT column1 [, column2 ]
FROM table1 [, table2 ]
[WHERE condition]

INTERSECT

SELECT column1 [, column2 ]
FROM table1 [, table2 ]
[WHERE condition]

**sendbad100** · 28-04-18, 06:11 PM

السلام عليكم
افضل ان تضع مثال
مع قاعدة البيانات

**ahmed eldouskey** · 28-04-18, 06:35 PM

السلام عليكم

اشكرك على المرور الكريم للاسف انا في مكان بعيد عن الجهاز الخاص بي مش هقدر ارفع مثال بس قدرت اصمم جرء من قاعدة البيانات وبعتلك صورة ليها فى المرفقات

كل الى محتاج المساعدة فية ازاى اعمل جملة الاستعلام

الى تعطيني الاجمالى بتاع المدين والدائن فى كل حالة سواء بيع او شراء او صرف ولكن فى جملة استعلام واحدة

سامحني على الاطالة وان شاء الله بالليل اقدر ارفق مثال ان شاء الله لو فى امكانية تساعدني الان تمام بارك الله فيك

**Amir_Alzubidy** · 02-05-18, 07:25 PM

السلام عليكم و رحمة الله و بركاته
على فرض كان هناك كومبو بوكس يتحوي على
1. بيع
2. شراء
3. صرف

PHP كود :

If Combo1.Text = "" Then Exit Sub

Set Rs = dB.Execute("Select Sum(madin) As TotalSum From Tabel_Name Where [str] ='" & Combo1.Text & "'")
Label_Total.Caption = Rs.Fields!TotalSum
DoEvents 

**princeofislam**

اساذ امير ماذا لو كنا نستخدم الاداة adodc1 وبين تاريخين للحركة

**Amir_Alzubidy** · 20-06-18, 06:00 PM

(20-06-18, 06:30 AM)princeofislam كتب : ماذا لو كنا نستخدم الاداة adodc1 وبين تاريخين للحركة

PHP كود :

Adodc1.RecordSource = "Select Sum(Col_Name) As TotalSum From TB_Name Where [Col_Name] ='" & TextValue & _
"' AND [Col_Date]Between #" & Date_Value & "# AND #" & Date_Value & "#"

Adodc1.CommandType = adCmdText
Adodc1.Refresh
MsgBox Adodc1.Recordset.Fields("TotalSum") 

**princeofislam** · 21-06-18, 02:50 AM

(20-06-18, 06:00 PM)Amir_alzubidy كتب :
(20-06-18, 06:30 AM)princeofislam كتب : ماذا لو كنا نستخدم الاداة adodc1 وبين تاريخين للحركة

PHP كود :

Adodc1.RecordSource = "Select Sum(Col_Name) As TotalSum From TB_Name Where [Col_Name] ='" & TextValue & _ "' AND [Col_Date]Between #" & Date_Value & "# AND #" & Date_Value & "#" Adodc1.CommandType = adCmdText Adodc1.Refresh MsgBox Adodc1.Recordset.Fields("TotalSum")

بارركم الله وسدد خطاكم ورحمكم ووالديكم - روعة وتألق وابداع

دخول
إسم المستخدم
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة

المواضيع المحتمل أن تكون متشابهة .
الموضوع :		الكاتب	الردود :	المشاهدات :	آخر رد
	[vb6.0] كيف يمكن إخفاء عمود رقم الصنف و إظهاره برمجياً نامل المساعدة في المثال التالي ؟	Microformt	2	392	19-11-23, 10:49 PM آخر رد: Microformt
	[vb6.0] نامل المساعدة في المثال المرفق يوجد مشكلة في إضافة رقم الصنف الى قاعدة البيانات لا اع	Microformt	1	241	23-10-23, 12:11 AM آخر رد: Taha Okla
	[vb6.0] كيف استخدم هذه الخوارزمية في برنامجي نامل المساعدة العاجله؟	Microformt	0	225	04-10-23, 11:44 PM آخر رد: Microformt
	اخوانى الاحباب ارجو المساعدة فى كود النسخ واللصق	mhareek	1	408	15-07-23, 02:28 PM آخر رد: Amir_Alzubidy
	[vb6.0] المساعدة في تشغيل استعلام الحاقي في تبويب الاستعلامات في قاعدة بيانات اكسيس من واجهة	وادي العوضي	6	610	09-07-23, 12:44 AM آخر رد: وادي العوضي
	[vb6.0] المساعدة في تحويل كود بلغة ال VB.Net الى لغة ال VB6	وادي العوضي	0	376	16-12-22, 11:24 AM آخر رد: وادي العوضي
	[vb6.0] ارجو المساعدة في حل هذه المسألة	سويلم	1	677	03-09-22, 04:52 PM آخر رد: سويلم
	[سؤال] احتاج برنامج يقرأ من اكسل ضروري لو سمحتم	mera	0	511	10-06-22, 03:43 PM آخر رد: mera
	كيف يمكن تطوير هذا الكود نامل المساعدة ؟؟	Microformt	1	916	22-11-21, 07:51 PM آخر رد: اسلام الكبابى
	ارجو المساعدة فى تكرر كود	mhareek	9	1,719	10-11-21, 02:55 PM آخر رد: mhareek