اشکال بازار به اشتراک عکس

[roshandelpour 10]

با عرض سلام خدمت دوستان

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

بازار:::::

لطفاً دسترسی*های زیر را از برنامه حذف کنید یا در صورت نیاز توضیحات لازم را ارائه فرمایید.

- تغییر یا حذف محتویات کارت حافظه

ممنون میشم راهنمایی بفرمایین چیکار باید بکنم تا هم عکس به اشتراک بذارم هم بازار این ایراد رو نگیره

Sub Button1_click

Dim share As MESShareLibrary
File.Copy(File.DirAssets,"audio_0001.mp3",File.DirRootExternal,"audio_0001.mp3")
share.sharebinary("file://"&File.DirRootExternal&"/audio_0001.mp3","audio/mp3","Send file","really?","")

End Sub

[jeqele 563]

اگه اینتنت میکنه مشکلی نداره و نباید گیر بدن.

[roshandelpour 10]

سلام و تشکر میشه بیشتر توضیح بفرمایین برا اینتنت کردن دقیقا چیکار کنم