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


الملفات المرفقة صورة/صور
   

.rar   ddd.rar (الحجم : 69.35 ك ب / التحميلات : 8)
الرد
تم الشكر بواسطة:
#2
كود :
       ofd.Filter = "excel2013| * .xlsx|excel2003| * .xls"
       If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
           Dim path As String = ofd.FileName
           Dim CONN As New OleDbConnection("PROVIDER=MICROSOFT.ACE.OLEDB.12.0;DATA SOURCE=" & path & ";EXTENDED PROPERTIES=""Excel 12.0;HDR=Yes"";")
           Dim dt As New DataTable
           Dim da As New OleDbDataAdapter("select * from [Sheet1$]", CONN)
           da.Fill(dt)
           DataGridView1.DataSource = dt
       End If
جرب هذا الكود
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر




الرد
تم الشكر بواسطة: rnmr , ابراهيم ايبو , elgokr
#3
الاخ العزيز الفاضل اشكرك على سرعة الاستجابة فى تلبية الطلب وارجو شرح سبب الخطأ حتى يتم الاستفادة منه ........ وجعله الله فى ميزان
الرد
تم الشكر بواسطة: ابراهيم ايبو
#4
الخطأ الأول في المسار بتاع ملف الاكسيل :

"DATA SOURCE=path;"
كود :
DATA SOURCE=" & path & ";


الخطأ الثاني :
عبأت الداتا سيت و أردت تعبئة الجدول من الداتا تيبل

كود :
da.Fill(ds, "[Sheet1$]")
DataGridView1.DataSource = dt
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر




الرد
تم الشكر بواسطة: ابراهيم ايبو , elgokr
#5
الله عليك وعلى الشرح الجميل عشان نفهم
ولكن عند تعديل الكود وكتابة
( "[da.Fill(ds, "[Sheet1$
       DataGridView1.DataSource = ds
تظهر DataGridView خالية تماما ولا تعرض الجدول فلماذا؟؟
وشكرا على الشرح والتعليم
الرد
تم الشكر بواسطة: elgokr , elgokr
#6
(05-10-18, 05:22 AM)monm كتب : الله عليك وعلى الشرح الجميل عشان نفهم
ولكن عند تعديل الكود وكتابة
                   ( "[da.Fill(ds, "[Sheet1$
       DataGridView1.DataSource = ds
تظهر DataGridView خالية تماما ولا تعرض الجدول فلماذا؟؟
وشكرا على الشرح والتعليم

في التعليق السابق قلت لك مكان الأخطاء و في التعليق الذي يسبقه وضعت لك الكود الصحيح اعمل مقارنة بينهم .

عند استخدام الداتا سيت عليك وضعها كالتالي :

Dim ds As New Dataset
DataGridView1.DataSource = ds.Table("[Sheet1$]")

اما إذا كنت تستخدم داتا تيبل فتكتب كالتالي :

Dim DT as New DataTable
DataGridView1.DataSource=DT
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر




الرد
تم الشكر بواسطة: elgokr , elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  قمت بعمل مثال لإستخراج النصوص من الصورة واجهتني مشكلة اللغة العربية ماهو الحل mohamedgadain61 1 74 17-01-21, 07:54 AM
آخر رد: ابراهيم ايبو
  مشكلة تغير لون صف في داتاجريدفيو ahmed.fms 2 127 13-01-21, 02:31 PM
آخر رد: ahmed.fms
  [VB.NET] مشكلة عند عرض البيانات من الداتاجريد فيو ارهقتني محمد اسماعيل 12 371 08-01-21, 01:35 AM
آخر رد: محمد اسماعيل
  لدي مشكلة في كود تحديد مسار البرنامج أبو عبدالله الحلواني 4 286 01-01-21, 09:28 PM
آخر رد: سعود
  مشكلة استعلام textbox1 عن رقم مثل 10/20/1000/0 moodyfy 1 169 31-12-20, 09:37 PM
آخر رد: أبو عبدالله الحلواني
  مشكلة معرفة الخلية الفارغة في DataGridView mustafa mohamed 3 137 31-12-20, 04:23 AM
آخر رد: ابراهيم ايبو
Exclamation [سؤال] مشكلة في تشغيل برنامجي عند العميل بسبب الكريستال ريبورت solyH 4 2,229 21-12-20, 04:06 PM
آخر رد: Lathe1
  [VB.NET] استفسار بخصوص تحميل الصورة الى قاعدة البيانات dubai.eig 3 270 09-12-20, 10:01 PM
آخر رد: abu ammar
  شاشة قراءة الاسعار من قاعدة البيانات عبدالكريم رشدان 0 143 08-12-20, 10:46 PM
آخر رد: عبدالكريم رشدان
  [VB.NET] مساعدة في حل مشكلة imam_boune 1 227 08-12-20, 02:27 AM
آخر رد: Anas Mahmoud

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


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