PDA

View Full Version : آموزش ايجاد و نوشتن در فايل ورد



saeedalg
شنبه 12 تیر 1389, 10:42 صبح
‌يه نمونه برنامه كوچيك براي كسايي كه به زبان انگليسي علاقه ندارن:
اول يه windows form ايجاد كنيد يه باتن توش بذاريد (button1 و رخداد كليك اون رو با اين كد رو جايگزين كنيد.


private void button1_Click(object sender, EventArgs e)
{

Microsoft.Office.Interop.Word.Application oWord = new Microsoft.Office.Interop.Word.Application();

object oMissing = System.Reflection.Missing.Value;

//And then this object can be used when the new document is created:
Document oDoc = oWord.Documents.Add (ref oMissing, ref oMissing,
ref oMissing, ref oMissing);

Paragraph title;
title = oDoc.Paragraphs.Add(ref oMissing);

object styleHeading1 = "Heading 1";
title.Range.set_Style(ref styleHeading1);

title.Range.Text = "ايجاد يك سند ورد";

title.Range.InsertParagraphAfter();

Paragraph oPara1;
oPara1 = oDoc.Paragraphs.Add(ref oMissing);
oPara1.Range.Text = "This is my first paragraph. its left to right";
oPara1.Alignment = WdParagraphAlignment.wdAlignParagraphLeft;
oPara1.Range.InsertParagraphAfter();
Paragraph oParaPersian;
oParaPersian = oDoc.Paragraphs.Add(ref oMissing);
oParaPersian.Range.Text = "ز ایـــران و از ترک و از تازیـــان " +
"نژادی پدیـــد آید اندر میــــــان نه دهـقـان ، نه تـرک و نه تـازی بود ســخن ها بـــه کـــردار بازی بود هـمـه گـنـج ها زیر دامـان نهـنـد بکوشـند و کوشش به دشـمن دهـنـد به گـیـتـی کـسـی را نـمانـــد وفــــــا روان و زبـــانـهـا شــود پــر جــفـا بــریــزنــد خــون از پــی خواســتـه شـــــود روزگــــار بــد آراســتـــه زیــان کســان از پـی سـود خـویـش بجـویـنـد و دیــن انـدر آرنـد پـیـش";
oParaPersian.Alignment = WdParagraphAlignment.wdAlignParagraphRight | WdParagraphAlignment.wdAlignParagraphJustify;

oParaPersian.Range.InsertParagraphAfter();

if (!Directory.Exists(@"C:\wordtest\"))
Directory.CreateDirectory(@"C:\wordtest\");
object fileName = @"C:\wordtest\sampleword.docx";

oDoc.SaveAs (ref fileName,
ref oMissing, ref oMissing,
ref oMissing, ref oMissing,
ref oMissing, ref oMissing,
ref oMissing, ref oMissing,
ref oMissing, ref oMissing,
ref oMissing, ref oMissing,
ref oMissing, ref oMissing,
ref oMissing);

oDoc.Close(ref oMissing, ref oMissing, ref oMissing);

oWord.Quit(ref oMissing, ref oMissing, ref oMissing);
oWord = null;


}
آره كامپايل نميشه، بريد رو منوي refrenceها كليك راست كنيد و add refrence‌رو بزنيد از تب COM ها Microsoft Word 12.0 object library رو انتخاب كنيد و ok كنيد،‌ اگر ورد 12 نداشتيد 11 رو بگيريد،‌ فكر نميكنم مشكلي باشه.
اين دو خط رو هم اول برنامه بذاريد:


using Microsoft.Office.Interop.Word;
using System.IO;
براي كار بيشتر به اينجا (http://www.c-sharpcorner.com/UploadFile/amrish_deep/WordAutomation05102007223934PM/WordAutomation.aspx)مراجعه كنيد.

snekooei
جمعه 18 تیر 1389, 22:03 عصر
با تشكر از شما
اگر بخواهيم فايل ورد با نام خاصي را باز كند و مطلب تكست باكس را به آخر آن اضافه كند بايد چه كنيم؟