Classic ASP
Classic ASP
Upload Media for Google Photos
See more Google Photos Examples
Demonstrates how to upload a media file (such as a JPG image) that will be placed in a Google Photos album. Uploading is a two-step process:
- Upload the raw bytes to a Google Server. This doesn't result in any media items being created in the user’s Google Photos account. Instead, it returns an upload token which identifies the uploaded bytes.
- Use the upload token to create the media item in the user’s Google Photos account. You can choose whether the media should be also added to a specific album.
This example shows step 1.
Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' Get the previously obtained access token.
' See Get Google Photos Access Token.
set jsonToken = Server.CreateObject("Chilkat.JsonObject")
success = jsonToken.LoadFile("qa_data/tokens/googlePhotos.json")
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( jsonToken.LastErrorText) & "</pre>"
Response.End
End If
set http = Server.CreateObject("Chilkat.Http")
http.AuthToken = jsonToken.StringOf("access_token")
' This is the HTTPS POST we'll be sending:
' POST https://photoslibrary.googleapis.com/v1/uploads
' Authorization: Bearer OAUTH2_TOKEN
' Content-type: application/octet-stream
' X-Goog-Upload-File-Name: FILENAME
' X-Goog-Upload-Protocol: raw
http.SetRequestHeader "X-Goog-Upload-File-Name","penguins.jpg"
http.SetRequestHeader "X-Goog-Upload-Protocol","raw"
' Assuming the media isn't super large, we'll just read it into memory and send.
' (Another example exists for streaming a large media file directly from the filesystem.)
' Load the media file into memory.
set bdMedia = Server.CreateObject("Chilkat.BinData")
success = bdMedia.LoadFile("qa_data/jpg/penguins.jpg")
url = "https://photoslibrary.googleapis.com/v1/uploads"
set resp = Server.CreateObject("Chilkat.HttpResponse")
success = http.HttpBd("POST",url,bdMedia,"application/octet-stream",resp)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
Response.End
End If
' Examine the response status code. Success is indicated by a status code of 200.
Response.Write "<pre>" & Server.HTMLEncode( "response status code: " & resp.StatusCode) & "</pre>"
' Show the response body.
If (resp.StatusCode = 200) Then
' Success.
Response.Write "<pre>" & Server.HTMLEncode( "Upload token: " & resp.BodyStr) & "</pre>"
Else
Response.Write "<pre>" & Server.HTMLEncode( "Error:") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( resp.BodyStr) & "</pre>"
End If
' Clear headers such as X-Goog-Upload-File-Name for subsequent HTTP requests sent on this object..
http.ClearHeaders
%>
</body>
</html>