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

أردت انشاء (تعديل) من داخل الداتا جريد فيو عن طريق عامود... وعند الضغط عليه تظهر البيانات التي أريد تعديلها.
قمت بالدخول إلى (DataGridView Tasks) بالضغط على (Edit Column) ثم إلى Add واخترت العمود (تعديل).. وغيرت (ColumnType) إلى (DataGridViewImageColumn) واخترت لها صورة معينة.
المشكلة:
عند تشغيل البرنامج تظهر معلومات الداتا جريد المخزنة، عدا عمود (التعديل) ثم تظهر رسالة ... وعند الضغط على (Ok).. يظهر عمود (التعديل) وعند الضغط على التعديل ترجع الرسالة وتظهر.


كود :
Private Sub DGVPrd_CellContentClick(sender As Object, e As DataGridViewCellEventArgs)
      If e.ColumnIndex = 12 Then

          If Con.State = 1 Then Con.Close()
          Con.Open()
          cmd = New SqlCommand("select * from bok_tbl where Bok_ID=@Bok_ID", Con)
          cmd.Parameters.AddWithValue("@Bok_ID", DGVPrd.CurrentRow.Cells(0).Value)
          rdr = cmd.ExecuteReader
          rdr.Read()
          If rdr.HasRows Then
              With Frm_Add_Update_Prd
                  .load_Bok_tbl()
                  .Bok_ID.Text = rdr("Bok_ID").ToString
                  .Bok_Parcode.Text = rdr("Bok_Parcode").ToString
                  .BokName.Text = rdr("BokName").ToString
                  .BokMulf.Text = rdr("BokMulf").ToString
                  .BokMhqq.Text = rdr("BokMhqq").ToString
                  .BokDar.Text = rdr("BokDar").ToString
                  .BokNshr.Text = rdr("BokNshr").ToString
                  .BokTbAh.Text = rdr("BokTbAh").ToString
                  .TabhData.Text = rdr("TabhData").ToString
                  .BokVol.Text = rdr("BokVol").ToString
                  .Bokprice.Text = rdr("Bokprice").ToString
                  .CmbCat.SelectedValue = rdr("Cat_ID").ToString
                  Dim data As Byte() = DirectCast(rdr("BokImage"), Byte())
                  Dim ms As New MemoryStream(data)
                  Dim bitamp As New System.Drawing.Bitmap(ms)
                  .BokImage.Image = bitamp
                  .Label1.Text = "تعديل بيانات الكتاب" & DGVPrd.CurrentRow.Cells(2).Value
                  .btnSavebok.Enabled = False
                  .btneditBok.Enabled = True
                  .Show()
              End With
          End If
          rdr.Close()
          Con.Close()

      ElseIf e.ColumnIndex = 13 Then

      End If
  End Sub



وللايضاح الصور في المرفقات...

وجزى الله خيراً كل من مد يد العون للمساعدة


الملفات المرفقة صورة/صور
       
الرد }}}
تم الشكر بواسطة:
#2
ادخل على خصائص العمود (تعديل) مره اخرى
وامسح الموجود في الخاصية DataPropertyName

اذا استمرت المشكلة اذكر مع التوضيح
كيف تربط الداتاجريد بالبيانات
الرد }}}
تم الشكر بواسطة: safralfahd , نيمو
#3
لا يوجد شيء لأمسحه في خاصية DataPropertyName

عن طريق choose data source
الرد }}}
تم الشكر بواسطة: نيمو
#4
المشكلة مش من الكود , جربت عملت جدول وداتا كرد وعملت نفس الخطوات وظهرت نفس المشكلة
لايمكن التحويل من string الى Drawing
مسحت اسم العمود من خاصية DataPropertyName
ومسحت العمود من الاكسس وانشات اخر بنوع بيانات مرفق مش نص
واختفت المشكلة وظهرت الصورة

[صورة مرفقة: 165412644143151.png]
الرد }}}
تم الشكر بواسطة: safralfahd
#5
ولو كانت قاعدة بيانات سيكوال كيف العمل؟
الرد }}}
تم الشكر بواسطة: نيمو
#6
اعتقد نفس الفكرة
يمكن مايتعرف الداتا كرد على نوع الحقل في السكيول سيرفر
ارفق صورة لخصائص الكولم للتعديل في الداتا كرد مثل هذه

[صورة مرفقة: 165413166020851.png]
الرد }}}
تم الشكر بواسطة: Ahmads , safralfahd
#7
جزاك الله خيراً الحمد لله انتهت المشكلة وعملت بشكل صحيح
الرد }}}
تم الشكر بواسطة: نيمو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارجو المساعدة في فك تسفير ملف xml mimomassa17 0 209 15-09-24, 03:23 PM
آخر رد: mimomassa17
  ما معنى هذه المشكلة وما هو حلها ؟ saud1004 4 307 01-09-24, 02:42 PM
آخر رد: ahlamalgomate2020
  أرجو توضيح هذه الرسالة توقفت عن العمل بسببها saud1004 2 240 13-08-24, 11:51 AM
آخر رد: saud1004
  ارجو المساعدة في كود مقارنة عامود داخل الداتا جريد فيو alachk 11 1,076 11-08-24, 11:44 AM
آخر رد: alachk
  المساعدة في عملية طرح الوقت من خلال اثنين textbox جيولوجي مبتدئ 9 2,757 06-08-24, 07:43 PM
آخر رد: خالد كامل1
  [VB.NET] ممكن المساعدة في اجراء بحث كومبوبكس وتيكست raedre22 20 1,115 18-07-24, 12:18 PM
آخر رد: raedre22
  ماهو حل هذه المشكلة مع السكانر؟ صالح عبدالله 3 494 11-05-24, 02:35 PM
آخر رد: قناص المدينة
  ممكن حل المشكلة فى الكود التالي - من مشاركة استاذنا القدير / عبدالله الدوسري new_programer 4 606 02-03-24, 07:36 PM
آخر رد: new_programer
  ارجو المساعدة فى شاشة طباعة الباركود new_programer 10 1,185 09-01-24, 08:41 PM
آخر رد: new_programer
  المساعدة - في تفعيل نسخة VB 2015 emamtron2014 2 5,651 24-12-23, 05:08 AM
آخر رد: laban

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


يقوم بقرائة الموضوع: