Classic ASP
Xero Upload Attachment

Upload an attachment. (POST an attachment).
Note: Requires Chilkat v9.5.0.64 or greater.
Chilkat Classic ASP Downloads

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

' Note: Requires Chilkat v9.5.0.64 or greater.

' This requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set rest = Server.CreateObject("Chilkat.Rest")

' Before sending REST API calls, the REST object needs to be
' initialized for OAuth1.
' See Xero 2-Legged OAuth1 Setup for sample code.

' Assuming the REST object's OAuth1 authenticator is setup, and the initial
' connection was made, we may now send REST HTTP requests..

' --------------------------------------------------------------
' This example will upload an image attachment to a receipt.

endPoint = "Receipts"
receiptID = "c4f40e59-c390-0001-caff-ce731c707d00"
' This JPG image can be downloaded from https://www.chilkatsoft.com/syncedImages/penguins.jpg
filename = "penguins.jpg"

set sbPath = Server.CreateObject("Chilkat.StringBuilder")
success = sbPath.Append("/api.xro/2.0/{Endpoint}/{Guid}/Attachments/{Filename}")
numReplaced = sbPath.Replace("{Endpoint}",endPoint)
numReplaced = sbPath.Replace("{Guid}",receiptID)
numReplaced = sbPath.Replace("{Filename}",filename)

success = rest.AddHeader("Content-Type","image/jpeg")

' Load the JPG image from a file.
set jpgData = Server.CreateObject("Chilkat.BinData")
success = jpgData.LoadFile("qa_data/jpg/penguins.jpg")

' We could alternatively get it from a URL like this:
set jpgDataFromWeb = Server.CreateObject("Chilkat.BinData")
set http = Server.CreateObject("Chilkat.Http")
success = http.QuickGetBd("https://www.chilkatsoft.com/syncedImages/penguins.jpg",jpgDataFromWeb)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
    Response.End
End If

' Upload with a POST
set sbResponseBody = Server.CreateObject("Chilkat.StringBuilder")
success = rest.FullRequestBd("POST",sbPath.GetAsString(),jpgData,sbResponseBody)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>"
    Response.End
End If

' A 200 response is expected for actual success.
If (rest.ResponseStatusCode <> 200) Then
    Response.Write "<pre>" & Server.HTMLEncode( sbResponseBody.GetAsString()) & "</pre>"
    Response.End
End If

' Examine the XML response
Response.Write "<pre>" & Server.HTMLEncode( sbResponseBody.GetAsString()) & "</pre>"

' A successful response looks like this:

' 	<Response xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
' 	  <Id>d82568cd-d222-49e6-b713-880b6edb0606</Id>
' 	  <Status>OK</Status>
' 	  <ProviderName>ChilkatPrivate</ProviderName>
' 	  <DateTimeUTC>2016-11-11T14:17:49.5922609Z</DateTimeUTC>
' 	  <Attachments>
' 	    <Attachment>
' 	      <AttachmentID>0edcddc8-325f-40c7-b950-8c71f14afc7c</AttachmentID>
' 	      <FileName>penguins.jpg</FileName>
' 	      <Url>http://api.xero.com/api.xro/2.0/Receipts/c4f40e59-c390-0001-caff-ce731c707d00/Attachments/penguins.jpg</Url>
' 	      <MimeType>image/jpg</MimeType>
' 	      <ContentLength>777835</ContentLength>
' 	    </Attachment>
' 	  </Attachments>
' 	</Response>

%>
</body>
</html>