D
Deleted member 103
Guest
Hi,
this message comes from Crashlytics Report.
How can it happen?
this message comes from Crashlytics Report.
How can it happen?
Fatal Exception: java.lang.IllegalStateException
The ad unit ID must be set on InterstitialAd before show is called.
Fatal Exception: java.lang.IllegalStateException: The ad unit ID must be set on InterstitialAd before show is called.
at com.google.android.gms.internal.ads.zzzb.zzbl(Unknown Source:159)
at com.google.android.gms.internal.ads.zzzb.show(Unknown Source:145)
at com.google.android.gms.ads.InterstitialAd.show(Unknown Source:20)
at anywheresoftware.b4a.admobwrapper.AdViewWrapper$InterstitialAdWrapper.Show(AdViewWrapper.java:339)
at fg.Solitario_free.main._adview1_receivead(main.java:507)
at java.lang.reflect.Method.invoke(Method.java)
at java.lang.reflect.Method.invoke(Method.java:372)
at anywheresoftware.b4a.BA.raiseEvent2(BA.java:191)
at anywheresoftware.b4a.BA$2.run(BA.java:365)
at anywheresoftware.b4a.BA.setActivityPaused(BA.java:437)
at fg.Solitario_free.main.afterFirstLayout(main.java:108)
at fg.Solitario_free.main.access$000(main.java:17)
at fg.Solitario_free.main$WaitForLayout.run(main.java:82)
at android.os.Handler.handleCallback(Handler.java:739)
at android.os.Handler.dispatchMessage(Handler.java:95)
at android.os.Looper.loop(Looper.java:135)
at android.app.ActivityThread.main(ActivityThread.java:5753)
at java.lang.reflect.Method.invoke(Method.java)
at java.lang.reflect.Method.invoke(Method.java:372)
at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:1405)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:1200)
B4X:
Sub Activity_Create(FirstTime As Boolean)
...
'Werbung initialisieren
If Not(Starter.IsProVersion) Then
'Admob-Interstitial
AdView1.Initialize("AdView1","ca-app-pub-xxxxxxxxxxxxxxxxxxxxxxxxxxxx")
LoadAd
End If
...
End Sub
Sub LoadAd
'Log("LoadAd")
Dim builder As AdRequestBuilder
builder.Initialize
Dim consent As ConsentManager = Starter.consent
If consent.IsRequestLocationInEeaOrUnknown Then
If consent.ConsentState = consent.STATE_NON_PERSONALIZED Then
builder.NonPersonalizedAds
Else if consent.ConsentState = consent.STATE_UNKNOWN Then
Return
End If
End If
#if not(Release)
builder.AddTestDevice("xxxxxxxxxxxxxxxx") 'Samsung A5(2017)
#End If
AdView1.LoadAdWithBuilder(builder)
End Sub
Sub AdView1_ReceiveAd
'Log("AdView1_ReceiveAd")
AdView1.Show
End Sub