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

يعني اريد الكود البرمجي ان
يحفظ هده البيانات في مكان اخر
وبعد دلك يحدفها لكي ادخل معلومات اخري في الصفوف
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام...
ممكن توضيح اكتر للفكرة!!
المبرمج لا يفكر في المشكلة بل في الحل!!
الرد }}}
تم الشكر بواسطة:
#3
(30-03-22, 05:13 PM)اسامه الهرماوي كتب : وعليكم السلام...
ممكن توضيح اكتر للفكرة!!
اريد كود برمجي يحفظ لي هده المعلومه التي في هده الخانه 

هنا في قاعدة بيانات اكسس في الخانه التي في الصف s
الرد }}}
تم الشكر بواسطة:
#4
اعمل جدول جديد يكون ارشيف و ضع محتوايات الصف في string و احذف الصف من الدول الحالي و ضيفه مرة اخرة في الجدول الجديد
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو
#5
(01-04-22, 05:30 AM)SaedAmer كتب : اعمل جدول جديد يكون ارشيف و ضع محتوايات الصف في string و احذف الصف من الدول الحالي و ضيفه مرة اخرة في الجدول الجديد

كيف احفظ هدا الصف هنا وفي قاعدة البيانات مثلا ارشيف كما قلت


او كيف انقل هدا الصف هنا باستعمال زر
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#6
(01-04-22, 07:10 PM)hafid33 كتب :
(01-04-22, 05:30 AM)SaedAmer كتب : اعمل جدول جديد يكون ارشيف و ضع محتوايات الصف في string و احذف الصف من الدول الحالي و ضيفه مرة اخرة في الجدول الجديد

كيف احفظ هدا الصف هنا وفي قاعدة البيانات مثلا ارشيف كما قلت


او كيف انقل هدا الصف هنا باستعمال زر

هذا الكود لجلب قيمة الصف الي انت واقف عليه
الطريقة الاولى :


كود :
Dim poss As Integer = DataGridView2.CurrentRow.Index
Dim p0 = DataGridView2.Rows(poss).Cells(0).Value
Dim p1 = DataGridView2.Rows(poss).Cells(1).Value
Dim p2 = DataGridView2.Rows(poss).Cells(2).Value
Dim p3 = DataGridView2.Rows(poss).Cells(3).Value
Dim p4 = DataGridView2.Rows(poss).Cells(4).Value

الطريقة التانية :

كود :
      Dim ssmms As String = ""
       Dim xx As Integer = DataGridView2.CurrentRow.Index

       Dim x(DataGridView2.ColumnCount) As String
       For ii = 0 To DataGridView2.ColumnCount
           Try
               x(ii) = DataGridView2.Rows(xx).Cells(ii).Value.ToString
               Application.DoEvents()
           Catch
           End Try
       Next





       For ii = 0 To DataGridView2.ColumnCount
           'Dim x(DataGridView1.Rows(xx).Cells(ii).Value.ToString) As String
           'MsgBox(x(ii))
           Try

               ssmms = ssmms + (x(ii) & ",")


           Catch
           End Try
       Next

       MsgBox(ssmms)
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#7
(01-04-22, 08:13 PM)SaedAmer كتب :
(01-04-22, 07:10 PM)hafid33 كتب :
(01-04-22, 05:30 AM)SaedAmer كتب : اعمل جدول جديد يكون ارشيف و ضع محتوايات الصف في string و احذف الصف من الدول الحالي و ضيفه مرة اخرة في الجدول الجديد

كيف احفظ هدا الصف هنا وفي قاعدة البيانات مثلا ارشيف كما قلت


او كيف انقل هدا الصف هنا باستعمال زر

هذا الكود لجلب قيمة الصف الي انت واقف عليه
الطريقة الاولى :


كود :
Dim poss As Integer = DataGridView2.CurrentRow.Index
Dim p0 = DataGridView2.Rows(poss).Cells(0).Value
Dim p1 = DataGridView2.Rows(poss).Cells(1).Value
Dim p2 = DataGridView2.Rows(poss).Cells(2).Value
Dim p3 = DataGridView2.Rows(poss).Cells(3).Value
Dim p4 = DataGridView2.Rows(poss).Cells(4).Value

الطريقة التانية :

كود :
      Dim ssmms As String = ""
       Dim xx As Integer = DataGridView2.CurrentRow.Index

       Dim x(DataGridView2.ColumnCount) As String
       For ii = 0 To DataGridView2.ColumnCount
           Try
               x(ii) = DataGridView2.Rows(xx).Cells(ii).Value.ToString
               Application.DoEvents()
           Catch
           End Try
       Next





       For ii = 0 To DataGridView2.ColumnCount
           'Dim x(DataGridView1.Rows(xx).Cells(ii).Value.ToString) As String
           'MsgBox(x(ii))
           Try

               ssmms = ssmms + (x(ii) & ",")


           Catch
           End Try
       Next

       MsgBox(ssmms)

الف شكر اخي لكن كيف احفظه في قاعدة البيانات في جدول ارشيف ويظهر في dgv 2

هدا الكود الدي اجلب به جدول قاعدة البيانات واضع قاعدة البيانات في
dgv

كود :
  da = New OleDbDataAdapter("select*from vente ", con)
       dt = New DataTable
       da.Fill(dt)
       DataGridView3.DataSource = dt


المشكل هو كيف ساضع الصفوف في الكود الدي كتبته لي يعني كيف اجلبه من قاعدة البيانات واضعه في جدول الارشيف
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو
#8
ارسل مثال مرفق بقاعدة البيانات للتعديل عليه
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#9
SaedAmerارسل مثال مرفق بقاعدة البيانات للتعديل عليه

https://www.mediafire.com/file/n6cnx71h1...1.rar/file
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل من الممكن العمل على قاعدة بيانات اكسل على الفيجوال بيسك خالد كامل1 4 83 24-03-24, 02:00 AM
آخر رد: خالد كامل1
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 158 25-02-24, 06:29 AM
آخر رد: loay775
  انشاء قاعدة بيانات من ملف سكربت strongriseman 5 500 17-02-24, 02:57 PM
آخر رد: strongriseman
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 249 11-02-24, 08:43 PM
آخر رد: assuhimi
  فلترة datagridview بدون قاعدة بيانات صالح عبدالله 3 295 02-02-24, 04:07 PM
آخر رد: صالح عبدالله
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 255 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 638 18-01-24, 11:40 PM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 275 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] إعادة استدعاء البيانات من قاعدة بيانات اكسس والاهم الصورة مبرمج صغير 1 1 273 13-01-24, 01:17 PM
آخر رد: مبرمج صغير 1
  [VB.NET] إضافة أو حذف حقل فى قاعدة بيانات باستخدام كود VB.net AmeenRashed 21 1,198 30-12-23, 03:47 PM
آخر رد: Taha Okla

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


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