Thanks Erel, I followed your instructions, now it works well, but since it's the first time I sell an app on the Apple Store I still have some requests to make.
I would like the app to be able to be downloaded for free, tried for 10 days and if you like it it can be purchased for 1 year and after
1 year for another year and so on for each year, by checking the days passed, I could do it with the following code
If testo1="annuale" Then
If giornitr>355 Then
MyStore.Initialize("MyStore")
If MyStore.CanMakePayments = True Then
MyStore.RequestPayment("product.id")
End If
End If
End If
If testo1="vers trial" Then
If giornitr >10 Then
MyStore.Initialize("MyStore")
If MyStore.CanMakePayments = True Then
MyStore.RequestPayment("product.id")
End If
End If
End If
Sub MyStore_PurchaseCompleted (Success As Boolean, Product As Purchase)
Log("Purchase completed")
If Product.IsInitialized Then
Log("Product: " & Product.ProductIdentifier & ", date=" & DateTime.Time(Product.TransactionDate) & _
", Transaction identifier=" & Product.TransactionIdentifier)
End If
If Success =True Then
'Record the current date
End If
End Sub
Is it possible to do all this? Does Apple allow it?
I tried the test version with an annual product.it, which I think is the right option, and it allows me to pay the annual
subscription at the next test it warns me that the subscription expires in a year so it does not allow me to pay
in this case how to try the app for a trial period (eg 10 days)? will the subscription renewal request be checked and managed
by Apple? what to do if the subscription is not renewed? does the loop payment request not allow you to use the app?
The second code
Sub MyStore_PurchaseCompleted (Success As Boolean, Product As Purchase)
lets me know that the purchase has been made
Erel if you can help me it would be a great pleasure for me and I will try to repay you in some way.
In the meantime, prepare for my next post for the android version if I don't find anything on the forum