منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : سؤال عن فتح ملف ورد بالفيجوال
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
لقد استخدمت هذا الكود لفتح ملف ورد ويعمل ولكن المشكله
انه يفتح ملف الورد للمستخدم على الشاشة ثم يقوم بإغلاقة

أنا اريد فتح لملف وجلب كل البيانات الموجوده فى الورد الى textBox

الرجاء التعديل على الكود

PHP كود :
Dim X As New AhmedDLL.FolderAndFiles
    Dim wrdApp 
As Word.Application
    Set wrdApp 
= New Word.Application
    wrdApp
.Visible False
    wrdApp
.Documents.Open "c:\a.doc"
     
Text1.Text wrdApp.ActiveDocument.Content.Text
    wrdApp
.Documents.Close
    wrdApp
.Quit
    Set wrdApp 
Nothing 
ما الحل للمشكة
المشكله ان ملف الورد نفسه بيفتح وحاولت اخفائه wrdApp.Visible = False حل مؤقت للمشكه

اريد ان لا يفتح الملف الا داخل البرناج فقط
السلام عليكم

جرب كتابة الكود بالشكل التالي

PHP كود :
Private Sub Command1_Click()
Dim wrdApp As Word.Application
Set wrdApp 
= New Word.Application
wrdApp
.Documents.Open "c:\a.doc"
wrdApp.Visible False
Text1
.Text wrdApp.ActiveDocument.Content.Text
wrdApp
.Quit
Set wrdApp 
Nothing
End Sub 

بالتوفيق