تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في الاتصال وتنفيذ الكود مرفق صورة
#1
السلام عليكم

هذه المشكلة اعاني منها من زمان هل لها حل ؟


الملفات المرفقة صورة/صور
   
الرد }}}}
تم الشكر بواسطة:
#2
اغلق القاريء بعد جملة الشرط
if drd.read then


end if
drd.close
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#3
PHP كود :
Dim da As New SqlDataAdapter("SELECT * FROM [T_RKSH] WHERE [T22]=@t22"Sqlconn)
da.SelectCommand.Parameters.AddWithValue("@t22"T1.Text.Trim)
Using dt As New DataTable
    If da
.Fill(dt) > 0 Then
Dim r 
As DataRow dt.Rows(0)

 
       T2.Checked r("T2")
 
       T3.Checked r("T3")
 
       T4.Checked r("T4")
 
       T5.Checked r("T5")
 
       T6.Checked r("T6")
 
       T7.Checked r("T7")

 
       T8.Text r("T8")

 
       T9.Checked r("T9")
 
       T10.Checked r("T10")
 
       T11.Checked r("T11")
 
       T12.Checked r("T12")
 
       T13.Checked r("T13")

 
       ChA.Checked r("Stop_and_start")

 
       T14.Text r("T14")

        
'T15.Text = r("T15") 'MetaData Picture?

 
       T16.Text r("T16")
 
       T17.Text r("T17")
 
       T18.Text r("T18")
 
       T19.Text r("T19")
 
       T20.Text r("T20")

 
   End If
End Using 
الرد }}}}
تم الشكر بواسطة: أبو فلان , أبو فلان
#4
قبل استخدام أمر Fill لملئ الجدول لم تقم بفتح الاتصال مع قاعدة البيانات

وبعد أمر Fill أغلق الاتصال
الرد }}}}
تم الشكر بواسطة:
#5
(23-05-16, 06:57 AM)سعود كتب : اغلق القاريء بعد جملة الشرط
if drd.read then


end if
drd.close

كما هو واضح مغلق الاتصال !!

(23-05-16, 09:43 AM)samerselo كتب : قبل استخدام أمر Fill لملئ الجدول لم تقم بفتح الاتصال مع قاعدة البيانات

وبعد أمر Fill أغلق الاتصال

لا اخي الاتصال مفتوح (:

(23-05-16, 07:18 AM)amgad525 كتب :
PHP كود :
Dim da As New SqlDataAdapter("SELECT * FROM [T_RKSH] WHERE [T22]=@t22"Sqlconn)
da.SelectCommand.Parameters.AddWithValue("@t22"T1.Text.Trim)
Using dt As New DataTable
    If da
.Fill(dt) > 0 Then
Dim r 
As DataRow dt.Rows(0)

 
       T2.Checked r("T2")
 
       T3.Checked r("T3")
 
       T4.Checked r("T4")
 
       T5.Checked r("T5")
 
       T6.Checked r("T6")
 
       T7.Checked r("T7")

 
       T8.Text r("T8")

 
       T9.Checked r("T9")
 
       T10.Checked r("T10")
 
       T11.Checked r("T11")
 
       T12.Checked r("T12")
 
       T13.Checked r("T13")

 
       ChA.Checked r("Stop_and_start")

 
       T14.Text r("T14")

 
       'T15.Text = r("T15") 'MetaData Picture?

 
       T16.Text r("T16")
 
       T17.Text r("T17")
 
       T18.Text r("T18")
 
       T19.Text r("T19")
 
       T20.Text r("T20")

 
   End If
End Using 


تسلم اخي [b]amgad525 اتعبتك في كتابة الكود Heart
ما المشكلة اخي ولما USING مع الاتصال بحثت عنها كثير في محاولة فهمها ولم اجد تفسير بالمراجع العربية سوى موظوع طرح هنا قبل فترة يتحدث عن الاتصالات بين السيرفر ودوال اللغة في طريقة جلب البيانات

هل لها علاقة بطريقة فتح الاتصال او حجم الييانات ):
[/b]
ممكن توضح اكثر عن
PHP كود :
MetaData 
الرد }}}}
تم الشكر بواسطة:
#6
(24-05-16, 03:09 AM)أبو فلان كتب :
(23-05-16, 06:57 AM)سعود كتب : اغلق القاريء بعد جملة الشرط
if drd.read then


end if
drd.close

كما هو واضح مغلق الاتصال !!
انا ماكتبت اللي كتبته الا لاني شايف انك اغلقت الاتصال قبل انتهاء الشرط
كرر النظر مرة اخرى وشكرا.

كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#7
وضعك مجرد صور أنت كده بتصعبها.
ارفع مشروعك وبتلاقي حلول سريعة.
الرد }}}}
تم الشكر بواسطة:
#8
(24-05-16, 04:51 PM)سعود كتب :
(24-05-16, 03:09 AM)أبو فلان كتب :
(23-05-16, 06:57 AM)سعود كتب : اغلق القاريء بعد جملة الشرط
if drd.read then


end if
drd.close

كما هو واضح مغلق الاتصال !!
انا ماكتبت اللي كتبته الا لاني شايف انك اغلقت الاتصال قبل انتهاء الشرط
كرر النظر مرة اخرى وشكرا.


للأسف اخوي سعود نفس الخطأ ضهر
الرد }}}}
تم الشكر بواسطة:
#9
المشكلة كانت من الاتصال نفسه والمتغير الخاص بالاتصال وتم حلها عن طريق Using فائدتها كما ذكرها الاخ احمد هنا

مع أن الامر Dispose ليس له فائده وهذه حالة استثنائية كما ذكرها الاخ الشاكي في الرابط *_-


شكرا للجميع Big Grin
الرد }}}}
تم الشكر بواسطة: الوادي
#10
يا أبو فلان، نفهم أن أمورك تمام؟
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في عرض التقرير بعد التحويل الي ملف تنفيذي mo93 6 90 منذ 9 ساعة مضت
آخر رد: mo93
Exclamation [VB.NET] تعديل على الكود mervandzz 2 29 أمس, 05:28 PM
آخر رد: mervandzz
Thumbs Up كيفية تشغيل وإغلاق الادوات الذكية لويندوز 7 عن طريق الكود رمضان محمد 7 916 أمس, 03:14 PM
آخر رد: رمضان محمد
  مشكلة فى جعل label شفاف بعد استخدام label1.BringToFront الماجيك مسعد 7 129 20-10-17, 01:21 PM
آخر رد: الماجيك مسعد
  [VB.NET] تصحيح مشكلة في المشروع dubai.eig 2 47 17-10-17, 12:41 PM
آخر رد: dubai.eig
  مشكلة تظهر في البرنامج بسبب الداتا بيس اكسس khaled12345 2 66 16-10-17, 07:41 AM
آخر رد: khaled12345
  مشكلة في قراءة قيمة من الريجستري سعود الشامان 14 278 13-10-17, 07:30 PM
آخر رد: سعود الشامان
  [VB.NET] اريد تعديل ع هذا الكود الرجاء مساعدتـي e-coder 0 42 13-10-17, 06:39 PM
آخر رد: e-coder
  [VB.NET] مطلوب التعديل علي الكود التالي محمد اسماعيل 2 65 11-10-17, 01:08 PM
آخر رد: محمد اسماعيل
  [VB.NET] التعديل على الكود - رقم التسلسلي dubai.eig 4 134 08-10-17, 11:30 PM
آخر رد: dubai.eig

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


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