' Copyright 2010 ESRI
' 
' All rights reserved under the copyright laws of the United States
' and applicable international laws, treaties, and conventions.
' 
' You may freely redistribute and use this sample code, with or
' without modification, provided you include the original copyright
' notice and use restrictions.
' 
' See the use restrictions.
' 

Imports Microsoft.VisualBasic
Imports System
Imports System.Collections.Generic
Imports System.Text

Namespace TiledMapDataSource_VBNet
  Friend Class TileAccessInfo
    Private server_Renamed As String
    Private service_Renamed As String
    Private vdir As String
    Private webserviceHandler As String
    Private dataFrame_Renamed As String
    Private tileAccess_Renamed As tileAccessMethod

    Private webImageFormat_Renamed As ESRI.ArcGIS.ADF.Web.WebImageFormat
    Private imageFormat_Renamed As System.Drawing.Imaging.ImageFormat
    Private imageFormatExtension_Renamed As String
    Private cacheTileFormat_Renamed As String

    Public Property DataFrame() As String
      Get
        Return dataFrame_Renamed
      End Get
      Set
        dataFrame_Renamed = Value
      End Set
    End Property

    Public Property CacheTileFormat() As String
      Get
        Return cacheTileFormat_Renamed
      End Get
      Set
        cacheTileFormat_Renamed = Value
      End Set
    End Property

    Public Property ImageFormatExtension() As String
      Get
        Return imageFormatExtension_Renamed
      End Get
      Set
        imageFormatExtension_Renamed = Value
      End Set
    End Property

    Public Property Server() As String
      Get
        Return server_Renamed
      End Get
      Set
        server_Renamed = Value
      End Set
    End Property

    Public Property Service() As String
      Get
        Return service_Renamed
      End Get
      Set
        service_Renamed = Value
      End Set
    End Property

    Public Property VirtualDirectory() As String
      Get
        Return vdir
      End Get
      Set
        vdir = Value
      End Set
    End Property

    Public Property WebServiceHandlerUrl() As String
      Get
        Return webserviceHandler
      End Get
      Set
        webserviceHandler = Value
      End Set
    End Property

    Public Property TileAccess() As tileAccessMethod
      Get
        Return tileAccess_Renamed
      End Get
      Set
        tileAccess_Renamed = Value
      End Set
    End Property

    Public Property WebImageFormat() As ESRI.ArcGIS.ADF.Web.WebImageFormat
      Get
        Return webImageFormat_Renamed
      End Get
      Set
        webImageFormat_Renamed = Value
      End Set
    End Property

    Public Property ImageFormat() As System.Drawing.Imaging.ImageFormat
      Get
        Return imageFormat_Renamed
      End Get
      Set
        imageFormat_Renamed = Value
      End Set
    End Property
  End Class
End Namespace