Example: /CURL/WebServices/CURL post Twilio Verification - iOS

Online Documentation   -   Statistics   -   FAQ   -   Plugin Parts (All, Dependencies)   -   Class hierarchy

New in Version 22.2 22.3 22.4 22.5 23.0 23.1 23.2 23.3 23.4 23.5 24.0 24.1

The list of the   topics,   classes,   interfaces,   controls,   modules,   global methods by category,   global methods by name,   screenshots,   licenses   and   examples.

Platforms to show: All Mac Windows Linux Cross-Platform

/CURL/WebServices/CURL post Twilio Verification - iOS


You find this example project in your Plugins Download as a Xojo project file within the examples folder: /CURL/WebServices/CURL post Twilio Verification - iOS

This example is the version from Fri, 2nd Feb 2023.

Project "CURL post Twilio Verification - iOS.xojo_binary_project"
Class App Inherits MobileApplication
End Class
Class Screen1 Inherits MobileScreen
Control Result Inherits MobileTextArea
ControlInstance Result Inherits MobileTextArea
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control PB_Send Inherits MobileButton
ControlInstance PB_Send Inherits MobileButton
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
EventHandler Sub Pressed() SendCode End EventHandler
End Control
Control TF_Code Inherits MobileTextField
ControlInstance TF_Code Inherits MobileTextField
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
EventHandler Sub TextChanged() if me.Text.Length > 0 then PB_Verify.Enabled = True else PB_Verify.Enabled = False end if End EventHandler
End Control
Control PB_Verify Inherits MobileButton
ControlInstance PB_Verify Inherits MobileButton
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
EventHandler Sub Pressed() SendVerification End EventHandler
End Control
Control TF_PhoneNumber Inherits MobileTextField
ControlInstance TF_PhoneNumber Inherits MobileTextField
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
EventHandler Sub TextChanged() if me.Text.Length > 0 then PB_Send.Enabled = True else PB_Send.Enabled = False end if End EventHandler
End Control
Control TF_Service_SID Inherits MobileTextField
ControlInstance TF_Service_SID Inherits MobileTextField
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control Label1 Inherits MobileLabel
ControlInstance Label1 Inherits MobileLabel
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control Label2 Inherits MobileLabel
ControlInstance Label2 Inherits MobileLabel
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control TF_Account_SID Inherits MobileTextField
ControlInstance TF_Account_SID Inherits MobileTextField
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control Label3 Inherits MobileLabel
ControlInstance Label3 Inherits MobileLabel
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control TF_AccountPass Inherits MobileTextField
ControlInstance TF_AccountPass Inherits MobileTextField
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control Separator1 Inherits MobileSeparator
ControlInstance Separator1 Inherits MobileSeparator
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Control Separator2 Inherits MobileSeparator
ControlInstance Separator2 Inherits MobileSeparator
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
Private Sub SendCode() Dim e As Integer dim d as new CURLSMBS d.OptionURL = "https://verify.twilio.com/v2/Services/"+TF_Service_SID.Text+"/Verifications" d.OptionVerbose = True d.CollectOutputData = True d.OptionUsername = TF_Account_SID.Text d.OptionPassword = TF_AccountPass.Text d.SetOptionHTTPHeader Array("Content-Type: application/x-www-form-urlencoded") d.OptionPostFields = "To="+EncodeURLComponent(TF_PhoneNumber.Text)+"&Channel=sms" e=d.Perform Result.text = d.OutputData.ReplaceLineEndings(EndOfLine) End Sub
Private Sub SendVerification() Dim e As Integer dim d as new CURLSMBS d.OptionURL = "https://verify.twilio.com/v2/Services/"+TF_Service_SID.Text+"/VerificationCheck" d.OptionVerbose = True d.CollectOutputData = True d.OptionPost = True d.OptionUsername = TF_Account_SID.Text d.OptionPassword = TF_AccountPass.Text d.SetOptionHTTPHeader Array("Content-Type: application/x-www-form-urlencoded") d.OptionPostFields = "To="+EncodeURLComponent(TF_PhoneNumber.Text)+"&Code="+EncodeURLComponent(TF_Code.Text) e=d.Perform Result.Text = d.OutputData.ReplaceLineEndings(EndOfLine) dim dd As new JSONItem(d.OutputData) Dim result As Boolean = dd.lookup("valid", False) if result = True Then MessageBox "Code verified" Else MessageBox "Code couldn't be verified" end if End Sub
End Class
Class LaunchScreen Inherits iosView
End Class
End Project

See also:

The items on this page are in the following plugins: MBS CURL Plugin.


💬 Ask a question or report a problem