تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة انشاء ملف بصيغة معينه
#1
اخواني الكرام
محتاج انشأ ملف وورد عن طريق الكود في vb.net داخل مجلد معين
لانى جربت ه الكود لكن الملف بيطلع بامتداد مختلف

Try
Dim fileLoc As String = "\\192.168.42.58\d$\ '" & PationtMobile.Text.Trim + ".docx" & "'"
Dim fs As FileStream = Nothing
If (Not File.Exists(fileLoc)) Then
fs = File.Create(fileLoc)
Using fs
End Using
End If
Catch ex As Exception
End Try
الرد
تم الشكر بواسطة:
#2
حاليا لا تستخدم try من أجل أن تظهر رسالة الخطأ ومكانه في الكود بعدها ممكن أنت تعرف تحلها بدون ما تسأل

غير علامة + بعلامة &
الرد
تم الشكر بواسطة:
#3
PHP كود :
Dim objWord As Word.Application
        Dim objDoc 
As Word.Document

        objWord 
CreateObject("Word.Application")
 
       objWord.Visible True
        objDoc 
objWord.Documents.Add
        
'Insert some text in document
        Dim objPara As Word.Paragraph
        objPara = objDoc.Content.Paragraphs.Add
        objPara.Range.Text = "ضع العنوان الذي تريده"
        objPara.Range.Font.Bold = True
        objPara.Format.SpaceAfter = 30
        objPara.Range.InsertParagraphAfter() 
لا تنسى اضافة الرفرنس واستدعاء مكتبة الوورد
الرد
تم الشكر بواسطة: ابو روضة , elgokr
#4
أولا اضف المكتبة التالية لمشروعك
Microsoft.Office.Interop.word

ثانيا استدعي المكتبة واليك مثال لبناء الملف

PHP كود :
Imports Word Microsoft.Office.Interop.Word
Public Class Form1


    Private Sub CreateWordDocument
()
 
       Dim objWord As Word.Application
        Dim objDoc 
As Word.Document

        objWord 
CreateObject("Word.Application")
 
       objWord.Visible True
        objDoc 
objWord.Documents.Add
        
'Insert some text in document
        Dim objPara As Word.Paragraph
        objPara = objDoc.Content.Paragraphs.Add
        objPara.Range.Text = "Welcome to Author Code"
        objPara.Range.Font.Bold = True
        objPara.Format.SpaceAfter = 30
        objPara.Range.InsertParagraphAfter()

    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        CreateWordDocument()
    End Sub
End Class 
الرد
تم الشكر بواسطة: elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Exclamation [سؤال] مشكلة عدم قبول النصوص الطويل في قاعدة البيانات على برنامج فيجوال بيسك 2010 الرائد 12 291 14-06-19, 03:03 PM
آخر رد: elgokr
  مشكلة فى جلب كامل الصفحة ابو روضة 11 290 07-06-19, 03:51 AM
آخر رد: ابو روضة
  مشكلة في Decryptor Mohamed20 1 73 05-06-19, 11:27 PM
آخر رد: elgokr
  مشكلة في اضافة التاريخ الي قاعدة بيانات اكسس makky 8 156 05-06-19, 03:40 AM
آخر رد: heshamelkomy71
  مشكلة في اضافة التاريخ الي قاعدة بيانات اكسس makky 11 317 04-06-19, 03:12 PM
آخر رد: elgokr
  مشكلة في الاتصال بقاعدة البيانات والسيرفر sqlserver nooralcown 1 265 03-06-19, 12:33 PM
آخر رد: سعود
  مشكلة في التاريخ مع التقرير nooralcown 1 65 30-05-19, 01:52 PM
آخر رد: اسامه الهرماوي
  [VB.NET] مشكلة في الكريستال ريبورت abu.hanen4u 2 104 27-05-19, 04:48 AM
آخر رد: abu.hanen4u
  [VB.NET] مشكلة حدثت مع sql اسامه الهرماوي 2 90 23-05-19, 08:19 PM
آخر رد: اسامه الهرماوي
  [VB.NET] بخصوص مشكلة بتنفيذ كود sdk البصمة ssayed111 4 858 22-05-19, 08:34 AM
آخر رد: محمد محمود أحمد الغرياني

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم