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

البرنامج فكرته قراءة ملف نصي الى الداتا قريد ومن ثم تحليل للسجلات المكررة وفق معطيات وبعد ذلك يتم حفظها الى جدول بقاعدة بيانات اكسس

ولكن هل من طريقة لتسريع القراءة الي القريد
وإيظاً الحفظ يأخذ اكثر وقت

هناك ملف نصي للسجلات المطلوب قراءتها في مجلد File

ارجوا ايجاد حل مناسب لتسريع القراءة والحفظ


الملفات المرفقة
.rar   AFTFM2.rar (الحجم : 114.85 ك ب / التحميلات : 83)
الرد
تم الشكر بواسطة:
#2
.....


إختصار كود Button1 من 250 سطر إلى 10 أسطر (طبعاً غير صحيح أن الأسطر القليلة تزيد في السرعة وإنما استخدام الأكواد الصحيحة)
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim op As New OpenFileDialog
    op.Filter = "الملفات النصية(*.txt)|*.txt"
    op.Title = "قراءة الملفات"
    If op.ShowDialog = Windows.Forms.DialogResult.OK Then
        Dim rows As String() = IO.File.ReadAllLines(op.FileName)
        For Each row As String In rows
            Me.DataGridView1.Rows.Add(Split(row, "@"))
        Next
        MsgBox("عدد السجلات المقروءة : " & Me.DataGridView1.Rows.Count, MsgBoxStyle.MsgBoxRight + MsgBoxStyle.MsgBoxRtlReading, "السجلات")
    End If
End Sub
الرد
تم الشكر بواسطة: aftfm , Mohamed371
#3
الف شكر اخي العزيز vbnet

صحيح كلامك لكن هناك ترتيب معين اريدة وهو تقسيم النص وتوزيعه بشكل غير الذي كان عليه
لذلك قمت بتقسيمه وتوزيعه ووضعه على القريد ومن ثم الحفظ بشرط التكرار في عدد 5 حقول إذا تطابقت يعبر السجل مكرر فقط في حال تكررت الخمس حقول
المطلوبه وإلا يكون السجل غير مكرر
وفي حال التكرار يتم ارسال المكرر الى مجلد محدد
وفي حالة أن السجل ليس به اجراء يعتبر جديد
وفي حال لو قراءنا سجل به اجراء ولم يوجد له سجل سابق مكرر في الحقول الخمس المطلوبة يعتبر ليس له اساس

لان المفروض أن يتم قراءة السجلات التي ليس بها اجراء أولاً ومن ثم قراءة السجلات التي تم اتخاذ فيها اجراء معين

هذه فكرة البرنامج
و
هذه فكرة الكود الطويل
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عمل قاعدة البيانات salah mansour 0 3 منذ 20 دقيقة مضت
آخر رد: salah mansour
  [VB.NET] حفظ البيانات دفعة واحدة الداتا جريد فيو mahmoud.3com 1 112 16-12-18, 09:07 PM
آخر رد: viv
  سؤال فى قواعد البيانات احمد خطاب 5 119 26-11-18, 03:41 AM
آخر رد: elgokr
  مشكلة قاعدة البيانات لا تقبل البيانات بعد التنصيب abozeyd 8 325 10-09-18, 08:02 AM
آخر رد: elgokr
  هل يمكن نقل بيانات DataGridView إلى Dataset . عبد الله 7 1,896 03-09-18, 11:23 PM
آخر رد: انيس القبائلي
  سؤال حول عرض البيانات في الداتا جريد والاستعلام alfaiz678 12 665 25-08-18, 10:00 PM
آخر رد: elgokr
  [سؤال] حول تحديث البيانات داخل DataGridView مبرمج بلا حدود 20 3,824 14-08-18, 09:00 PM
آخر رد: elgokr
  كيفية حفظ التعديل في Data Grid View مباشرا الى قاعدة البيانات اللورد محمود 1 461 02-08-18, 07:26 PM
آخر رد: سعود
  [سؤال] كيفية ربط قاعدة بيانات اكسس 2007 بالفيجوال 2008 mohmedhosen 3 5,522 16-07-18, 08:48 PM
آخر رد: aridje34
  خطأ في الإتصال بقاعدة البيانات الموجودة على هذا السيرفر (ويندوز 10) djelloul 0 241 04-05-18, 12:14 AM
آخر رد: djelloul

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


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