(PowerBuilder) X.com Verfiy Credentials (Deprecated OAuth 1.0a Authentication)

See more X Examples

Returns an HTTP 200 OK response code and a representation of the requesting user if authentication was successful; returns a 401 status code and an error message if not. Use this method to test if supplied user credentials are valid.

X.com historically used OAuth 1.0a for authenticating API requests. However, as of April 2023, Twitter has deprecated OAuth 1.0a and migrated to OAuth 2.0 for most of its API endpoints. This change was part of Twitter's effort to modernize its API and improve security.

That said, if you're working with a legacy system or have access to older documentation, you might still encounter references to OAuth 1.0a.

This example shows how Chilkat could be used with the older/deprecated Twitter v1.1 API calls.

For more information, see https://developer.x.com/en/docs/x-api/v1/accounts-and-users/manage-account-settings/api-reference/get-account-verify_credentials

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Http
oleobject loo_SbResponse
integer li_Success
integer li_StatusCode
oleobject loo_Json

loo_Http = create oleobject
// Use "Chilkat_9_5_0.Http" for versions of Chilkat < 10.0.0
li_rc = loo_Http.ConnectToNewObject("Chilkat.Http")
if li_rc < 0 then
    destroy loo_Http
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Indicate OAuth1.0a authentication is to be used with HTTP requests.
loo_Http.OAuth1 = 1

// Provide OAuth1.0a credentials
loo_Http.OAuthConsumerKey = "X_API_KEY"
loo_Http.OAuthConsumerSecret = "X_API_SECRET"
loo_Http.OAuthSigMethod = "HMAC-SHA1"
loo_Http.OAuthToken = "X_ACCESS_TOKEN"
loo_Http.OAuthTokenSecret = "X_TOKEN_SECRET"
loo_Http.OAuthVerifier = ""

loo_SbResponse = create oleobject
// Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
li_rc = loo_SbResponse.ConnectToNewObject("Chilkat.StringBuilder")

li_Success = loo_Http.QuickGetSb("https://api.twitter.com/1.1/account/verify_credentials.json",loo_SbResponse)
if li_Success = 0 then
    Write-Debug loo_Http.LastErrorText
    destroy loo_Http
    destroy loo_SbResponse
    return
end if

li_StatusCode = loo_Http.LastStatus
if li_StatusCode <> 200 then
    Write-Debug loo_Http.LastErrorText
    destroy loo_Http
    destroy loo_SbResponse
    return
end if

// We received a successful JSON response.
loo_Json = create oleobject
// Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")

loo_Json.LoadSb(loo_SbResponse)
loo_Json.EmitCompact = 0

Write-Debug loo_Json.Emit()


destroy loo_Http
destroy loo_SbResponse
destroy loo_Json