ref.Initialize("Reference", Starter.realtime.getReferencefromUrl($"https://${Starter.strFirebaseProjectId}.firebaseio.com/"$) )
java.lang.NullPointerException
at de.donmanfred.DatabaseReferenceWrapper$5.onComplete(DatabaseReferenceWrapper.java:236)
at com.google.android.gms.internal.zzbpj$20.run(Unknown Source)
at android.os.Handler.handleCallback(Handler.java:725)
at android.os.Handler.dispatchMessage(Handler.java:92)
at android.os.Looper.loop(Looper.java:176)
at android.app.ActivityThread.main(ActivityThread.java:5319)
at java.lang.reflect.Method.invokeNative(Native Method)
at java.lang.reflect.Method.invoke(Method.java:511)
at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:1102)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:869)
at dalvik.system.NativeStart.main(Native Method)Sub Class_Globals
Dim reference As String
Dim disc As Boolean
Dim realtime As FirebaseDatabase
Dim ref As DatabaseReference
Dim father As Object
End Sub
'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize(refname As String, disconnecteverytimetime As Boolean, activityname As Object)
reference=refname
disc=disconnecteverytimetime
father=activityname
End Sub
Sub connectDB
If realtime.IsInitialized= False Then
realtime.Initialize("Realtime")
realtime.PersistenceEnabled = True
End If
realtime.goOnline
End Sub
Sub writeDB(telefono As String, valore As String)
connectDB
ref.Initialize("Reference",realtime.getReferencefromUrl("https://<my-app>/users" ))
Dim mp As Map
mp.Initialize
Dim mp1 As Map
mp1.Initialize
mp1.Put("IID",valore)
mp.Put(telefono,mp1)
ref.push
ref.updateChildren(mp)
End Sub
Sub readDB(telefono As String)
connectDB
ref.Initialize("Reference",realtime.getReferencefromUrl("https://<my-app>/users/" & telefono))
ref.addListenerForSingleValueEvent
End Sub
Sub Reference_oncomplete(errorCode As Int, errorMessage As String, errObj As Object)
Log(errorMessage)
CallSub3(father,reference & "_onComplete",errorCode,errorMessage)
'If disc Then realtime.goOffline
End Sub
Sub Reference_onCancelled(errnum As Int,error As String)
Log($"ref_onCancelled(${errnum},${error})"$)
End Sub
Sub Reference_onChildAdded(snapshot As Object, child As String)
Log($"ref_onChildAdded(${child})"$)
End Sub
Sub Reference_onChildChanged(snapshot As Object, child As String)
Log($"ref_onChildchanged(${child})"$)
End Sub
Sub Reference_onChildMoved(snapshot As Object, child As String)
Log($"ref_onChildMoved(${child})"$)
End Sub
Sub Reference_onChildRemoved(snapshot As Object)
Log($"ref_onChildRemoved()"$)
End Sub
Sub Reference_onDataChange(snapshot As Object)
Log($"ref_onDatachange()"$)
Dim snap As DataSnapshot = snapshot
If snap.exists = False Then
Dim mapnul As Map
mapnul.initialize
If disc Then realtime.goOffline
CallSub2(father,reference & "_onDataChange", mapnul)
Return
End If
Dim json As JSONParser
json.Initialize(snap.Value)
Dim root As Map = json.NextObject
If disc Then realtime.goOffline
CallSub2(father,reference & "_onDataChange", root)
End Sub
Feel free to do this on all libraries you wrote.
' Get a reference to the customers folder of the DB. Do not set any Listeners here....
cust.Initialize("Customers",realtime.getReference2("customers/"),"customers/")
' Now we create a query from the cust-reference and get the first 5 Items (including all subtree-data from them)
' The last we add is the Listener
Dim qry As Query = cust.LimitToFirst(5).orderByChild("id").setEventname("Customers","customers").addChildEventListener.addValueEventListener"users/"&Starter.phone.GetSettings("android_id")&"/Messages" mymessages.Initialize("Chat",realtime.getReference2("users/"&Starter.phone.GetSettings("android_id")&"/Messages"),"users/"&Starter.phone.GetSettings("android_id")&"/Messages")
mymessages.LimitToFirst(5).addChildEventListener
Objects\bin\extra\res7\res\values-v26\values-v26.xml:16: error: Error: No resource found that matches the given name: attr 'android:autofillHints'.#AdditionalJar: constraint-layout.aar