انتقال داده ها از dbgrid به اکسل

[khoshblagh]

با سلام خدمت دوستان
کسی میدونه چطور محتویات یک گرید که به یک بانک وصله با زدن یک دکمه به فایل اکسل انتقال داد. متشکرم

[یاسر مددیان]

به این لینک یه نگاه بنداز مشکلت حله.

http://www.swissdelphicenter.ch/torry/showcode.php?id=1427

[MSHService]

سلام

پیشنهاد من استفاده از کامپوننته , Excel Report, EMS QuickExport II هست.

منم قدیما خیلی درگیر این بودم. بهترین کار برای برنامه های ادارات دولتی که عشقه Excel هستند از نظر

من همین Export کردن تو اکسله.

موفق باشید.:لبخند:

[mina_148m]

کسی میدونه چطور محتویات یک گرید که به یک بانک وصله با زدن یک دکمه به فایل اکسل انتقال داد. متشکرم

با سلام
و تشکر از لطف و کمک دوستان
منم دقیقا همین مشکل رو دارم
و از راه حلهای دوستان نیز اسفاده کردم ولی حل نشد
به لینک زیر

http://www.swissdelphicenter.ch/torr...de.php?id=1427 (http://www.swissdelphicenter.ch/torry/showcode.php?id=1427)

هم رفتم ولی نشد
خیلی خیلی ممنون می شم کمکم کنید
با تشکر

[mina_148m]

از دوستان واقعا کسی نمی تونه به من کمک کنه؟
خواهش می کنم :افسرده::ناراحت:

[hadisalahi2]

خوب ماباید از کجا بدونیم مشکل شماچیه که حلش کنیم؟
اگه مشکل توی اکسپورت کردن به اکسل است که با همون کامپوننتهایی که دوستمون گفته خیلی راحت و خیلی پیشرفته اطلاعات رو چه از ADOQuery وچه از DBGrid میشه راحت به اکسل اکسپورت کرد.
پس اگه میشه مشکلتون رو خیلی روشن و دقیق بیان کنید

[mina_148m]

با همون کامپوننتهایی که دوستمون گفته خیلی راحت و خیلی پیشرفته اطلاعات رو چه از ADOQuery وچه از DBGrid میشه راحت به اکسل اکسپورت کرد.


مشکلم همونه که با زدن کلید اطلاعات dbgrid که به بانک اطلاعاتی access وصله،به فایل اکسل ،
export کنم
فقط نمی دونم منظورتون کدوم کامپوننتها ست؟
می شه بیشتر توضیح بدید

[hadisalahi2]

منظورم همون کامپوننت هایEMS QuickExport که دوستمون گفتند.
ارسال داده ها هم فقط با یک دستور Execute انجام میشه.
اگه کلا در این مورد هیچ اطلاعاتی نداری و اصلا این کامپوننت ها رو نداری بگو تاهم برات آپ لود کنم و هم روش کار رو برات کامل توضیح بدم.
یا حق

[mahsa119]

به این لینک یه نگاه بنداز مشکلت حله.

http://www.swissdelphicenter.ch/torr...de.php?id=1427

این Error پس چیه ؟

در این خط برنامه :
cat._Set_ActiveConnection('Provider=Microsoft.Jet. OLEDB.4.0 ' + ';' + ' Data Source=' + FileName + ' ; ' + ' Extended Properties=Excel 8.0') ;
این پیغام رو میده :

[Error] ExportToExcel.pas(82): Incompatible types: 'String' and 'IDispatch'

[mina_148m]

منظورم همون کامپوننت هایEMS QuickExport که دوستمون گفتند.
ارسال داده ها هم فقط با یک دستور Execute انجام میشه.
اگه کلا در این مورد هیچ اطلاعاتی نداری و اصلا این کامپوننت ها رو نداری بگو تاهم برات آپ لود کنم و هم روش کار رو برات کامل توضیح بدم.
یا حق
دقیق همینطوره:ناراحت:
خیلی خیلی ممنون می شم از لطفتون

[hadisalahi2]

با سلام
دوست عزیز به دلیل اینکه حجم کامپوننت کمی بالاست اونها رو در چن پست براتون میفرستم.
این فایل ها مربوط به زبان و راهنما میشه.

[hadisalahi2]

با سلام و با عرض شرمندگی اگه میشه ایمیلت رو بده تا برات بفرستم.
اما نحوه کار کردن با این کامپوننت:
1-در صورتی که قصد ارسال داده ها به اکسل را دارید کامپوننت QExport4XLS را بر روی فرم قرار دهید.
2- در صورتی که قسط ارسال داده های DBGrid یا Query را دارید ، خاصیت Export Source را با گزینه موردنظر مقدار دهی نمایید.
3- حال با توجه به انتخاب یکی از موارد بالا خاصیت های DBGrid یا DataSource را مقدار دهی نمایید.
4- حال برای ارسال داده ها می توانید از کد زیر استفاده نمایید.



