Быстрый поиск в сети заставляет меня думать, что ответ Facebook - это "base64url", который закодирован для передачи в URL.
Итак, попробуйте выполнить
ToString( BinaryDecode( UrlDecode('Base64 URL Encoded String') ) )
И, если это не сработало, я нашел эту функцию
<cffunction name="Base64URLDecode" access="public" output="false" returntype="string" hint="Returns a base64url decoded string.">
<cfargument name="String" type="string" required="true" hint="String to decode.">
<cfreturn Variables.Base64Decode( Replace( Replace( Arguments.String, "-", "+", "all"), "_", "/", "all") & RepeatString("=", Len(Arguments.String) + (4 - Len(Arguments.String) % 4) % 4))>
</cffunction>
по этому URL: http://pastebin.com/bFb1bBpU