Xbase++

Get Current User Information

See more Facebook Examples

Demonstrates how to retrieve information about the current Facebook user. This is the most basic thing to get working first (after obtaining an access token). Xbase++

LOCAL nSuccess
LOCAL oOauth2
LOCAL oRest
LOCAL nBAutoReconnect
LOCAL cResponseJson

nSuccess := 0

//  This example requires the Chilkat API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

//  This example assumes we previously obtained an access token
oOauth2 := CreateObject("Chilkat.OAuth2")
oOauth2:AccessToken := "FACEBOOK-ACCESS-TOKEN"

oRest := CreateObject("Chilkat.Rest")

//  Connect to Facebook and send the following GET request:

//  GET /v2.7/me HTTP/1.1
//  Host: graph.facebook.com
nBAutoReconnect := 1
nSuccess := oRest:Connect("graph.facebook.com", 443, 1, nBAutoReconnect)
IF (nSuccess != 1)
    ? oRest:LastErrorText
    oOauth2:destroy()
    oRest:destroy()
    RETURN
ENDIF

//  Provide the authentication credentials (i.e. the access key)
oRest:SetAuthOAuth2(oOauth2)

cResponseJson := oRest:FullRequestNoBody("GET", "/v2.7/me")
IF (oRest:LastMethodSuccess != 1)
    ? oRest:LastErrorText
    oOauth2:destroy()
    oRest:destroy()
    RETURN
ENDIF

? cResponseJson

//  The responseJson looks like this:
//  {"name":"John Doe","id":"10111011320111110"}

oOauth2:destroy()
oRest:destroy()