Classic ASP Requires Chilkat v11.5.0+

Box: Refresh and Save Rotated OAuth Tokens

See more Box Examples

Refresh the user token saved by the authorization example. Box refresh tokens are single-use and expire after 60 days. Serialize refreshes for a token pair and save the replacement immediately; do not run concurrent refresh jobs.

See the Box API guide for setup and the complete workflow.

Classic ASP

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

'  Requires Chilkat 11.5.0 or later and a previously unlocked Chilkat bundle.
'  See Global Unlock Sample.
'  Guide: Box API Guide.

success = 0

set tokens = Server.CreateObject("Chilkat.JsonObject")
success = tokens.LoadFile("qa_data/tokens/box_oauth.json")
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( tokens.LastErrorText) & "</pre>"
    Response.End
End If

set oauth2 = Server.CreateObject("Chilkat.OAuth2")
oauth2.TokenEndpoint = "https://api.box.com/oauth2/token"
oauth2.ClientId = "BOX_CLIENT_ID"
oauth2.ClientSecret = "BOX_CLIENT_SECRET"
oauth2.RefreshToken = tokens.StringOf("refresh_token")
success = oauth2.RefreshAccessToken()
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( oauth2.LastErrorText) & "</pre>"
    Response.End
End If

success = tokens.Load(oauth2.AccessTokenResponse)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( tokens.LastErrorText) & "</pre>"
    Response.End
End If

'  The previous refresh token is now invalid. Preserve this response even if
'  your normal token-store write fails. Do not retry with the old refresh token.
success = tokens.WriteFile("qa_data/tokens/box_oauth.json")
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( tokens.LastErrorText) & "</pre>"
    Response.End
End If

Response.Write "<pre>" & Server.HTMLEncode( "New access and refresh tokens saved. Do not log their values.") & "</pre>"

%>
</body>
</html>