• 0
الراس الكبيرة

طلب كود للمثال المرفق

سؤال

اخواني الاعزاء كل عام وانتم بخير :lol:

عندي طلب بسيط وهوا كتالي ..

عندي قاعدة بيانات SQL تحتوي على جدولين

الاول اسمه BANK1 والثاني اسمه BANK2

يحتوي الجدول الاول على حقلين الاول اسمه BNK1 ويحتوي على رقم الصك والثاني اسمه BNK2 يحتوي على قيمة الصك

ويحتوي الجدول الثاني على حقلين الاول اسمه BNK01 ويحتوي على رقم الصك والثاني اسمه BNK02 يحتوي على قيمة الصك

كما باصورة

http://rghost.ru/414519.image

المطلوب التعديل على هذا المثال المرفق بحيث استطيع عمل مقارنة بين الحقلين BNK1 و BNK01 و استخراج ارقام الصكوك الموجوده في BNK1 بعد استبعاد ارقام الصكوك المتشابهة في الحقلين يعني استخراج ارقام الصكوك التي في BNK1 والتي لاتوجد في BNK01

http://rghost.ru/414488

ثم حفظها في القاعدة واستخراجها كتقرير كريستل ريبورت

السؤال الثاني كيف يمكنني ان اغير اسم قاعدة البيانات من AQSA الى اي اسم اخر والتعامل معها بدون مشاكل ...

ارجو الااكون قد اطلت واوضحة قصدي :blush: وكل عام وانتم بخير :happy:

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

1 إجابات على هذا السؤال .

  • 0

يبدو ان قصدي لم يكن واضح

سابسط السؤال هل هذا الكود يتماشى مع مقارنة حقلين في جدولين مختلفين واستخراج البيانات الغير متطابقة في الحقلين

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim Adp As SqlClient.SqlDataAdapter

Dim con As SqlClient.SqlConnection

On Error Resume Next

Dim str As String = "SELECT BANK1.BNK1 , BANK2.BNK01 FROM BANK1, BANK2 WHERE BANK1.BNK1 <> BANK2.BNK01 "

con = New SqlClient.SqlConnection(constring)

Dim ds As New DataSet

Adp = New SqlClient.SqlDataAdapter(str, con)

ds.Clear()

Me.ComboBox1.Items.Clear()

Adp.Fill(ds)

For I = 0 To ds.Tables(0).Rows.Count - 1

Me.ComboBox1.Items.Add(ds.Tables(0).Rows(I).Item(0))

Next I

Adp.Dispose()

con.Close()

End Sub

:wacko: "SELECT BANK1.BNK1 , BANK2.BNK01 FROM BANK1, BANK2 WHERE BANK1.BNK1 <> BANK2.BNK01 " :blink:

ارجوكم افيدوني افادكم الله

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .