+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مامشكلة جملة الإضافة sql أرجو المساعدة (/showthread.php?tid=27837)
مامشكلة جملة الإضافة sql أرجو المساعدة - Elhatmi - 09-12-18
أحبائي بارك الله فيكم ........ لدي ثلاث جداول
جدول الأرشيف Tab1 الحقول Id --- Acc_no ---- balance
جدول المستجدات Tab2 الحقول Id --- Acc_no ---- balance
جدول المرفوضات Tab3 الحقول Id --- Acc_no ---- balance
أريد مقارنة حقلي Acc_no و Balance بين جدول الأرشيفtab1 وجدول المستجدات tab2
إذا تساوى حقل tab1.Acct_no مع tab2.Acct_no واختلف حقل tab1.Balance مع tab2.Balance يحفظ السجل في الجدول الثالث tab3
cmd1.CommandText="insert into tab3 select * from tab2 where (tab2.Acc_no=(select Acc_no from tab1) and tab2.balance <> (select balance from tab1))"
لم تعمل معي .؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
وعليكم السلام ورحمة الله وبركاته
RE: مامشكلة جملة الإضافة sql أرجو المساعدة - elgokr - 10-12-18
يمكنك تسهيل الامر عليك من خلال
عمل استعلام اولاً عبارة عن WEHER للتحقق من Acc_no و balance
وناتج الاستعلام اذا كان اكبر من 0 يقوم بالغاء عملية الاضافة واذا كان 0 يوم بتنفيذ كود الاضافة
بحيث كود الاستعلام سيكون على هذا النحو
كود :
SELECT * FROM Tab1 INNER JOIN Tab2 ON (Tab1.Acc_no = Tab2.Acc_no) AND (Tab1.balance <> Tab2.balance)الناتج من الاستعلام امحول الى DT أو DS فلنقل انه DT
سيتم عمل شرط التحقق على هذا النحو كمثالكود :
If dt.Rows.Count <> 0 Then
MsgBox("عفواً البيانات مدخلة من قبل")
Else
' insert code
End Ifاتمنى ان تكون وضحت لك الصورة وان يكون الامر معك بسيط
تحياتى لك
وتمنياتى لك التوفيق
RE: مامشكلة جملة الإضافة sql أرجو المساعدة - Elhatmi - 11-12-18
بارك الله فيك
ونفعك الله وأنفع بك ..
وآسف على تكرار الموضوع..