ussd

[ali afrazi 47]

سلام

سوال من مربوط میشه به ussd

 لایبرریphone روفعال میکنم بعدازطریق phone callsکدمثلا*#1*141* رومیزنم توگوشی وقتی شماره گیری میکنه #رونمیگیره فقط کد1*141*روشماره گیری میکنه

ممنون اگه راهنمایی کنید

[sajad8888 819]

بفرما این میتونه کمت کنه

[مهدی ایزدی 9,203]

Sub pay
If checkspinner = False Then
Msgbox("لطفا مقدار شارژ را انتخاب کنید","خطا")
Else
 Call("*724*10176061*" & priceint & "*99*" & productCode & "*" & countint & "*" & Editphonenumber.Text & "*" & POSCODE & "#")
 End If

Sub Call(Command As String)
 i.Initialize(i.ACTION_CALL,"tel:" & Command.Replace("#","%23"))
 StartActivity(i)
End Sub

مشکل شما اون Replace هست