تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] شباب عند كتابة جملة SELECT ظهرت لى هذه الرسالة
#1
بسم الله الرحمن الرحيم
السلام عليكم شباب
قمت بعمل قوم SELECT للتركيز على حقلين من جدولين معينين
هذا هو الكود
PHP كود :
[align=leftDataAdapter1 = New OleDbDataAdapter("SELECT * FROM entag1,entag2 where entag1.entagID = " TextBox1.Text " AND entag2.entagID =" TextBox1.Text "'"Con)
 
       Dim dt As New DataTable()
 
       DataAdapter1.Fill(dt)
 
       Dim cr As New CrystalReport3
        cr
.SetDataSource(dt)
 
       reportMa.CrystalReportViewer1.ReportSource cr
        reportMa
.ShowDialog()[/align
فظهرت لى هذه الرساله


الملفات المرفقة صورة/صور
   
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:
#2
شكرا جزيلا على ردك
المشكله انحلت لاكن ظهرلى البيانات متكررة
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:
#3
شكرا جزيلا لك اخى العزيز انا مش عارف اقلك ايه على حضورك الكريم معى وردك الكريم لاكن بردو ما نفعت انا وراها وراها لحد ما احلها وانشاء الله برفع الحل هنا
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:
#4
اخي العزيز التكرار يظهر عندك لانك مو رابط الجدولين مع بعض
انت تستلم نتائج من جدولين فلازم يكون اكو شرط يربط بين الجدول الاول والجدول الثاني
لتكون جملة الاستعلام
SELECT * FROM entag1,entag2 where entag1.entagID =entag2.ntagID AND entntag2.ntagID =" & TextBox1.Text


[url=http://vb4arb.com/vb/private.php?action=send&uid=7095][/url]
الرد }}}}
تم الشكر بواسطة: سعود
#5
اخى العزيز شكرا جذيلا لكانا عملت اكثر من ذلك
لاكن توصلت طريقة جميله جدا وهى

PHP كود :
Dim FrmPr As New reportMa

        Dim Sql1 
As String "Select * from entag1 where entagID like " TextBox1.Text ""

        
Dim MyDs2 As New DataSet
        Dim DAdp2 
As New OleDbDataAdapter(Sql1Con)
        
MyDs2.Clear()
        
DAdp2.Fill(MyDs2"entag1")
        
Dim rpt As New CrystalReport7
        rpt
.Load()
        
rpt.SetDataSource(MyDs2.Tables("entag1"))
  

        
Dim Sql3 As String "Select * from entag2 where entagID like " TextBox1.Text ""
        
Dim DAdpt3 As New OleDbDataAdapter(Sql3Con)
        
Dim Ds1 As New DataSet
        Ds1
.Clear()
        
DAdpt3.Fill(Ds1"entag2")
        
DAdpt3.Dispose()
      

      

        
FrmPr.CrystalReportViewer1.ReportSource rpt
        FrmPr
.CrystalReportViewer1.ShowGroupTreeButton False
        FrmPr
.CrystalReportViewer1.RightToLeft Windows.Forms.RightToLeft.Yes
        FrmPr
.CrystalReportViewer1.Zoom(90%)
        
FrmPr.CrystalReportViewer1.Refresh()
        
FrmPr.CrystalReportViewer1.Show()
        
FrmPr.ShowDialog()
        
DAdp2.Dispose()
        
Con.Close() 
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف تكون جملة insert في جدول بشرط وفي خلية واحدة فقط ahmedfa71 0 33 16-05-17, 07:05 PM
آخر رد: ahmedfa71
  مشكلة في كود جملة ال insert khaled12345 2 60 14-05-17, 10:20 AM
آخر رد: khaled12345
  كيفية غلق هذا الفورم ان نفذ جملة شرط soper 4 70 13-05-17, 09:41 PM
آخر رد: العواد الصغير
  [سؤال] جملة استعلام من جدولين samawi 1 101 07-05-17, 12:13 PM
آخر رد: ahmedfa71
  عندي جدولين اريد جملة sqlتقوم باظهار الاسماء الموجودة في الجدول الاول وليست موجودة في محمد محمود الغرياني 2 141 22-04-17, 02:19 AM
آخر رد: ابو ليلى
  [سؤال] جملة الاتصال بقاعدة البيانات بجهاز اخر ABDSH 1 101 17-04-17, 08:51 AM
آخر رد: عبـدالله
  ما أسباب ظهور هذه الرسالة KH_Alaswad 2 104 29-03-17, 11:03 AM
آخر رد: KH_Alaswad
  [VB.NET] شباب مساعدتكم علي حميد 4 114 25-03-17, 02:19 PM
آخر رد: WAEL ABED
  مشكلة صغيرة فى كتابة item الى xml Mohamed20 2 140 11-02-17, 01:27 AM
آخر رد: Mohamed20
  اريد select check item --- alwasela 4 159 31-01-17, 02:08 AM
آخر رد: محمد كريّم

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم