Dim auth_code as string = "1234567890123456789012345678901234567890123"
Dim job As HttpJob
job.Initialize("get_refreshtoken",Me)
job.PostString("
https://api.dropbox.com/oauth2/token","code="&auth_code&"&grant_type=authorization_code")
job.GetRequest.SetHeader("Authorization", "Basic YWFhYWFhYWFhYWFhYWFhOnNzc3Nzc3Nzc3Nzc3Nzcw==")
job.GetRequest.SetHeader("Content-Type", "application/json")
job.GetRequest.SetContentType("application/json")
job.GetRequest.SetContentEncoding("text/plain")