Parse library (beta) - simple backend solution

urikupfer

Member
Licensed User
Longtime User
Erel thanks
It seems that this library is messing method to get files from the cloud server.
uri
 

cmweb

Active Member
Licensed User
Longtime User
parse.com looks very interesting to me...

Put/Get of files would be great.

Best regards,

Carsten
 

mwebim

New Member
Licensed User
Longtime User
Very Useful Parse library

Hi Erel

This is so easy to have a backend database in the cloud with this library, thanks very much.

If you were going to develop some more of the features could you add the relationship between objects query as most apps will have more than 1 object they want to query at once.

I am currently using this in a app but find this missing feature a problem to find a nice work around for.

many thanks
 

socialnetis

Active Member
Licensed User
Longtime User
Hi, I just heard about Facebook buying Parse. The server-side tools that they offer seems to be extremely powerfull.
Are there any plans on making a full library of this? I think that the Parse Data and Parse Notificacions will be really usefull
 

touchsquid

Active Member
Licensed User
Longtime User
Thanks for this . It looks excellent. But I would like to use Facebook login through Parse. This needs the ParseUser object. Can this be added or accessed somehow from the existing libraries?

Again thanks for this excellent work.
 

pesquera

Active Member
Licensed User
Longtime User
Hello

I need to save data from a list
but, checking if the item record already exists on the cloud (with a query)

seems that this code executes the _DoneFind event 3 times with the last value on GLO_ColorName (the end of the for/next loop)

looking at the Parse.com data browse, this code add 3 lines with "Black" as "Name" (the last one)
I need to add one record for each color

why?

GLO_ColorName is a Global Variable



B4X:
Sub AddItemsFromList_Click
Dim myList As List
  myList.Initialize
  myList.Add("Orange")
  myList.Add("White")
  myList.Add("Black")
  For i=0 To myList.Size-1
        GLO_ColorName = myList.Get(i)
        Dim pq As ParseQuery
        pq.Initialize("Color")
        pq.WhereEqualTo("Name",GLO_ColorName)
        pq.Find("pq", 0)
  Next
  ProgressDialogShow("Waiting for response.")
End Sub

Sub pq_DoneFind (Success As Boolean, ListOfPO As List, TaskId As Int)
  ProgressDialogHide
  If Success = False Then
      Log("Error: " & LastException.Message)
      ToastMessageShow("Error: " & LastException.Message, True)
  Else
      If ListOfPO.Size = 0 Then
          Dim po As ParseObject
          po.Initialize("Color")
          po.Put("Name",GLO_ColorName)
          po.Save("po", 0)
       Else
          For i = 0 To ListOfPO.Size - 1
              Dim po As ParseObject
              po = ListOfPO.Get(i)
              po.Put("Long",1)
              po.Save("po", 0)
           Next
       End If
  End If       
End Sub
 
Last edited:

pesquera

Active Member
Licensed User
Longtime User
This code works well

But, I'm worried about the overload when having thousands of records (po objects) to read

Is there a better solution?


B4X:
Sub AddItemsFromList_Click
  Dim pq As ParseQuery
  pq.Initialize("Color")
  pq.Find("pq", 0)
  ProgressDialogShow("Waiting for response.")
End Sub

Sub pq_DoneFind (Success As Boolean, ListOfPO As List, TaskId As Int)
  ProgressDialogHide
  If Success = False Then
      Log("Error: " & LastException.Message)
      ToastMessageShow("Error: " & LastException.Message, True)
  Else
      Dim loc_Exists As Boolean = False
      Dim loc_ColorName As String = ""
      Dim myList As List
      myList.Initialize
      myList.Add("Orange")
      myList.Add("White")
      myList.Add("Black")
      For x=0 To myList.Size-1
          loc_ColorName = myList.Get(x)
          loc_Exists = False
          For i = 0 To ListOfPO.Size - 1
            Dim po As ParseObject
            po = ListOfPO.Get(i)
            If po.GetString("Name") = loc_ColorName  Then
               po.Put("Long",1)
               po.Save("po", 0)
               loc_Exists = True
            End If
            Next
            If loc_Exists = False Then
               Dim po As ParseObject
               po.Initialize("Color")
               po.Put("Name",loc_ColorName)
               po.Save("po", 0)
            End If
      Next
   End If         
End Sub
 
Last edited:
Top