نمایش فایل پی دی اف و پاورپوینت با نرم افزار های دیگر!

[mojtaba2213 4]

سلام دوستان

ببخشید من می خواهم یک فایل پی دی اف و پاورپوینت در برنامه قرار بدهم که با نرم افزار هایی مثل ادوب ریدر باز بشه و پاورپوینت هم با نرم افزار آفیس لطفا کمکم کنید

خیلی جست و جو کردم ولی به نتیجه ای نرسیدم

منتظر راهنمایی شما استادان بزرگوار هستم

[mojtaba2213 4]

در 19 ساعت قبل، AMiN.M7892 گفته است :

یعنی فایلی که قصد دارید نمایش بدید رو نباید از File.DirAssets (یا همون پوشه داخلی اپلیکیشن) مستقیم نمایش بدید!

اول باید اون فایل رو به یک مسیر دیگه مثل DirInternal یا RootExternal انتقال بدید بعد درخواست اینتنت نمایش کنید.

الان کد های من این هست

و از فایل دیراستس آدرس دادم لطفا راهنماییم کنید که کدوم قسمت ها رو تغییر بدم

File.Copy(File.DirAssets , "drf6.pdf" , File.DirInternal , "drf6.pdf")
    Dim i As Intent
    i.Initialize(i.ACTION_VIEW,"file://" & File.Combine(File.DirAssets,"drf6.pdf"))
    i.SetComponent("com.adobe.reader")
    i.SetType("application/pdf")
    i.Flags = 0x04000000
    startActivity(i)

 

[AMiN.M7892 1,029]

شما که قبلا فایل رو دارید کپی میکنید.

خب باید از همون ادرسی که کپی میکنید اینتنت رو اجرا کنید.

بجای DirAsstes توی File.Combine بنویسید DirInternal

 

[mojtaba2213 4]

در 1 دقیقه قبل، AMiN.M7892 گفته است :

شما که قبلا فایل رو دارید کپی میکنید.

خب باید از همون ادرسی که کپی میکنید اینتنت رو اجرا کنید.

بجای DirAsstes توی File.Combine بنویسید DirInternal

 

بسیار متشکر از لطفتان

[mojtaba2213 4]

در 8 دقیقه قبل، AMiN.M7892 گفته است :

شما که قبلا فایل رو دارید کپی میکنید.

خب باید از همون ادرسی که کپی میکنید اینتنت رو اجرا کنید.

بجای DirAsstes توی File.Combine بنویسید DirInternal

 

خوب حالا وارد ادوب ریدر میشه ولی ارور میده با پیام زیر

The document path is not valid.

[mojtaba2213 4]

در 28 دقیقه قبل، mojtaba2213 گفته است :

خوب حالا وارد ادوب ریدر میشه ولی ارور میده با پیام زیر

The document path is not valid.

مشکل حل شد بسیار متشکرم

[AMiN.M7892 1,029]

اون قسمت "file://" رو حذف کنید تست کنید

[mojtaba2213 4]

در هم اکنون، AMiN.M7892 گفته است :

اون قسمت "file://" رو حذف کنید تست کنید

به جای دیر اینترنال از روت استفاده کردم درست شد

 

[mojtaba2213 4]

در در 1396/08/08, 16:45:24، AMiN.M7892 گفته است :

اون قسمت "file://" رو حذف کنید تست کنید

برای پاورپوینت چی؟

چجورمی تونم پاورپوینت نمایش بدم؟

 

[محمدرضا شاهپیری 5,583]

با کتابخونه زیر عزیز.

مثلا برای باز کردن pdf با adobe به شکل زیر

Dim pr As PersianPackageManager
pr.initialize("pr")
Dim pdfint As PersianIntent
pdfint.initialize
pdfint.addAction(pdfint.ACTION_VIEW)
pdfint.addPackage("com.adobe.reader")
pdfint.Type=("application/pdf")
pdfint.addDataFromFile(File.DirRootExternal&"/mypdf.pdf")
pdfint.Flag=pdfint.FLAG_ACTIVITY_CLEAR_TOP
pr.openApp(pdfint.BaseIntent)

 

[mojtaba2213 4]

در ۱ ساعت قبل، محمدرضا شاهپیری گفته است :

با کتابخونه زیر عزیز.

مثلا برای باز کردن pdf با adobe به شکل زیر

Dim pr As PersianPackageManager
pr.initialize("pr")
Dim pdfint As PersianIntent
pdfint.initialize
pdfint.addAction(pdfint.ACTION_VIEW)
pdfint.addPackage("com.adobe.reader")
pdfint.Type=("application/pdf")
pdfint.addDataFromFile(File.DirRootExternal&"/mypdf.pdf")
pdfint.Flag=pdfint.FLAG_ACTIVITY_CLEAR_TOP
pr.openApp(pdfint.BaseIntent)

 

سلام روش رایگانی وجود نداره؟

[AMiN.M7892 1,029]

چرا دوست عزیز رایگان هم میشه.

معادل کدی که آقای شاهپیری دادن با اینتنت بیسیک میشه این:

Dim i As Intent
i.Initialize(i.ACTION_VIEW,File.Combine(File.DirAssets,"1.pdf"))
i.SetComponent("com.adobe.reader")
i.SetType("application/pdf")
i.Flags = 0x04000000
StartActivity(i)

 

[mojtaba2213 4]

در ۱ ساعت قبل، AMiN.M7892 گفته است :

چرا دوست عزیز رایگان هم میشه.

معادل کدی که آقای شاهپیری دادن با اینتنت بیسیک میشه این:

Dim i As Intent
i.Initialize(i.ACTION_VIEW,File.Combine(File.DirAssets,"1.pdf"))
i.SetComponent("com.adobe.reader")
i.SetType("application/pdf")
i.Flags = 0x04000000
StartActivity(i)

 

بسیار متشکر از شما استاد بزرگوار امتحان می کنم و نتیجه رو می گویم

[mojtaba2213 4]

در 1 ساعت قبل، AMiN.M7892 گفته است :

چرا دوست عزیز رایگان هم میشه.

معادل کدی که آقای شاهپیری دادن با اینتنت بیسیک میشه این:

Dim i As Intent
i.Initialize(i.ACTION_VIEW,File.Combine(File.DirAssets,"1.pdf"))
i.SetComponent("com.adobe.reader")
i.SetType("application/pdf")
i.Flags = 0x04000000
StartActivity(i)

 

کد درسته ولی ادوب ریدر باز نمی کنه و یک توست مسیج نشون داده میشه با متن زیر:

This file could not be accessed.Check the location or the network and try again.

[AMiN.M7892 1,029]

آدرس فایل رو از Asset که ندادید؟

[mojtaba2213 4]

در در 1396/08/05, 19:54:17، AMiN.M7892 گفته است :

آدرس فایل رو از Asset که ندادید؟

یعنی چه؟

 

[AMiN.M7892 1,029]

یعنی فایلی که قصد دارید نمایش بدید رو نباید از File.DirAssets (یا همون پوشه داخلی اپلیکیشن) مستقیم نمایش بدید!

اول باید اون فایل رو به یک مسیر دیگه مثل DirInternal یا RootExternal انتقال بدید بعد درخواست اینتنت نمایش کنید.