TEXT TO lcJson { "account_sid": "AC5ef8732a3c49700934481addd5ce1659", "api_version": "2010-04-01", "body": "Jenny please?! I love you <3", "num_segments": "1", "num_media": "1", "date_created": "Wed, 18 Aug 2010 20:01:40 +0000", "date_sent": null, "date_updated": "Wed, 18 Aug 2010 20:01:40 +0000", "direction": "outbound-api", "error_code": null, "error_message": null, "from": "+14158141829", "price": null, "sid": "MM90c6fc909d8504d45ecdb3a3d5b3556e", "status": "queued", "to": "+15558675309", "uri": "/2010-04-01/Accounts/AC5ef8732a3c49700934481addd5ce1659/Messages/MM90c6fc909d8504d45ecdb3a3d5b3556e.json" } ENDTEXT DO wwHttp loHttp = CREATEOBJECT("wwHttp") loHttp.AppPostKey(lcJson) loHttp.cContentType = "application/json" lcResponse = loHttp.HttpGet("https://api.twilio.com/2010-04-01/Accounts/AC5ef8732a3c49700934481addd5ce1659/Messages.json")+++ Rick ---
SET LIBRARY TO vfpconnection.fll ADDITIVE > >*!* SetConnectTimeout(oAppInfo.ConnectTimeOut) && Default is 10 seconds >*!* SetResponseTimeout(oAppInfo.ResponseTimeOut) && Default is 10 seconds >SetConnectTimeout(30) && Default is 10 seconds >SetResponseTimeout(30) && Default is 10 seconds > >*!* https://api.twilio.com/2010-04-01/Accounts/ACb832550f3d5e416b54a3ff1c0c7d08b1/Messages.json \ >*!* -d "Body=Jenny%20please%3F%21%20I%20love%20you%20<3" \ >*!* -d "To=%2B15558675309" \ >*!* -d "From=%2B14158141829" \ >*!* -d "MediaUrl=http://www.example.com/hearts.png" \ >*!* -u 'ACb832550f3d5e416b54a3ff1c0c7d08b1:{AuthToken}' > >m.lcURL = "https://api.twilio.com/2010-04-01/Accounts/ACb832550f3d5e416b54a3ff1c0c7d08b1/Messages.json" > >LOCAL ARRAY laPost[3,2] >laPost[1,1] = "Body" >laPost[1,2] = "Test Message from Frank via Twilio" >laPost[2,1] = "To" && name >laPost[2,2] = "+18689999999" >laPost[3,1] = "From" && name >laPost[3,2] = "+18688888888" > >IF NOT HttpPost(m.lcURL, @laPost, "", "APITrace()") > MESSAGEBOX("An error occurred sending the SMS: " + m.cTraceData, 16, "Send SMS Via Twilio") >ENDIF >>