Sends the request to the ArcIMS Spatial Server.
object.SendAXLRequest ( ServiceName, AXL ) |
- ServiceName
- Required. A String that represents the service name.
- AXL
- Required. A String that represents the ArcXML request.
String
Creates an ArcIMS object and sends a GET_SERVICE_INFO_REQUEST.
ArcIMS Example (VBScript) | Copy Code |
---|---|
Sub TestArcIMS Dim objIMS Set objIMS = Application.CreateAppObject("ArcIMS") 'Set the server name objIMS.ServerName = "www.geographynetwork.com" 'Setup the request strReq = "<?xml version=""1.0"" encoding=""UTF-8""?>" & vbcr &_ "<ARCXML version=""1.1"">" & vbcr &_ "<REQUEST>" & vbcr &_ "<GET_SERVICE_INFO fields=""false"" envelope=""false"" renderer=""false"" extensions=""true"" />" & vbcr &_ "</REQUEST>" & vbcr & "</ARCXML>" 'Send the request Call objIMS.SendAXLRequest("CBI_Relief", strReq) 'Display the server name and port, request, and response in message boxes MsgBox objIMS.ServerName + ":" + CStr(objIMS.ServerPort) MsgBox objIMS.RequestAXL MsgBox objIMS.ResponseAXL 'Free object reference Set objIMS = Nothing End Sub |