تقييم الموضوع :
  • 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 ك ب / التحميلات : 36)
الرد }}}}
تم الشكر بواسطة: الضمير المستتر
#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 , الضمير المستتر


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] ما حل مشكلة تعارض Task مع Sleep؟ السندبااد 6 90 منذ 5 ساعة مضت
آخر رد: السندبااد
  مشكلة في قراءة قيمة من الريجستري سعود الشامان 12 149 أمس, 07:59 PM
آخر رد: سعود الشامان
  مشكلة عند التعامل مع DevExpress آمل أن أجد لها حلًا أحمد إبراهيم سعد 8 144 16-09-17, 08:02 PM
آخر رد: tarek
  [سؤال] مشكلة في حذف و تعديل بيانات DataGridView mohammed alnour 4 112 16-09-17, 01:01 AM
آخر رد: mohammed alnour
  [VB.NET] مشكلة في تعديل المشروع مصمم هاوي 9 517 15-09-17, 06:54 PM
آخر رد: مصمم هاوي
  [VB.NET] مشكلة اثناء تنفيذ المشروع ظاهر علي 1 41 15-09-17, 01:28 AM
آخر رد: أبو نوره
  [VB.NET] مشكلة طباعه بيانات من DataGridview رومنس الشوق 4 646 14-09-17, 06:24 PM
آخر رد: محمود صالح
  مشكلة الفورم الشفاف محمود صالح 2 129 14-09-17, 04:59 PM
آخر رد: محمود صالح
  [VB.NET] مساعدة في Card Reader 0theghost0 2 104 09-09-17, 05:25 PM
آخر رد: ola
  [VB.NET] لدي مشكلة مع كود التعديل 0theghost0 13 177 09-09-17, 05:24 PM
آخر رد: ola

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


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