لینک ارسال پوش به پارسه

[mohammade79 127]

سلام دوستان من میخوام به پارسه لینک رو با جیسون ارسال کنم اما نمیدونم چه جوری باید لینک رو بزنم تا به صفحه کاربر منتقل بشه اینم کدمه

'open your app in bazaar
Sub OpenBazaarApp(sPackageName As String,blnView As Boolean)
Dim market As Intent, Uri As String
Uri="bazaar://details?id=" & sPackageName
If blnView = False Then
 market.Initialize(market.ACTION_VIEW,Uri)
Else
 market.Initialize(market.ACTION_VIEW,Uri)
End If
StartActivity(market)
End Sub