Per completezza a chi trova quesa discussione cercando informazioni per il servizio sms riposrto la funzione per calcolare sms rimasti:
codice:<% Function SMSresidui() dim creditiXsms, SMSres, nCredito creditiXsms = 0.7 nCredito = Replace(VerificaCredito(), ".", ",") SMSres = Cint(nCredito) / creditiXsms SMSresidui = Cint(SMSres) - 1 END Function %>