Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PowerBuilder) Parse MIME to get Binary Data (such as GIF, JPG, or any binary file)Demonstrates how to parse a MIME to get binary data. This example extracts the image data for a GIF image to an in-memory byte array, and also to a file. This example uses a MIME test file located at http://www.chilkatsoft.com/testData/sampleMime2.txt. It contains the following MIME: Content-Type: multipart/mixed; boundary="------------080707010302060306060800"; This is a multi-part message in MIME format. --------------080707010302060306060800 Content-Type: text/plain Content-Transfer-Encoding: 7bit This is the plain-text body. --------------080707010302060306060800 Content-Disposition: attachment; filename="starfish.gif"; Content-Transfer-Encoding: base64 Content-Type: image/gif; name="starfish.gif"; R0lGODlhIAAgAPcAAP///+/v7/f39+/n5/fv7//39/fn597OzufW1tbGxs69vffe3u/W1salpZQQ EIQYEJwQCJQYCJwYCM6clL2Ee5wpGIwhEK0YANatpdalnHMYCKUhCJQYAKUYAM6Ec5QhCJwhCPfW zu/Oxta1rb17a6UhAK0hAPe9rb2Ec7V7a71rUpwpCL0xCJwhAOfOxta9tcatpdallM6cjMaUhK1C IZwxELU5EK0xCLUxCN61pcacjK1rUrVaOaVKKZxCIZwxCKUxCL05CLUxAM6llO+1nMZzUr1rSrVS KaVCGK1CGLVCEJQxCK05CLU5CIwpAKUxAK0xAM69tffWxrVrSrVaMbVKGMZKEL1CCLU5AP/v597O xufGtcallNaljLWEa96ce9aUc717Wq1aMcZjMbVaKbVSIa1KGL1SGJw5CK1CCLVCCMZKCM5KCMZC APfn3tbGvc57Ss5aGMZSENZaEL1KCM5SCLVCAMZKAPfezvfOte/GrdatlN6cc9aEUr1rOc5jIdZj GL1SEM5aELVKCMZSCNZaCL1KAOfOvc57Qs5jGNZjEM5aCMZSAN5aAO/OtefGrcZjGM5jEN5rELVS CMZaCN5jCOdrCM5aAO/Gpc5rGMZjENZrEN5jAOdrAOfe1t6MQtZ7Kd57IdZzGM5rEMZjCNZrCM5j ANbOxu/Wve+9jPe9hO+1e+etc85zGO+EGMZrENZzEM5rCN5zCO97COdzAO/n3u+1c+ecSt6UQs57 Ie+MIdZ7GOeEGM5zEO+EELVjCOd7CO+ECOd7AO/Ope+tWuelUu+UKeeMGOeEEO+MEOeECO+EAO/G jO+cKfeUEO+MCO+tSuecMeeUGN6MEOeMCO+UCO+tQuelOe+lMe+lKe+cGOeUEO+cEOeUCN6MAO+U AOe9c/e1Oe+lId6UEO+cCPe9Qve1Me+lEOecCO+lCOe1Su+1OeelGO+tGPetCPetAO+9Qve1GO+1 EPe9CPe9APf37+fv5/f//+/v9/fv9+fe5+/e5869xufW3t7GzgAAACwAAAAAIAAgAAAI/wABCBxI sKDBgwgTFgCwMKHDhwyHYWoIsWIBZsdyHaoIcaGbaNQ0ZeBYEROvV0pmCCDp8B4rZaOUcGHpcIEx aqPMYLjHMcsCAwgxkRv3q8wLnhAdfWpmDRwqAgQFEEvHLlCZNxwfpVmkDJ04dczc3LsXQtq4XWh8 aGH48F49FDUC9UInT941W6luCUOWyQmSLST3eUnChNS4c9SooQuGDNkrIIrA1MqXr0A+AyFC4Kln kMAQKljotJJGDZklS9PkyEHGLZu1ctbCmWvXThurfAbvHSii5kegxpYqtRpEKFnid/TSneu2LRYh P/0Q1tJRgYOZV71UL5LEK1KiV68yVf+xgaOKmAZICd5bmA8FEyZQlMjRRAhQGQv4QQSJL8ZLFHwP 6aFIJXNIEkggcgQhwYIlKEFFGDKcEgBCBVCkByC0IAMJGnSAYsUNEmzAgw4HBJBeQisZcAswjqGh wQeBKGIFFD0ocCJE9diyjTKRLPHBAx/cEAcdgxgx4Vg3HnSPKs4E00sNEYDwgQksQDLJIohMSJIj ugSTCRA/ILFDCjTckUkrpYiCAEluYCMLJCsoMQUM9gjQRSSL7CLJJjmQxMw3kQChxA78IFULHIK0 MgonXyR5UAHWVBKIEmEcUJAIYxgSSSF94AZRPrgsQgUF0RmUgWpy/LFmRYdMkACAANwrWA8cbAhi RZ8cjRWro0QEEsQVGTiKkLAM5QNGFWrAQFNLBIzABQPLRktQQAA7 --------------080707010302060306060800--
integer li_rc oleobject loo_Mime integer li_Success oleobject loo_Part2 oleobject loo_Fac // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. loo_Mime = create oleobject li_rc = loo_Mime.ConnectToNewObject("Chilkat_9_5_0.Mime") if li_rc < 0 then destroy loo_Mime MessageBox("Error","Connecting to COM object failed") return end if // Load the sampleMime2.txt file into the MIME object. // (This file is available at https://www.chilkatsoft.com/testData/sampleMime2.txt ) li_Success = loo_Mime.LoadMimeFile("sampleMime2.txt") if li_Success = 0 then Write-Debug loo_Mime.LastErrorText destroy loo_Mime return end if // The GIF image is the 2nd sub-part located directly under the // top-level MIME node. Indexing begins at 0, therefore the 2nd // sub-part is at index 1. loo_Part2 = loo_Mime.GetPart(1) // The GetBodyBinary method returns the binary bytes // of the part's body, automatically decoded from whatever // content-transfer-encoding might be used (such as base64). loo_BinaryData = loo_Part2.GetBodyBinary() // We now have the binary bytes of the GIF image in binaryData. // Save it to a file. loo_Fac = create oleobject li_rc = loo_Fac.ConnectToNewObject("Chilkat_9_5_0.FileAccess") li_Success = loo_Fac.WriteEntireFile("out1.gif",loo_BinaryData) if li_Success <> 1 then Write-Debug loo_Fac.LastErrorText destroy loo_Mime destroy loo_Fac return end if // An easier way to save the body content to a file, // assuming your application does not need to access // the binary data in-memory, is to call SaveBody li_Success = loo_Part2.SaveBody("out2.gif") if li_Success = 0 then Write-Debug loo_Part2.LastErrorText destroy loo_Mime destroy loo_Fac return end if destroy loo_Part2 Write-Debug "Finished." destroy loo_Mime destroy loo_Fac |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.