Excel من دلفي عبر ADO
#1
السلام عليكم ورحمة الله
تماما مثل MS Access فقط الاختلاف:
أضف من الصفحة الثالثة لإعدادات الربط ADO ضمن الخيارات
PHP كود :
Extended Properties=Excel 8.0;HDR=Yes;IMEX=0 
للمزيد حول إعدادات الاتصال:
PHP كود :
http://www.connectionstrings.com/excel 

لأسباب أمنية قامت Microsoft بإضافة IMEX=1 لمنع التعديل
PHP كود :
http://support.microsoft.com/kb/904953/en 
جعلتها صفر لنتمكن من التعديل/الإضافة

الاستعلامات تكتب بشي مثل:
كود :
select * from [Sheet1$]
حيث Sheet1 تمثل اسم الوثيقة من ملف Excel
ولا يمكنك حذف سجلات كما هو الحال في البيانات العلائقية
PHP كود :
http://support.microsoft.com/kb/257819/en 
يعني للحذف: إجعل محتوى السجل فارغ!

بالتوفيق للجميع.


الملفات المرفقة
.7z   ExcelADO.7z (الحجم : 4.79 ك ب / التحميلات : 1,773)
[-] كل من 1 user says قال شكرا ل kachwahed على المشاركة المفيدة
  • tejmej
الرد
#2
تتم الاضافة في حقل واحد مادا عن الحقل Type
لا اله الا أنت سبحانك اني كنت من الضالمين
[-] كل من 1 user says قال شكرا ل me_delphi على المشاركة المفيدة
  • tejmej
الرد
#3
إقتباس :مادا عن الحقل Type
ScrollBar الأفقية أخي me&delphi Smile
عدلت على المرفق.
[-] كل من 1 user says قال شكرا ل kachwahed على المشاركة المفيدة
  • tejmej
الرد
#4
السلام عليكم أخي
لكن بعد فتح ملف Excel أي محتوى Sheet1 كيف ننقل البيانات من DBGrid إلى Table
[-] كل من 1 user says قال شكرا ل ouazanilarbi على المشاركة المفيدة
  • tejmej
الرد
#5
سلام عليكم
التحويل من excelالىparadox بواسطة ado
المزيد ان شاء الله في ايام المقبلة


الملفات المرفقة
.rar   Excel_Ado_Paradox.rar (الحجم : 10.94 ك ب / التحميلات : 815)
[-] كل من 1 user says قال شكرا ل mourad123 على المشاركة المفيدة
  • tejmej
الرد
#6
إقتباس :scrollbar الأفقية أخي me&delphi

بارك الله فيك أخي kachwahed Smile
لا اله الا أنت سبحانك اني كنت من الضالمين
[-] كل من 1 user says قال شكرا ل me_delphi على المشاركة المفيدة
  • tejmej
الرد
#7
mourad123 كتب :سلام عليكم
التحويل من excelالىparadox بواسطة ado
المزيد ان شاء الله في ايام المقبلة
شكراً على المجهود الكبير
هل يمكن إستعمال هذه الفكرة مع جدوال أكسس
[-] كل من 1 user says قال شكرا ل ouazanilarbi على المشاركة المفيدة
  • tejmej
الرد
#8
السلام عليكم

أخ mourad123 إستعملت TscExcelExport للتصدير وليس ADO

هذه هي الطريقة : وهي تصلح لجميع نظم قواعد البيانات التي يمكن الإتصال بها عبر الـ ADO ( حسب معلوماتي )
كود :
ADOConnection1.Execute('SELECT Field1,Field2,Field3 INTO mySheet ' + 'IN "'+ExtractFilePath(Application.ExeName )+'Export\myFile.xls" "Excel 8.0;" FROM TableName');
و السلام عليكم
[-] كل من 1 user says قال شكرا ل Lam.Abdeldjalil على المشاركة المفيدة
  • tejmej
الرد
#9
سلام عليكم
إقتباس :التحويل من excelالىparadox بواسطة ado
المزيد ان شاء الله في ايام المقبلة
اخيLam.Abdeldjalil لقد استعملت ado
شكرا على الملاحظات
[-] كل من 1 user says قال شكرا ل mourad123 على المشاركة المفيدة
  • tejmej
الرد
#10
و عليكم السلام و رحمة الله
إقتباس :اخيLam.Abdeldjalil لقد استعملت ado
هل أنت متأكد ؟ ماذا تفسر التالي
كود :
unit UExcel_Tout; uses ... [COLOR=Red]scExcelExport[/COLOR]..
[-] كل من 1 user says قال شكرا ل Lam.Abdeldjalil على المشاركة المفيدة
  • tejmej
الرد


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


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