ASP Script to Embed GIF Image in XML

ASP script showing how to embed a GIF image in an XML document.

<%@ LANGUAGE="VBSCRIPT" %>

<%
    response.ContentType = "text/xml"
	
    ' Create an ASP XML parser object
    set xml0 = Server.CreateObject("Chilkat_9_5_0.Xml")

    ' Returns the XML page as a Variant
    set xml = xml0.HttpGet("http://www.xml-parser.com/companies.xml")

    ' Quickly locate the Chilkat record.
    set ckRec = xml.SearchForContent(Nothing, "name", "Chilkat*")
    If (not (ckRec is Nothing)) Then

        ' Move up to the record level.
        ckRec.GetParent2

        set gifNode = ckRec.NewChild("gif_image", "")

        ' The data can be optionally Zip compressed and/or AES encrypted.
        gifData = xml.GetURL("http://www.chilkatsoft.com/images/dude.gif","","","")
        
	    zipFlag = False
	    aesEncryptFlag = False
	    password = ""
        gifNode.SetBinaryContent zipFlag, aesEncryptFlag, password, gifData

    End If

    response.write xml.GetXml()
%>