I tried...
Dim j As JSONGenerator
Dim m As Map
m.Initialize
m.Put("title", "TestFile.jpg")
j.Initialize(m)
Log ("JSON " & j.ToString)
ProgressDialogShow("Uploading File...")
Upload.PostString(DriveLink & "/files" & "?access_token=" & AccessToken, j.ToString)
Upload.PostFile(DriveUploadLink & "/files" & "?access_token=" & AccessToken, File.DirRootExternal, "TestFile.jpg")
And got...
{
"error": {
"errors": [
{
"domain": "global",
"reason": "parseError",
"message": "This API does not support parsing form-encoded input."
}
],
"code": 400,
"message": "This API does not support parsing form-encoded input."
}
}
ERROR Bad Request