IImageService.GetImage method

Applies To:  IImageService

Extracts an image to a file based on the extents and the dimensions set using the SetImageInfo method.

[Visual Basic 6.0]

variable = Object.GetImage(requestString)

Arguments

[in] requestString

String. For more details view the XML schema available at: [ArcGIS Image Server installation folder]\Developer Kit\XML\ISClient.GetImage.XSD.

Return Value

String. For more details view the XML schema available at: [ArcGIS Image Server installation folder]\Developer Kit\XML\ISClient.GetImage.XSD.

Remarks

This method should be called only if the image information is set successfully using the SetImageInfo method.

Requirements

Platform

32 bit Windows OS (WinXP)

Environment

.NET Framework, COM, ANSI C / C++ Standard compliant

Dependency

ESRI.ImageServer.ISClient.dll (.NET Framework), ISClient.dll (COM/C++), ISClientC.dll (C/C++)

Include

isclientc.h (ANSI C)

Example

[Visual Basic 6.0]

Private Sub Form1_Load()

   Dim client As New CClientObject

   Dim strConfigPath As String

   strConfigPath = "c:\Program Files\ArcGIS\ImageServer10.0\XADefs\ISViewer.ISCConfig"

   If client.Init(strConfigPath) = False Then

      MsgBox client.Status

      Exit Sub

   End If

 

   'Open the image service

   Dim cService As CImageService

   Set cService = client.OpenImageService("ImageService://hawkings:10000/Dxb_Tif", "")

 

   'Set the extents and the dimensions of the requested image

   Dim returnVal As Boolean

   returnVal = cService.SetImageInfo(120034.5, 869002.6, 120500.13, 869711.39, 500, 500)

   If returnVal = False Then

      MsgBox cService.Status

      Exit Sub

   End If

 

   Dim imageInfoXML As String

   imageInfoXML = "<ImageServer><Client><GetImage><OutputType></OutputType><FileName></FileName><Format></Format></GetImage></Client></ImageServer>" 

 

   'Load the XML string in DOM Document object and modify the values of each node.

   Dim imageInfoDoc As New DOMDocument  

   If imageInfoDoc.loadXML (imageInfoXML) = False Then

      MsgBox "Failed to load the XML"

      Exit Sub

   End If

   imageInfoDoc.selectSingleNode("//ImageServer/Client/GetImage/OutputType").Text = "File"

   imageInfoDoc.selectSingleNode("//ImageServer/Client/GetImage/FileName").Text = "C:\Temp\OutImage.tif"

   imageInfoDoc.selectSingleNode("//ImageServer/Client/GetImage/Format").Text = "TIFF"

   imageInfoXML = imageInfoDoc.Text

 

   'Create the image file to the output location

   Dim isGetImageDone As String 

   isGetImageDone = cService.GetImage(imageInfoXML)

 

   'Close the service and disconnect the connection to ImageServer

   cService.Close

   client.Close

 

End Sub

For a detailed example, please see the ISViewer Sample in VB 6.0 in [ArcGIS Image Server installation folder]\Developer Kit\Client Applications\Samples\ folder.

Related Topics

See also: SetImageInfo, and GetImageByExtent