با سلام و سپاس خدمت کاربران عزیز

 

برای اینکه یه شناسه منحصر به فرد داشته باشیم که تغییر نکنه طبق دستورات زیر عمل میکنیم

تیک کتابخانه phone رو میزنیم

 

Dim phone As Phone
phone.getSettings("android_id")

 

در روش بعدی تیک کتابخانه FirebaseAdmob رو بزنید و کد زیر رو به منیفست اضافه کنید :

CreateResourceFromFile(Macro, FirebaseAnalytics.GooglePlayBase)

کد جاوا و ساب مربوطه:

Private Sub GetAdvertisingId As ResumableSub
Dim jo As JavaObject = Me
jo.RunMethod("GetAdvertisingId", Null)
Wait For AdvertisingId_Ready (Success As Boolean, Id As String)
Return Id
End Sub
 
#if Java
import java.util.concurrent.Callable;
import com.google.android.gms.ads.identifier.AdvertisingIdClient;
import com.google.android.gms.ads.identifier.AdvertisingIdClient.Info;
 
public static void GetAdvertisingId() {
BA.runAsync(processBA, mostCurrent, "advertisingid_ready", new Object[] {false, ""}
, new Callable<Object[]>() {
@Override
public Object[] call() throws Exception {
String id = AdvertisingIdClient.getAdvertisingIdInfo(mostCurrent).getId();
return new Object[] {true, id};
}
}); }
#End If

اینم کد استفاده

 Wait For (GetAdvertisingId) Complete (Id As String) 
If Id <> "" Then 
Log(Id)
End If

موفق باشید.