تخزين مصفوفة Arraylist في قاعدة بيانات Access

تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تخزين مصفوفة Arraylist في قاعدة بيانات Access
#1
Exclamation 
السلام عليكم .
تحية لجميع الاعضاء و محترفي البرمجة في العالم العربي 
ممكن مساعدة في طريقة لحفظ مصفوفة من نوع Arraylist داخل table في قاعدة بيانات اكسس عن طريق كود vb.net و استرجاعها
الرد
تم الشكر بواسطة:
#2
السلام عليكم

المصفوفة إذا يكن أحد عناصرها تحتوي على تعدد أسطر ممكن تستخدم عمود نصي،

ممكن يتضح طلبك أكثر لو وضعت مشروع أو كود Arraylist، يعني المسألة فيها تفصيل، كسب نوعية البيانات.
الرد
تم الشكر بواسطة:
#3
شكرا على الرد اخي .
نفرض مثلا انه لدينا table به خانتين خانة من نوع الارقام 
و اخر من نوع Objet OLE .
اسم : class 
خانة : id 
خانة : etudiants
اريد ان اخزن مصفوفة من نوع Arraylist في خانة etudiants 
PHP كود :
Dim etudiant as new ArrayList 
etudiant
.add("said")
etudiant.add("ali")
etudiant.add("mohamed"
الرد
تم الشكر بواسطة:
#4
الكود يتعامل على اساس عمود نوع (نص)

هذا الكود يحول المصفوفة ArrayList الى نص
كود :
Dim etudiant As New ArrayList
etudiant.Add("said")
etudiant.Add("ali")
etudiant.Add("mohamed")


strValue = String.Join(vbNewLine, etudiant.ToArray)
MsgBox(strValue)

وهذا الكود لتحويل النص السابق الة مصفوفة ArrayList
كود :
Dim etudiant As New ArrayList(strValue.Split(vbNewLine))

لا ادري لماذا تستخدم النوع Objet OLE !
الرد
تم الشكر بواسطة:
#5
شكرا على الطريقة اخي الكريم .هل لا يمكن تحويلها الى binary و تخزينها بعد ذلك في السجل
الرد
تم الشكر بواسطة:
#6
يمكنك تحويل ArrayList الي DataTable و بالتالي سوف يصبح سهلا عليك حفظها في ملف Access أو ملف Sql او ملف من أي نوع
الكود التالي يوضح كيفية بناء DataTable من ArrayList
لكن لتضع في اعتبارك أن ArrayList تقبل متغيرات من أي نوع
و الأفضل لك أن تبني كلاس اسمه Student حتي تستطيع التحكم في المدخلات بشكل أفضل و تحويلها الي النوع الي تريده


PHP كود :
       Dim students As ArrayList = New ArrayList()

 
       students.Add("Ahmed")
 
       students.Add("Ali")
 
       students.Add("Omar")

 
       Dim dt As DataTable CType(NothingDataTable)
 
       dt = New DataTable With {.Locale System.Globalization.CultureInfo.InvariantCulture}
 
       Dim serialColumn As DataColumn = New DataColumn("No")
 
       Dim studentColumn As DataColumn = New DataColumn("Students")
 
       dt.Columns.Add(serialColumn)
 
       dt.Columns.Add(studentColumn)
 
       SyncLock students
            For i 
As Integer 0 To students.Count 1
                dt
.Rows.Add(New Object() {istudents(i)})
 
           Next
        End SyncLock 

الكود التالي يوضح كيفية عرض البيانات في داتاجريدفيو


PHP كود :
       DataGridView1.DataSource dt 
الرد
تم الشكر بواسطة:
#7
شكرا جزيلا على المساعدة ,اعرف كيف احولها الى datatable  استاذنا العزيز فقط كنت اود اعرف الطريق تخزين object  داخل خانة في قاعدة البيانات .
أسأل الله ان يعينكم كما ساعدتموني
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طلب مثال بسيط في ربط قاعدة بيانات tichouckt 3 37 منذ 5 ساعة مضت
آخر رد: سعود
  [VB.NET] كيف يمكن معرفة حجم قاعدة بيانات اكسسمن خلال VB.NET كريم جودي 4 74 11-08-18, 03:25 PM
آخر رد: كريم جودي
  مشكلة في تصدير بيانات جريد فيو الى ملف الاكسل Marwan9990 9 83 10-08-18, 10:51 PM
آخر رد: Marwan9990
Exclamation مشكلة في ربط المشروع بقاعدة بيانات YousefOkasha 3 70 10-08-18, 07:10 PM
آخر رد: elgokr
  [VB.NET] تحويل كود الفجوال بيسيك 6 الى الدوت نت (كود التنقل بين مصفوفة تكست بوكس) larbihamri 6 83 05-08-18, 07:26 PM
آخر رد: larbihamri
  [VB.NET] كيف اقوم بعمل المخطط البياني ياخذ الارباح الاسبوعية والشهرية والسنوية من قاعدة البي فراس الغزي 11 348 01-08-18, 02:42 AM
آخر رد: elgokr
  [VB.NET] VB.NET قاعدة بيانات SQL 2008 R2 محمد بوقزاحة 2 74 31-07-18, 10:45 AM
آخر رد: محمد بوقزاحة
  [VB.NET] ربط قاعدة بيانات أكسس مع Combobox Doctor GME 18 280 28-07-18, 06:25 PM
آخر رد: Doctor GME
  نقل قاعدة البيانات الى جهاز آخر بدون تثبيت SQL Server Management أسامة السالمي 10 312 28-07-18, 03:39 AM
آخر رد: dametucorazon
  [سؤال] هل ممكن طريقه بسيطه لعمل شات بين الاداره والفروع بقاعده بيانات MYSQL dametucorazon 9 164 27-07-18, 12:01 AM
آخر رد: elgokr

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


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