B4A Library Library AppStore. Easy access to app data from Google Play and the Apple iTunes

Hi all.

This is simple library for easy access to app data from Google Play and the Apple iTunes

Is very simple:

AppStore
Author:
Devil-App
Version: 1.02
  • appstore
    Methods:
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
    • Initialize (package_name As String, store As String, yourkey As String, Module As Object, EventName As String) As String

      B4X:
      'Easy access to app data from Google Play and the Apple iTunes:
      'You have 2 parameters:
      'Initialize(package_name As String, store As String, yourkey As String, Me, "check_short")
      'package_name --> Play Store: "com.devil.app.antispy"  : AppStore: "6018"
      'store --> "google" if you want search this in Play Store or "apple" if you want search this in AppStore
      'Example:
      'Dim store As appstore
      'store.Initialize("com.devil.app.antispy", "google", "Fe5pwHzYKdmshHMC2Kq7NUIN0X3Ap1J54u4jsn62nFgdNmBJX9", Me, "check_value")
      '.....
      'Sub check_value(valore As typeLevel)
      'Log(valore.average)
      'Log(valore.count)
      'Log(valore.coverimage)
      'Log(valore.description)
      'Log(valore.developer)
      'Log(valore.fiveStar)
      'Log(valore.fourStar)
      'Log(valore.fulldescrition)
      'Log(valore.id)
      'Log(valore.Istalls)
      'Log(valore.lastUpdated)
      'Log(valore.maturityRating)
      'Log(valore.MinimunOsVersion)
      'Log(valore.oneStar)
      'Log(valore.price)
      '....
      'End Sub
      '******

      B4X:
      Sub Activity_Create(FirstTime As Boolean)
          Activity.LoadLayout("1")
          Dim store As appstore
          store.Initialize("com.devil.app.antispy", "google", "Fe5pwHzYKdmshHMC2Kq7NUIN0X3Ap1J54u4jsn62nFgdNmBJX9", Me, "check_value")
         
      End Sub
      
      Sub check_value(valore As typeLevel)
      
          Dim carica_img As UniversalImageLoader
          carica_img.Initialize("")
          carica_img.loadimg(valore.coverimage, ImageView1)
         
          Label1.Text = "Average Rating: " & valore.average
          Label2.Text = "Description: " & valore.description
          Label3.Text = "Developer..: " & valore.developer
         
      
          Log(valore.count)
          Log(valore.fiveStar)
          Log(valore.fourStar)
          Log(valore.fulldescrition)
          Log(valore.id)
          Log(valore.Istalls)
          Log(valore.lastUpdated)
          Log(valore.maturityRating)
          Log(valore.MinimunOsVersion)
          Log(valore.oneStar)
          Log(valore.price)
      
      End Sub

      You have this result:

      2015-07-24 14.23.01.png


      Screenshot 2015-07-24 16.21.22.png

    • For get your Key HERE
      LIBRARY
      - Unzip the attached file ( AppStore1.02-Library.zip ) and copy AppStore.jar and AppStore.xml to the libraries folder
      - AppStore-Example1.02.zip is simple B4A ( for this example you must utilize also UniversalImageLoader By DonManfred ;) )
    • LAST UPDATE REL.1.02 - 25 March 2016
 

Attachments

  • AppStore1.02-Library.zip
    5.4 KB · Views: 423
  • AppStore-Example1.02.zip
    9 KB · Views: 411
Last edited:

EnriqueGonzalez

Well-Known Member
Licensed User
Longtime User
Wow man this is awesome to promote your ownapps, you can even make ads like the ones for tapfortap.
 

susu

Well-Known Member
Licensed User
Longtime User
Initialize (package_name As String, store As String, yourkey As String, Module As Object, EventName As String) As String

Thank you but how to get "yourkey" ?
 

cambopad

Active Member
Licensed User
Longtime User
Wow! This is really cool! I now have an idea for an app using this lib, but how can I can the key? I click on your link to mashape....then ??
 

cambopad

Active Member
Licensed User
Longtime User
Thanks you! @MarcoRome Can you add the option to get screenshot? I can't find any method to get the screenshot of the app!
 

MarcoRome

Expert
Licensed User
Longtime User
Thanks will wait for this! :)

Well... in attachment example. You can utilize this code ( look here ):

B4X:
Dim filename As String = "screenshot.jpg"
  Dim Obj1, Obj2 As Reflector
  Dim bmp As Bitmap
  Dim c As Canvas
  Obj1.target = Obj1.GetActivityBA
  Obj1.target = WebView1
  bmp.InitializeMutable(Activity.Width,WebView1.Height)
  c.Initialize2(bmp)
  DoEvents
  Dim args(1) As Object
  Dim types(1) As String
  Obj2.target = c
  Obj2.target = Obj2.GetField("canvas")
  args(0) = Obj2.target
  types(0) = "android.graphics.Canvas"
  Obj1.RunMethod4("draw", args, types)
  DoEvents
  Dim out As OutputStream
  out = File.OpenOutput(File.DirRootExternal , filename, False)
  bmp.WriteToStream(out, 100, "JPEG")
  out.Close

This is example


2015-07-28 17.51.14.png


and this is result in Jpeg:

2015-07-28 17.51.27.jpg
 

Attachments

  • ScreenShot.zip
    8.7 KB · Views: 166

cambopad

Active Member
Licensed User
Longtime User
Wow! Thanks you very much for your fast response! I really appreciate your kindness!But I think you misunderstood me! I think I confused you! Sorry!

But I mean the screenshot data of the app on Playstore. For example, if you publish the app to Playstore, you will need App Icon, App screenshots,...
So I want to ask whether we can fetch the screenshot of the app we specified from Playstore.

Please take a look at the picture below:

app_screenshot.png
 

MarcoRome

Expert
Licensed User
Longtime User
Wow! Thanks you very much for your fast response! I really appreciate your kindness!But I think you misunderstood me! I think I confused you! Sorry!

But I mean the screenshot data of the app on Playstore. For example, if you publish the app to Playstore, you will need App Icon, App screenshots,...
So I want to ask whether we can fetch the screenshot of the app we specified from Playstore.

Please take a look at the picture below:

View attachment 36274
Ok Now understand... I look at whether it is possible and let you know
 
Top