طلب كود استدعاء ملف وورد

في كود الزر ضع الكود التالي

Shell("C:\filename.doc", AppWinStyle.NormalFocus)

اخي الكريم يعطيك العافية على الرد لا كن فية خطاء بالكود مايفتح

ياليت مثال

شوف الرابط هذا وباذن الله يفيدك

http://social.msdn.microsoft.com/Forums/en/vbgeneral/thread/7ea68bac-dbaf-4989-8eef-7d3586b2faa5

فية اخطاء المثال ومدموج معة اكسل

مافية جواب

السلام عليكم ...

1. إن كنت تقصد فتح ملف الوورد كما لو أننا قمنا بالنقر عليه , فهذا الكود :

   Process.Start("doc1.docx")

2. Execute a Process and Wait Until it Finishes (VB.NET)

أخي الفاضل

تفضل الشرح الكامل لفتح ملف وورد وعرضة علي الفورم عن طريق الاداة DsoFramer

/index.php?showtopic=205498

مشكووور اخواني لكل من عرض المساعدة او حاول يعرضها

تم الوضول للحل وهو برد الاخ houssam11350_11350

انا استخدمت هذا الكود لاستدعاء الملف

Process.Start("filename.doc")

لكن بعد استخدامة اكثر من 20 مرة صار مايشتغل يجيني خطاء بالبرنامج

السلام عليكم ...

1. لا علاقة لعدد مرات الاستخدام بالتنفيذ الصحيح الكود .
2. ربما الــ Process (الوورد) التي تحاول تشغيلها , تعمل و لكن بالخلفية (تحصل أحيانا) , لذلك قم بإعادة تشغيل الكمبيوتر و حاول مرة أخرى.
3. ما هي رسالة الخطأ ؟

‏‏يتعذر على النظام العثور على الملف المحدد

هذا اللي يجي مع العلم اني اعدت تشغيل الجهاز

وملف الوورد موجود في مجلد Debug

السلام عليكم..

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

 Dim FileName As String = Application.StartupPath + "\doc11.docx"
    	If File.Exists(FileName) Then
        	Process.Start(FileName)
    	Else
        	MsgBox("Can Not Find :" + vbNewLine + FileName)
    	End If

اشكرك اخي الكريم لكن اكتشفت ان الخطاء في ملف الوورد

وتم حل المشكلة وشكراً مرة اخرى