QExport4XLS1.Execute;

5- در صورتی که قصد ارسال فیلدهای خاصی را دارید میتوانید از دستور زیر استفاده نمایید.



QExport4XLS1.ExportedFields.Add('FiledName')

6-برای تنظیم سایر قسمتها به صورت سفارشی بر روی کامپوننت مورد نظر دابل کلیک کنید و تنظیمات لازم را در پنجره ای که باز می شود انجام دهید.

باز هم سوالی بود ، در خدمتیم.
یا حق

[aserfg]

با سلام به دوست گل این هم لینک دانلود کامپوننت شما :
[code]http://www.4shared.com/get/121406411/f0230c5b/ems_quickexport_component_suite_v_2_20.html]

[mina_148m]

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

اول اینکه من جدول دادمو طوری تنظیم کردم که موقع اجرا caption فیلدهارو هم تو dbgrid وهم تو excel فارسی بیندازه
ولی انگلیسی میفته در صورتی که تو برنامه access جدولم وقتی که open می کنم درست اجرا میشه
برنامه خودم رو می فرستم ممنون می شم ببینید اشکالش کجاست

دوم اینکه من این کار برا گزارش گیری میخام چه جور برنامه رو درست کنم که بتونم تو اخر برنامه excel خودم چندتا جا هم برای امضا بزارم مثلا بنویسم مدیر....و معاون...

خیلی خیلی ممنون میشم منو راهنمایی کنی
از وقتی که میزارید خیلی ممنونم

[Tasnim]

بهترین کار استفاده از کامپونت ها یبسیار قوی Excel Report, EMS QuickExport
این کامپونتها قابلیت IMPORT و EXPORT داده به فایل ورد و اکسل و اکسس و XML و فایل متنی و... رو داره
اگه نسخه کاملشو خاستی تماس بگیر
موفق باشی

[mina_148m]

از دوستان عزیز کسی نمی دونه مشکل این برنامه چیه؟:ناراحت::ناراحت:
خیلی خیلی ممنون می شم کمکم کنید:افسرده:

[hadisalahi2]

اگه نوع خروجی اطلاعات رو DBGrid انتخاب کنید و عنوان اونها هم فارسی باشه، هنگام خروجی در اکسل و هر نرم افزار دیگه ای عنوانهاتون فارسی میشه

[mina_148m]

اگه نوع خروجی اطلاعات رو DBGrid انتخاب کنید

خیلی خیلی بخشید
من متوجه نشدم، یعنی باید برا dbgrid کد بنویسم
من این کار رو کجا باید انجام بدم؟

بازم ممنون

[hadisalahi2]

باسلام. اگه پست شماره 12 رو به دقت میخواندید ، جواب این سوالتون رو میگرفتید.


2- در صورتی که قسط ارسال داده های DBGrid یا Query را دارید ، خاصیت Export Source را با گزینه موردنظر مقدار دهی نمایید.
3- حال با توجه به انتخاب یکی از موارد بالا خاصیت های DBGrid یا DataSource را مقدار دهی نمایید.

[ghasemshami]

از همون کامپوننتی که دوستان گفتند بنده استفاده کردم و خیلی جالب و قشنگ و سریع و کامل هستش و تنظیم انتقال داده هاش خیلی پیشرفته هستش شما هم از اون استفاده کن

[baran_bataravat]

چطور مي شه يکسري اطلاعات به شيت اول ريخته بشه و يک سري ديگه تو شيت دوم ريخته شود.

[xboycooper]

سلام دوستان
من هنگام استفاده از کامپوننت با خطا مواجه میشم !!
وقتی روی دکمه ای که دستور QExportXLS1.Execute داره کلیک میکنم خطای the path %1 could not be found میده و بعدش به پنجره زیر باز میشه !

http://upload1.imgdl.ir/images/1481.jpg

http://upload1.imgdl.ir/images/9172.jpg

ولی وقتی مثال هایی که همراه کامپوننت بودش رو باز میکنم بدون مشکل کار میکنن !!

[xboycooper]

شرمنده مشکل حل شد ! البته یه نسخه دیگه از کامپوننت رو نصب کردم ...

ftp://ftp.ems-hitech.com/pub/software/quickexport/qexportev.zip

[1123456789]

اگه امكان داره نحوه استفاده از كامپوننت Demos_EMS QuickExport II را از نصب تا استفاده توضيح بديد

[1123456789]

آيا اين كامپنونتها انتخابي در دلفي 5 قابل نصب ميباشد

[1123456789]

لطفا كنيد بفرمائيد با پيغام خطاي Fatal Error] Unit18.pas(7): File not found: 'QExport3.dcu' چكار كنم