PDA

نسخه کامل مشاهده نسخه کامل : خواندن اطلاعات از یک فایل اکسل


Delphi_Online999
15-09-2006, 03:38
چطور میشه اطلاعات را از یک فایل اکسل(micosoft Excel )خواند و آن را در یک بانک اطلاعاتی ثبت کرد....
codemaster
15-09-2006, 07:07
دوست من! براي اين كار بايد component مربوط به اون رو داشته باشی چون برای تخلیه اطلاعات از یک فایل
excel باید از ساختار اون فایل مطلع باشی ...
بنابر این دنبال component بگرد!

:)
NoneForce
15-09-2006, 10:23
سلام
در اين مورد قبلا در انجمن بحث شده است!
قبل از درخواست نمودن , از امكان جستجو استفاده نماييد.
...dta pro
15-09-2006, 14:36
یک راهی که من خودم استفاده کردم البته در افیس 2007 اینه کا توسط کلیک راست کردن بر روی تیبل وکلمه اکسپرت export
به یکی از فایلهای دیتا بیس یا پاراداکس تبدیل کنی
Delphi_Online999
21-09-2006, 01:37
سلام دوستان من اين مطالب را از سايت برنامه نويس گرفتم و اينجا قرار مي دهم تا دوستان هم استفاده كنند:

شما ميتونيد از ADO براي اينكار استفاده كنيد به اين صورت كه:
از يك ADOConnection استفاده كنيد و روي اون دوبار كليك كنيد
تا ويرايشگر ConnectionString باز بشه، روي دگمه Build كليك كنيد تا
فرم Data Link Properties باز بشه، از صفحه اول از بين Provider ها
Microsoft.Jet.OLEDB.4.0 رو انتخاب كنيد و به صفحه بعد يعني Connection بريد
تو اين صفحه آدرس فايل و نام فايل رو در جايي كه مشخص هست تايپ كنيد و به
صفحه آخر يا همون All بريد و از بين ويژگيهاي ليست شده Extended Properties رو
دوبار كليك كنيد و در فرمي كه باز ميشه در قسمت Value عبارت Excel 8.0 رو بنويسيد.
فرمهاي باز شده رو يكي يكي OK كنيد .

ADOConnectionرو انتخاب كنيد و ويژگي LoginPrompt رو False كنيد تا ديگه ازتون Username و
Password رو نپرسه.

حالا يك ADOTable روي فرمتون بگذاريد و اون رو به ADOConnection وصل كنيد.

موقعيكه ميخواهيد ليست جداول (Tablename) رو ببينيد تمام صفحات فايل Excel رو به همراه
يه علامت $ مياره كه اگه به همين شكل هم شما انتخاب كنيد و اون رو Open كنيد با Error
مواجه ميشيد ، پس جدول رو انتخاب كنيد و اون رو داخل براكت [] بگذاريد.

حالا ميتونيد استفاده كنيد.
mahdi bg
22-09-2006, 22:13
سلام

Delphi_Online999 جان

برای خواندن و نوشتن فایل در اکسس
از کامپوننت XLSReadWrite استفاده
کن

موفق باشی
مرد مباح
23-09-2006, 11:43
سلام دوستان من اين مطالب را از سايت برنامه نويس گرفتم و اينجا قرار مي دهم تا دوستان هم استفاده كنند:

شما ميتونيد از ADO براي اينكار استفاده كنيد به اين صورت كه:
از يك ADOConnection استفاده كنيد و روي اون دوبار كليك كنيد
تا ويرايشگر ConnectionString باز بشه، روي دگمه Build كليك كنيد تا
فرم Data Link Properties باز بشه، از صفحه اول از بين Provider ها
Microsoft.Jet.OLEDB.4.0 رو انتخاب كنيد و به صفحه بعد يعني Connection بريد
تو اين صفحه آدرس فايل و نام فايل رو در جايي كه مشخص هست تايپ كنيد و به
صفحه آخر يا همون All بريد و از بين ويژگيهاي ليست شده Extended Properties رو
دوبار كليك كنيد و در فرمي كه باز ميشه در قسمت Value عبارت Excel 8.0 رو بنويسيد.
فرمهاي باز شده رو يكي يكي OK كنيد .

ADOConnectionرو انتخاب كنيد و ويژگي LoginPrompt رو False كنيد تا ديگه ازتون Username و
Password رو نپرسه.

حالا يك ADOTable روي فرمتون بگذاريد و اون رو به ADOConnection وصل كنيد.

موقعيكه ميخواهيد ليست جداول (Tablename) رو ببينيد تمام صفحات فايل Excel رو به همراه
يه علامت $ مياره كه اگه به همين شكل هم شما انتخاب كنيد و اون رو Open كنيد با Error
مواجه ميشيد ، پس جدول رو انتخاب كنيد و اون رو داخل براكت [] بگذاريد.

حالا ميتونيد استفاده كنيد.

ممنون از روشت.
خيلي راحت و دم دست بود.
ممنون كه اينجا هم جواب رو گذاشتي.