Sub CallUSSD(Command As String,Operator As Int)
Dim i As Intent
i.Initialize(i.ACTION_CALL, "tel:" & Command.Replace("#", "%23"))
i.PutExtra("com.android.phone.extra.slot", Operator)
i.Flags = 268435456
StartActivity(i)
End Sub
Sub btcontinuarsending_Click
If spnType.SelectedIndex = 0 Then
OrangeURI = "*800*1#"
If spnSimNumber.SelectedIndex = 0 Then
CallUSSD(OrangeURI ,0)
Else if spnSimNumber.SelectedIndex = 1 Then
CallUSSD(OrangeURI ,1)
End If
Else if spnType.SelectedIndex = 1 Then
MtnURI = "*436*4#"
If spnSimNumber.SelectedIndex = 0 Then
CallUSSD(MtnURI ,0)
Else if spnSimNumber.SelectedIndex = 1 Then
CallUSSD(MtnURI ,1)
End If
End If
End Sub
This the code to make a USSD CALL.I want Code that executes the USSD command,
Sub CallUSSD(Command As String,Operator As Int)
Dim i As Intent
i.Initialize(i.ACTION_CALL, "tel:" & Command.Replace("#", "%23"))
i.PutExtra("com.android.phone.extra.slot", Operator)
i.Flags = 268435456
StartActivity(i)
End Sub
You cannot get or manipulate USSD results from experience., and I want to treat the result of executing this query as text
Check the second parameter of CallUSSD its the sim. i.PutExtra("com.android.phone.extra.slot", Operator) specifies the slot. Use 0 or 1I also want to specify in the code whether to execute this query on sim1 or sim2
This code will not hemp you.And I don't want to use the intent appears to the user
Any way Result from default simCheck the second parameter of CallUSSD its the sim. i.PutExtra("com.android.phone.extra.slot", Operator) specifies the slot. Use 0 or 1
NO.I want to make a program whose basis is to analyze the results of USSD