تقييم الموضوع :
  • 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 حقول إذا تطابقت يعبر السجل مكرر فقط في حال تكررت الخمس حقول
المطلوبه وإلا يكون السجل غير مكرر
وفي حال التكرار يتم ارسال المكرر الى مجلد محدد
وفي حالة أن السجل ليس به اجراء يعتبر جديد
وفي حال لو قراءنا سجل به اجراء ولم يوجد له سجل سابق مكرر في الحقول الخمس المطلوبة يعتبر ليس له اساس

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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة قاعدة البيانات لا تقبل البيانات بعد التنصيب abozeyd 8 243 10-09-18, 08:02 AM
آخر رد: elgokr
  هل يمكن نقل بيانات DataGridView إلى Dataset . عبد الله 7 1,804 03-09-18, 11:23 PM
آخر رد: انيس القبائلي
  سؤال حول عرض البيانات في الداتا جريد والاستعلام alfaiz678 12 505 25-08-18, 10:00 PM
آخر رد: elgokr
  [سؤال] حول تحديث البيانات داخل DataGridView مبرمج بلا حدود 20 3,602 14-08-18, 09:00 PM
آخر رد: elgokr
  كيفية حفظ التعديل في Data Grid View مباشرا الى قاعدة البيانات اللورد محمود 1 321 02-08-18, 07:26 PM
آخر رد: سعود
  [سؤال] كيفية ربط قاعدة بيانات اكسس 2007 بالفيجوال 2008 mohmedhosen 3 5,352 16-07-18, 08:48 PM
آخر رد: aridje34
  خطأ في الإتصال بقاعدة البيانات الموجودة على هذا السيرفر (ويندوز 10) djelloul 0 191 04-05-18, 12:14 AM
آخر رد: djelloul
  بحث و اظهار سجلات من قاعدة البيانات في حال تساوت اول 4 ارقام من text بالقيمه الموجود ahmed_elwerfalli 0 232 25-04-18, 04:12 PM
آخر رد: ahmed_elwerfalli
Tongue ربط قاعدة بينات اكسل مع الفيجوال عمار عيثاوي 3 2,384 02-03-18, 05:13 PM
آخر رد: محمد بن عطية
  إضافة الصورة في قاعدة البيانات iFanfan 0 318 01-03-18, 06:02 PM
آخر رد: iFanfan

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


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