با سلام و سپاس خدمت کاربران عزیز
با این تکه کد قادر خواهید بود از یک لینکی apk رو دانلود و مستقیم به صفحه نصب کاربر رو هدایت کنید .
کافیه فقط تیک کتابخانه HttpUtils یا OkHttpUtils رو بزنید و سورس رو ران بگیرید.
Dim js As HttpJob
js.Initialize("", Me)
js.Download(link)
Wait For (js) JobDone(j As HttpJob)
If js.Success Then
Dim DOWNLOAD_FILENAME As String=Rnd(1,9999999)&".apk"
Log(js.Tag)
Dim OutStream As OutputStream
OutStream = File.OpenOutput(File.DirRootExternal, DOWNLOAD_FILENAME, False)
File.Copy2(js.GetInputStream,OutStream)
OutStream.Close
Dim inetntdownload As Intent
inetntdownload.Initialize(inetntdownload.ACTION_VIEW, "file://"&File.Combine(File.DirRootExternal, DOWNLOAD_FILENAME))
inetntdownload.SetType("application/vnd.android.package-archive")
StartActivity(inetntdownload)
End If
شایان به ذکر می باشد که در کد بالا شما باید link مربوط به apk مورد نظر رو وارد کنید .


خدا خیرتون بده سایت عالی دارید با همین قدرت ادامه بدین
خسته نباشید
سلام ممنون از شما دوست عزیز