إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
صفحة 1 من اصل 1 • شاطر
إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
بسم الله الرحمن الرحيم
كيفية إنشاء مستندات Word فى الفجوال بيسك دوت نت ....سؤال يتردد عند الكثريين ....فى هذه المقالة إن شاء الله تعالى سأحاول شرح طريقة إنشاء مستند Word مع إضافة بعض التنسيقات للمستند ......
1_ قم بإنشاء مشروع نوافذ جديد ....مع إضافة زر أمر للنافذة بأسم "إنشاء"
2_ قم بفتح النافذة Add References dialog ومن التويب COM أختر المكتبة Microsoft Word 12.0 Object Library ثم أوكية
3_ أستيراد مساحة الاسماء التالية :
- الكود:
Imports Word = Microsoft.Office.Interop.Word
- الكود:
Dim word_app As Word._Application = New Word.ApplicationClass()
Dim word_doc As Word._Document = word_app.Documents.Add()
Dim para As Word.Paragraph = word_doc.Paragraphs.Add()
para.Range.Text = "منتدى مصر التقنى"
para.Range.Style = "Heading 1"
para.Range.InsertParagraphAfter()
para.Range.Text = "أهلا وسهلا بكم فى منتدى مصر التقنى" & _
"هذا مثال على كيفية إنشاء مستندات ورد "
para.Range.InsertParagraphAfter()
Dim old_font As String = para.Range.Font.Name
para.Range.Font.Name = "Courier New"
para.Range.Text = " تحياتى لكم" & vbCrLf & " أبوسجود"
para.Range.InsertParagraphAfter()
para.Range.Font.Name = old_font
Dim filename As Object = Path.GetFullPath( _
Path.Combine(Application.StartupPath, "..\\..")) & _
"\\test.doc"
word_doc.SaveAs(FileName:=filename)
Dim save_changes As Object = False
word_doc.Close(save_changes)
word_app.Quit(save_changes)
السطر الثانى : أنشأنا ايضا مثيل من Word._Document
أما الاسطر من 3 حتى 6 هى إنشاء فقرة رأس مع تحديد نص تلك الفقرة " منتدى مصر التقنى " و الاستايل Heading 1
أما السطر السابع و الثامن وضعنا نصوص أخرى للمستند .....وفى السطر التاسع و العاشر قمنا بحفظ نوع الخط المستخدم الحالى و إضافة خط جديد لكتابة فقرة جديدة .......أما فى السطر الحادى عشر حتى الثالث عشر قمنا بكتابة فقرة جديدة مع خط جديد للمستند ....أما السطور الاخيرة من الكود لحفظ المستند بما فيه من بيانات ثم أغلاق كافة الكائنات المستخدمة
أبوسجود- ......
- تاريخ التسجيل : 18/02/2011
المساهمات : 101
النقاط : 187
التقيم : 8
الجنس :
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
أحسنت الشرح أخى وصديقى أبوسجود ....جزاك الله خيرا
ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
سبحان الله وبحمدة .....سبحان الله العظيم
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
السلام عليكم
عندي مستند مصمم للإجازة خارجية جاهز وعندي حقول تتكون من الاسم والرقم الوضيفي وتاريخ الإجازة واريد وضع هذة الحقول في مكانها في المستند الجاهز ومن ثما طباعتة
بمعنى اني اريد ان ارسل هذة الحقول الى المستند ومشاهدته وطباعتة
هل ذلك ممكن ؟ ونحن نعلم ان البرمجة نطاقها واسع
اذا كنتم تعرفون الحل فلا تبخلوا علينا بة
وشكرا لكم يا اساتذتنا......
عندي مستند مصمم للإجازة خارجية جاهز وعندي حقول تتكون من الاسم والرقم الوضيفي وتاريخ الإجازة واريد وضع هذة الحقول في مكانها في المستند الجاهز ومن ثما طباعتة
بمعنى اني اريد ان ارسل هذة الحقول الى المستند ومشاهدته وطباعتة
هل ذلك ممكن ؟ ونحن نعلم ان البرمجة نطاقها واسع
اذا كنتم تعرفون الحل فلا تبخلوا علينا بة
وشكرا لكم يا اساتذتنا......
tryold- ...
- تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة :
الجنس :
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
الممكن فعله على حد علمى هو ان نقوم بادراج جدول الى المستند مع تنسيقه كما اريد من خلال الكود ....وليس ان يتم ادراج بيانات فى جدول موجود اساسا فى المستند ...لانى فهمت من كلام حضرتك ان عندك مستند جاهز به رؤس واعمدة و تريد فقط ارسال بيانات الية من خلال الفجوال
على اى حال سأحاول وضع مشاركة توضح كيفية ادراج جدول فى مستند ورد من خلال دوت نت
على اى حال سأحاول وضع مشاركة توضح كيفية ادراج جدول فى مستند ورد من خلال دوت نت
أبوسجود- ......
- تاريخ التسجيل : 18/02/2011
المساهمات : 101
النقاط : 187
التقيم : 8
الجنس :
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
نعم طال عمرك هذا ما قصدتة بالفعل
عندي مستند إجازة معمول عن طريق الوورد ورسمي واريد ان ارسل فقط خانتين الية وهي الاسم والرقم ويكون جاهز للطباعة
وشكرا على الرد يا ابو سجود وبارك الله فيك
عندي مستند إجازة معمول عن طريق الوورد ورسمي واريد ان ارسل فقط خانتين الية وهي الاسم والرقم ويكون جاهز للطباعة
وشكرا على الرد يا ابو سجود وبارك الله فيك
ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
ليس من اخترق جهاز اصبح هكر
وليس من كتب كود اصبح مبرمج
وليس من كسر برنامج صار خيبير كسر
ولكن من تواضع لله رفعة
tryold- ...
- تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة :
الجنس :
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
أخى الكريم يمكنك انشاء جدول و تنسيقة فى بنية الدوت نت على النحو التالى :
- الكود:
Private Sub InsertTable(rowCount As Integer, columnCount As Integer)
Dim curDoc As Word.Document = WordApp.ActiveDocument
Dim table As Word.Table
table = curDoc.Tables.Add(WordApp.Selection.Range, rowCount, columnCount)
table.Cell(1, 1).Range.Text = "Hello Table"
Marshal.ReleaseComObject(table)
Marshal.ReleaseComObject(curDoc)
End Sub
أبوسجود- ......
- تاريخ التسجيل : 18/02/2011
المساهمات : 101
النقاط : 187
التقيم : 8
الجنس :
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
شكرا لك اخي ابو سجود
ياليت ترفق مثال على ماذكرت وشرح للاكواد اكون شاكر لك ومقدر
وبارك الله فيك
ياليت ترفق مثال على ماذكرت وشرح للاكواد اكون شاكر لك ومقدر
وبارك الله فيك
ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
ليس من اخترق جهاز اصبح هكر
وليس من كتب كود اصبح مبرمج
وليس من كسر برنامج صار خيبير كسر
ولكن من تواضع لله رفعة
tryold- ...
- تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة :
الجنس :
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
هذا مثال يوضح كيفية انشاء جدول فى مستند ورد بنفس كود أخى ابو سجود تقريبا بالفجوال 2010
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
المبرمج الطموح- الاشراف
- تاريخ التسجيل : 18/02/2011
المساهمات : 207
النقاط : 368
التقيم : 17
الدولة :
الجنس :
رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net
المبرمج الطموح كتب:
هذا مثال يوضح كيفية انشاء جدول فى مستند ورد بنفس كود أخى ابو سجود تقريبا بالفجوال 2010
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
بارك الله فيك على الرد والمساعدة
لقد وجدت الحل وهو عمل اشارات مرجعية على المستند وارسال الخانات لة ونجحت الطريقة
مشكور لك من رد وساهم معي
ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
ليس من اخترق جهاز اصبح هكر
وليس من كتب كود اصبح مبرمج
وليس من كسر برنامج صار خيبير كسر
ولكن من تواضع لله رفعة
tryold- ...
- تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة :
الجنس :
| |
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى
أمس في 7:09 pm من طرف moslema_r
» شركة تنظيف فرشات بالرياض
الثلاثاء مارس 26, 2024 6:26 pm من طرف moslema_r
» شركة تنظيف استراحات بالرياض
الأحد مارس 24, 2024 10:49 pm من طرف moslema_r
» كشف تسربات المياه في جدة
السبت مارس 23, 2024 7:23 pm من طرف gmalnagy
» خدمات كشف تسربات المياه بخصم 25% - اتصل الان
السبت مارس 23, 2024 7:22 pm من طرف gmalnagy
» شركة تنظيف ثريات بالرياض
الخميس مارس 21, 2024 7:23 pm من طرف moslema_r
» كهربائي منازل بالرياض
الأحد مارس 17, 2024 1:52 pm من طرف رانيا حماد
» افضل شركة نقل عفش بالرياض نقل باكستاني 40% خصم | موقع الانوار
الأحد مارس 17, 2024 1:25 pm من طرف رانيا حماد
» افضل معلم جبس بالرياض تركيب جبس بورد بالرياض 20% خصم اتصل الآن
الأحد مارس 17, 2024 1:09 pm من طرف رانيا حماد
» شراء اثاث مستعمل بالكويت بخصم 30%
الأحد مارس 17, 2024 12:54 pm من طرف رانيا حماد