(Lianja) Get Current User Information
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).
// 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
loOauth2 = createobject("CkOAuth2")
loOauth2.AccessToken = "FACEBOOK-ACCESS-TOKEN"
loRest = createobject("CkRest")
// Connect to Facebook and send the following GET request:
// GET /v2.7/me HTTP/1.1
// Host: graph.facebook.com
llBAutoReconnect = .T.
llSuccess = loRest.Connect("graph.facebook.com",443,.T.,llBAutoReconnect)
if (llSuccess <> .T.) then
? loRest.LastErrorText
release loOauth2
release loRest
return
endif
// Provide the authentication credentials (i.e. the access key)
loRest.SetAuthOAuth2(loOauth2)
lcResponseJson = loRest.FullRequestNoBody("GET","/v2.7/me")
if (loRest.LastMethodSuccess <> .T.) then
? loRest.LastErrorText
release loOauth2
release loRest
return
endif
? lcResponseJson
// The responseJson looks like this:
// {"name":"John Doe","id":"10111011320111110"}
release loOauth2
release loRest
|