تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مشكلة ال Reader
#1
السلام عليكم ورحمة الله وبركاته 

عندي مشكلة في وهي الرساله هاي

There is already an open DataReader associated with this Command which must be closed first.

من خلال البحث لما بظغط على زر البحث ممتاز بس لمره واحده فقط 

لما ابحث عن سجل ثاني تظهرلي هي الرساله . 

هذا كود الزر : 

كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       comm = New SqlCommand("SELECT * FROM MonitoringReports WHERE EmployeeID = '" & TextBox9.Text & "' and LicensesNumber='" & TextBox1.Text & "'", con)
       reader = comm.ExecuteReader
       If reader.Read = True Then
           TextBox8.Text = reader(0).ToString
           TextBox9.Text = reader(1).ToString
           DateTimePicker2.Value = reader(2).ToString
           TextBox1.Text = reader(3).ToString
           TextBox2.Text = reader(4).ToString
           TextBox5.Text = reader(5).ToString
           ComboBox6.Text = reader(6).ToString
           ComboBox1.Text = reader(7).ToString
           ComboBox2.Text = reader(8).ToString
           TextBox3.Text = reader(9).ToString
           ComboBox3.Text = reader(10).ToString
           ComboBox7.Text = reader(11).ToString
           ComboBox5.Text = reader(12).ToString
           TextBox4.Text = reader(13).ToString
           DateTimePicker1.Value = reader(14).ToString
           reader.Close()
       Else
           MsgBox("الـرخـصـة الـمـطـلـوبـة غـيـر مـوجـودة", MsgBoxStyle.Critical, "خـــطـــأ")
           reader.Close()
       End If
   End Sub


وهذا الكود الي يظهرلي فيه الخطأ 

كود :
Protected Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
       Dim da As New SqlDataAdapter("select * From Streets Where LocationID=" & Val(ComboBox1.SelectedValue), con)
       Dim ds As New DataSet
       da.Fill(ds, "Streets")
       ComboBox2.DataSource = ds.Tables("Streets")
       ComboBox2.DisplayMember = "StreetName"
   End Sub

 da.Fill(ds, "Streets")


هنا الخطأ على هذا السطر 
الرد }}}}
تم الشكر بواسطة: الضمير المستتر
#2
اغلق جملة الاتصال
CON.CLOSE
الرد }}}}
تم الشكر بواسطة: mona626 , الضمير المستتر
#3
نفس المشكله 

[url=http://www.up-00.com/][/url]
الرد }}}}
تم الشكر بواسطة: الضمير المستتر
#4
ارفق المشروع
الرد }}}}
تم الشكر بواسطة: الضمير المستتر
#5
في المرفقات


الملفات المرفقة
.rar   نـظـام إدارة الـتـقـاريـر.rar (الحجم : 234.69 ك ب / التحميلات : 26)
الرد }}}}
تم الشكر بواسطة: الضمير المستتر
#6
بصراحه المشروع فيه عده جمل اتصال ...
لماذا لا تكون واحده فقط عند بدء البرنامج؟ ولتكن في Module
بعد كل عملية استعلام او حذف او تعديل قم بقطع الاتصال .
الرد }}}}
تم الشكر بواسطة: الضمير المستتر
#7
سبب كثرة جمل الاتصال لاني مش عارفه الطريقة Sad
الرد }}}}
تم الشكر بواسطة: الضمير المستتر
#8
ما اشتغل معي البرنامج
لكن ضع
If con.State = ConnectionState.Open Then con.Close()
قبل جملة
da.Fill(ds, "Streets")
الرد }}}}
تم الشكر بواسطة: mona626 , الضمير المستتر
#9
ممكن ارفاق database فيها جدول واحد فقط وانا سأعطيك مثال لكل العمليات . وبمجموعة فورمات
الرد }}}}
تم الشكر بواسطة: mona626 , الضمير المستتر
#10
Reader.close
الرد }}}}
تم الشكر بواسطة: mona626 , الضمير المستتر


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في البحث بالتاريخ ____وايضا ____ بين تاريخين khaled12345 7 117 أمس, 03:55 PM
آخر رد: khaled12345
  [VB.NET] مشكلة في تعلم لغة vb.net anis789 3 86 أمس, 03:08 AM
آخر رد: silverlight
  مشكلة تفعيل ظهور checkbox في الفورم عامر الجبوري 4 87 21-05-17, 02:22 PM
آخر رد: alma2
  حل مشكلة " البرامج لا تعمل" عبدالرحمن المكاوي 4 89 20-05-17, 12:43 AM
آخر رد: عبدالرحمن المكاوي
  مشكلة في كود البحث فرجاء المساعدة khaled12345 5 94 19-05-17, 03:50 PM
آخر رد: khaled12345
  [VB.NET] حل مشكلة الارقام في الاداة DataGridview أبو نقطة 2 56 19-05-17, 12:10 PM
آخر رد: alma2
  مشكلة في كود جملة ال insert khaled12345 2 64 14-05-17, 10:20 AM
آخر رد: khaled12345
  [VB.NET] مشكلة بسيطة في برنامج بسيط يعتمد على( Multi-Threading) أبو نقطة 5 141 13-05-17, 07:41 AM
آخر رد: أبو نقطة
  مشكلة فى المشروع MOSTAFA.KAMEL 9 214 06-05-17, 03:46 AM
آخر رد: zinom
  [VB.NET] طلب حل مشكلة هذا الكود A-R 3 96 02-05-17, 05:10 PM
آخر رد: A-R

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


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