خروج اطلاعات از ديتابيس به يك فايل txt

[رحمانیان]

سلام خدمت همه
من بانکی نوشته ام و می خواهم اطلاعات آن بانک را در یک فلاپی ذخیره کنم به طوریکه با برنامه ای مثل ورد یا ویراستار دیگری باز شود چه پیشنهاد می کنید
2- می خواهم بین فیلدها خط جدا کننده باشد چه کاری انتجام دهم
با تشکر

[Hidarneh]

اول اینو بگم که من هیچ نسبتی با نویسندگان ReportBuilder ندارم :wink: ولی انصافا کامله و جواب سوال شما هم همونجاست . یه بخش AllowSavetoArchive داره که با اون این کار دوم رو می تونی بکنی و با ExtraDevice که جدا از ReportBuilder هست ولی روی اون نصب میشه می تونی نتیجه رو توی فایل doc هم ذخیره کنی

[Inprise]

دوست عزیز

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

procedure TForm1.Button1Click(Sender: TObject);

var i:integer;

f:textfile;

begin

assignfile(f,'c:\db.txt'); // takhsis e file

for i:=0 to pred(table1.FieldCount) do

writeln(f,table1.Fields[i].DisplayText  +'--');

writeln(f,#13#10);  // neveshtan e esme filed ha

while NOT table1.Eof do begin

for i:=0 to pred(table1.FieldCount) do

writeln(f,table1.fields[i].AsString+'--');

writeln(f,#13#10); // neveshtan e record ha

end;

end;

[prog_2005]

چگونه تصاویری که در بانک ذخیره کردام به دیسکت انتقال دهم

[Touska]

شما اصلا می توانید محتوای بانک خود را به یک فایل Excel یا Word منتقل کنید.

موفق باشید :flower:

[majid_afra222]

سلام
در ادامه فرمایشات جناب Inprise عزیز.
اول اینکه موردی که برای ارسال اطلاعات به یک فایل متنی را گفتید با یک query ساده نیز قابل حل است.
در پرس و جوی مورد نظر تنها یک خروجی متشکل از تمام فیلدهای مورد نظر ایجاد کنید.
در مورد ارسال تصاویر نیز به نظر استفاده از xml بهترین گزینه و ساده ترین آن می تواند ‌باشد.

و همون طور که جناب Touska عزیز هم فرمودن
شما در صورت دسترسی به سرور sql به راحتی می توانید با استفاده از ابزار Import/Export اطلاعات مورد نظر را به هر فرمتی که خواستید٬ ارسال کنید.
در ضمن می توانید از طریق برنامه نویسی نیز از امکانات dts خود sql server نیز برای ارسال اطلاعات٬‌کمک بگیرید.

[mshadi]

سلام
من کدی که inprise گفته بود را نوشتم اما متاسفانه از قسمت writeln خطا میگیره
ضمنا اطلاعاتی که من میخوام از بانکم انتقال بدم محتوی فیلد شماره حساب بعد از آن 4 تا صفر بزاره و بعد هم فیلد مبلغ را نشان بده
لطفا اگر کسی میدونه باید چیکار کرد راهنمایی کنه
ممنونم

[McMilad]

البته جناب inprise از استايد قديمي برنامه نويس دات كام هستن ولي اين كد با حلقه for و while اردر زماني بالايي داره در ضمن شما تو حلقه هاي تو در تو اسم متغيير حلقه ها اگه يكي باشه،‌اين حلقه تو شمارش قاطي نميكنه؟؟؟
من واسه انتقال ركورد ها به فايل متني و يا برعكس از فايل متني به ديتابيس يه چيزي ديده بودم كه دقيق يادم نيست خودتون بگرديد اگه پيدا نكرديد من برم سورس اون برنامه قديمي رو در بيارم ببينم چي بود
از يه چيزي به اسم for xml auto استفاده كرده بودم و كل ركوردها رو ريخته بودم توش
بعد شما با يه فايل xml كار كني و اونو خوشگل كني با "--" و غيره سربار خيلي كمتري داري

[McMilad]

راستي
سلام جناب اينپرايز
مشتاق ديدار....
چند سالي بود نديده بودمتون.....

[McMilad]

راستي
سلام جناب اينپرايز
مشتاق ديدار....
چند سالي بود نديده بودمتون.....