بازکردن فایل های word در vb6

[majid865]

با سلام
اگه میشه کمکم کنید
میخوام یك سری فایل word رو در vb6 باز کنم

[returnx]

خیلی راحته ابتدا از منو project گزینه ی refrence رو انتخاب کن بعد این گزینه رو انتخاب کن :
Microsoft Word 12.0 object libaray البته این گزینه زمانی میاد که شما Ofice رو نصب کرده باشید بعد
در قسمت General از این کد استفاده کن:

Dim winword As New Word.Application

حالا یک common dialog در فرمت بزار و بعد اسمش به Cmd تغییر بده
حالا یک Coommand بزار و از این کد استفاده کن

cmd.ShowOpen
Text1.Text = winword.Documents.Open(cmd.FileName)
در رویداد unload فرم هم از این کد استفاده کنید:

winword.Documents.Close

اگه سوال دیگه ای هم هست در خدمتیم.

[mohamad_khaje]

سلام خسته نباشید خواهشا جوابمو سریع بدید من اینکارو میکنم ولی فقط اسم فایل وارد text میشه و فایل ورد باز نمیشه بعد هم ارور میده که میگه سوییچ کن و یه گزینه دیگه هم به نام retry داره ممنون