تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
محتاج قبل اما البرنامج يقفل ياخد اخر row فى الداتاجريد فيو يحطها فى داتا جريد فيو
#1
محتاج قبل اما ادوس على علامة X(الخروج)من  البرنامج  ياخد اخر row فى الداتاجريد فيو يحطها فى  داتا جريد فيو تانية اوتوماتيك  بس ياخد اخر سطر بس انا مستخدم DATAADAPTER ,DATATABEL
الرد }}}}
تم الشكر بواسطة:
#2
الداتاجريد فيو الاخرى هل هي بنفس الفورم -1
2-هل هي مربوطة؟
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#3
بنفس الفورم اة
مربوطة ازاى؟؟؟
الرد }}}}
تم الشكر بواسطة:
#4
(28-08-16, 02:34 PM)araxis كتب : بنفس الفورم اة
مربوطة ازاى؟؟؟

يعني هل هي مربوطة بقاعدة بيانات؟
اكتب شوية تفاصيل لعل نساعدك بحل سريع.
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#5
ايوة مربوطة بقاعدة بيانات
باختصار انا عاوز قبل اما البرنامج يقفل ياخد اخر سطر بالكامل من داتا جريد فيو واحد لداتا جريد فيو 2
ولو فية سطر فى داتا جريد فيو 2 عن قفل البرنامج يععمل replace للسطر القديم بالجديد
الرد }}}}
تم الشكر بواسطة:
#6
طيب الامر سهل تقوم باضافة الصف الاخير من الداتاتيبل الاولى الى الداتاتيبل الاخرى.
اذا اردت مثال اكتب رد.
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#7
ادينى مثال اة

بس محتاجة اوتوماتيك يعنى اول اما اقفل البرنامج ييضيف اوتوماتيك ولو فية صف موجود قبل كدة يبدلة بالجديد
الرد }}}}
تم الشكر بواسطة: سعود
#8
هل المشكلة في عدم معرفة حدث الاغلاق؟
والا المشكلة في عدم القدر على اضافة صف من جريد لجريد ثاني؟
وهل الاضافة للجريد الثاني او الاستبدال راح يكون بس في الجريد والا يتخزن في جدول؟
حاول تجاوب على الاسئلة على شان ما يتعب اللي يحاول يجاوبك
ولو انت رافع مثال لطلبك كان زمانك لقيت الحل
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة: سعود
#9
المثال مرفق

طبعا النسخ من dt1 الى dt2
dt1=DataTable1
dt2=DataTable2
وفيه حالتين لـكل من dt1 و dt2 من حيث احتواءها على صفوف .....اطلع على المثال.
ولو حبيت الكلاس هذا هو:
PHP كود :
Imports System.Data.OleDb

Public Class Form1
    Dim str 
As String "provider=microsoft.ace.oledb.12.0;data source=db.accdb"
 
   Dim con As New OleDb.OleDbConnection(str)

 
   Dim da1 As OleDbDataAdapterda2 As OleDbDataAdapter
    Dim dt1 
As DataTabledt2 As DataTable

    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        gd
()
 
   End Sub

    Dim cm1 
As OleDbCommandBuildercm2 As OleDbCommandBuilder

    Private Sub gd
()
 
       da1 = New OleDbDataAdapter("select * from tb1"con) : da2 = New OleDbDataAdapter("select * from tb2"con)
 
       cm1 = New OleDbCommandBuilder(da1) : cm2 = New OleDbCommandBuilder(da2)
 
       dt1 = New DataTable dt2 = New DataTable
        da1
.Fill(dt1)
 
       da2.Fill(dt2)

 
       d1.DataSource dt1 d2.DataSource dt2

        d1
.Columns(0).Width 100 d2.Columns(0).Width 100
        d1
.Columns(1).Width 285 d2.Columns(1).Width 285

        d1
.Columns(0).HeaderText "الرقم" d2.Columns(0).HeaderText "الرقم"
 
       d1.Columns(1).HeaderText "الاسم" d2.Columns(1).HeaderText "الاسم"

 
   End Sub

    Private Sub Form1_FormClosing
(sender As ObjectAs FormClosingEventArgsHandles Me.FormClosing
        e
.Cancel True

        da1
.Update(dt1)



 
       If dt1.Rows.Count 0 Then


            If dt2
.Rows.Count 0 Then
                Dim row 
As DataRow dt2.Rows(Me.BindingContext(dt2).Position)
 
               row.BeginEdit()
 
               row(1) = dt1.Rows(dt1.Rows.Count 1)(1)
 
               row.EndEdit()
 
               da2.Update(dt2)
 
           Else
                Dim row 
As DataRow dt2.NewRow
                row
(1) = dt1.Rows(dt1.Rows.Count 1)(1)
 
               dt2.Rows.Add(row)
 
               da2.Update(dt2)

 
           End If

 
       End If



 
       e.Cancel False
    End Sub
End 
Class 


الملفات المرفقة
.zip   CopyLastRowFromDatagridviewToOther.zip (الحجم : 57.17 ك ب / التحميلات : 122)
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة: أبو عمر , araxis
#10
Wink 
طيب انسى الكلام اللى فات خالص
شايف الصورة اللى فى المرفقات
اثناء مالبرنامج شغال الcell اللى بالاسود والاحمر اللى فى الداتا جريد فيو اللى فوق بيساوى التكست بوكس اللى متعلمين عليهم بالاسود والاحمر ودول بيتغيروا كل شوية يعنى كل اما الرقم اللى فى التكست بوكس بيتغير كل ما الرقم اللى فى الcell الاحمر والاسود اللى فى الداتا جريد فيو اللى فوق تتغير هى بتتغير اثناء مالبرنامج شغال والمفروض عامل كود ال save كمان
باجى اقفل وافتج تانى الاقى مفيش حاجة اتغير فى ال2 cell دول


الملفات المرفقة صورة/صور
   
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  داتا جريد فيو abdel.halim 5 56 منذ 1 ساعه مضت
آخر رد: حريف برمجة
  تصفير الداتا جريد فيو عند كل إضافه جديدة. nassery99 16 230 منذ 5 ساعة مضت
آخر رد: nassery99
  تغير حجم شاشات البرنامج عند العمل على شاشات اخرى nassery99 3 78 16-10-17, 12:42 PM
آخر رد: silverlight
  مشكلة تظهر في البرنامج بسبب الداتا بيس اكسس khaled12345 2 64 16-10-17, 07:41 AM
آخر رد: khaled12345
  ما هي افضل طريقة لجعل البرنامج تجريبي محمود صالح 3 145 15-10-17, 11:32 PM
آخر رد: hoshosgost@yahoo.com
  [سؤال] ظهور البرنامج عند الضغط على رابط ابو روضة 4 93 14-10-17, 10:55 PM
آخر رد: ابو روضة
  [VB.NET] فتح نموذج بناءا علي قيمة في الداتا جريد فيو haithammoftah 3 68 14-10-17, 07:55 PM
آخر رد: Amir_alzubidy
  ظهور البرنامج عند نسخ رابط ابو روضة 8 175 12-10-17, 02:47 PM
آخر رد: ابو روضة
  محتاج للتواصل مع مسؤولي المنتدى ولا احد يجيب . Rabeea Qbaha 7 138 11-10-17, 01:12 AM
آخر رد: Amir_alzubidy
  [سؤال] رسالة خطأ بعد تنصيب البرنامج على جهاز آخر aftfm 1 59 09-10-17, 06:57 PM
آخر رد: Adrees

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


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