+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : مشكل في استيراد معلومات من ملف Excel (/showthread.php?tid=9188)
مشكل في استيراد معلومات من ملف Excel - fouad - 19-02-2018
السلام عليكم ورحمة الله تعالى وبركاته
لقد حاولت استيراد معلومات من ملف Excel ولكن فشلت المحاولة
لدي جدول في قاعدة بيانات وفيه 3 حقول و 2 سجلات واريد اضافة سجلات اخرى انطلاقا من ملف اكسل
ملف الاكسل يحتوي على السجلات التالية
![[صورة: 2.png]](https://image.ibb.co/n9dvqn/2.png)
ويوجد هذا الملف في المسار التالي
![[صورة: 4.png]](https://image.ibb.co/bvDs37/4.png)
والكود كالتالي :
PHP كود :
ABSQuery1.Close;
ABSQuery1.SQL.Clear;
ABSQuery1.SQL.Text := 'INSERT INTO vendeur SELECT * FROM [Excel 8.0;database=C:\ex.xls].Sheet1';
ABSQuery1.ExecSQL;
والنتيجة هي كالتالي
![[صورة: 3.png]](https://image.ibb.co/mgf8An/3.png)
لقد شاهدت احد دروس الاخ رؤوف رحيش ولكن لم تنجح الطريقة
لا اعلم ماهي المشكلة هنا
RE: مشكل في استيراد معلومات من ملف Excel - h-farid - 19-02-2018
و عليكم السلام و رحمة الله و بركاته
جرب تغيير مكان الملف إلى مجلد سطح المكتب مثلا. فقد يكو المشكل متعلق بالكتابة و القراءة من / إلى المسار المحدد.
كذلك جرب حفظ ملف الاكسل بتنسيق اكسل 2003 أو اكسل 1997.
RE: مشكل في استيراد معلومات من ملف Excel - fouad - 20-02-2018
(19-02-2018, 12:22 PM)h-farid كتب : و عليكم السلام و رحمة الله و بركاته
جرب تغيير مكان الملف إلى مجلد سطح المكتب مثلا. فقد يكو المشكل متعلق بالكتابة و القراءة من / إلى المسار المحدد.
كذلك جرب حفظ ملف الاكسل بتنسيق اكسل 2003 أو اكسل 1997.
جزاك الله خيرا اخ farid
لقد عالجت المشكلة باستعمال مكون Qimport3Wizard من تجميعة EMS Advanced Data Import VCL
في الحقيقة هو مكون رائع ويكفي وضع المكون على الفورم وتغيير خاصية Data Set وخاصية Dbgrid و كتابة الامر التالي
PHP كود :
Qimport3Wizard1.Execute;
وتنتهي المشكلة