Imports System
Imports System.Collections.Generic
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports Subgurim.Controles

Partial Class contact_us
    Inherits System.Web.UI.Page

#Region "Events"

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            'AtcoMap()
        End If
    End Sub

#End Region

#Region "Methods"

    'Private Sub AtcoMap()
    '    Try
    '        Dim control As New GControl(GControl.preBuilt.GOverviewMapControl)
    '        Dim control2 As New GControl(GControl.preBuilt.MenuMapTypeControl, New GControlPosition(GControlPosition.position.Top_Right))

    '        GMap1.addControl(control)
    '        GMap1.addControl(control2)
    '        ''
    '        ' add Map Scale
    '        GMap1.addControl(New GControl(GControl.preBuilt.LargeMapControl, New GControlPosition(GControlPosition.position.Top_Left)))
    '        '

    '        'add marker and window for address
    '        Dim marker As New GMarker(New GLatLng(23.0375403301873R, 72.5658881664276R))
    '        Dim window As New GInfoWindow(marker, "<center style='font-family: Arial; font-size: 12px;'><b>Ahmedabad</b><br/>3rd Floor, Waghela House,<br />Besides Havmor Restaurant,<br />Navarangpura, Ahmedabad - 380 009<br />Gujarat (INDIA).<br />Tel No: 079-40209336, 328, 335, 339<br />E-mail :<a href='mailto:contact@atcomaart.com' style='font-family: Arial; font-size: 12px; color: Blue; text-decoration:none;'>contact@atcomaart.com</a></center>", True)
    '        GMap1.addInfoWindow(window)

    '        GMap1.Height = 300
    '        GMap1.Width = 400
    '        GMap1.Version = "2.43"
    '        GMap1.enableDragging = True
    '        GMap1.enableGoogleBar = True
    '        GMap1.Language = "en"
    '        GMap1.GZoom = 3
    '        GMap1.enableContinuousZoom = True
    '        GMap1.enableDoubleClickZoom = True
    '        GMap1.enableHookMouseWheelToZoom = True
    '        GMap1.mapType = GMapType.GTypes.Physical
    '        GMap1.addMapType(GMapType.GTypes.Physical)
    '        GMap1.enableGKeyboardHandler = True

    '        Dim latlong As New GLatLng(23.0375403301873R, 72.5658881664276R)

    '        Dim maptype As GMapType.GTypes = GMapType.GTypes.Hybrid
    '        GMap1.setCenter(latlong)
    '        GMap1.setCenter(latlong, 17)
    '        GMap1.setCenter(latlong, 17, maptype)

    '        Dim customCursor As New GCustomCursor(cursor.hand, cursor.hand)
    '        GMap1.addCustomCursor(customCursor)

    '        GMap1.enablePostBackPersistence = True
    '        GMap1.enableGetGMapElementById = True
    '        '''End Ahmedabad Map
    '        '

    '        ' Bombay Map
    '        'add menu for maptype
    '        Dim control1 As New GControl(GControl.preBuilt.GOverviewMapControl)
    '        Dim control3 As New GControl(GControl.preBuilt.MenuMapTypeControl, New GControlPosition(GControlPosition.position.Top_Right))

    '        GMap2.addControl(control1)
    '        GMap2.addControl(control3)
    '        ''
    '        ' add Map Scale
    '        GMap2.addControl(New GControl(GControl.preBuilt.LargeMapControl, New GControlPosition(GControlPosition.position.Top_Left)))
    '        '

    '        'add marker and window for address
    '        Dim marker1 As New GMarker(New GLatLng(19.0135376791938R, 72.8502881526947))
    '        Dim window1 As New GInfoWindow(marker1, "<center style='font-family: Arial; font-size: 12px;'><b>Mumbai (Corporate Office)</b><br />6, Lalwani Industrial Estate,<br />14, G.D.Ambedkar Road,<br />Wadala (West), Mumbai - 400 031<br />Maharashtra (INDIA).<br />Tel No. +91-22-4037 5600<br />E-mail :<a href='mailto:contact@atcomaart.com' style='font-family: Arial; font-size: 12px; color: Blue; text-decoration:none;'>contact@atcomaart.com</a></center>", True)
    '        GMap2.addInfoWindow(window1)
    '        '
    '        GMap2.Height = 300
    '        GMap2.Width = 400
    '        GMap2.enableDragging = True
    '        GMap2.enableGoogleBar = True
    '        GMap2.Language = "en"
    '        GMap2.GZoom = 3
    '        GMap2.enableContinuousZoom = True
    '        GMap2.enableDoubleClickZoom = True
    '        GMap2.enableHookMouseWheelToZoom = True
    '        GMap2.mapType = GMapType.GTypes.Physical
    '        GMap2.addMapType(GMapType.GTypes.Physical)

    '        GMap2.enableGKeyboardHandler = True

    '        Dim latlong1 As New GLatLng(19.0135376791938R, 72.8502881526947)

    '        Dim maptype1 As GMapType.GTypes = GMapType.GTypes.Hybrid
    '        GMap2.setCenter(latlong1)
    '        GMap2.setCenter(latlong1, 17)
    '        GMap2.setCenter(latlong1, 17, maptype1)

    '        Dim customCursor1 As New GCustomCursor(cursor.hand, cursor.hand)
    '        GMap2.addCustomCursor(customCursor1)

    '        GMap2.enablePostBackPersistence = True
    '        GMap2.enableGetGMapElementById = True
    '        'end Bombay

    '        ' Delhi Map
    '        'add menu for maptype
    '        Dim control4 As New GControl(GControl.preBuilt.GOverviewMapControl)
    '        Dim control5 As New GControl(GControl.preBuilt.MenuMapTypeControl, New GControlPosition(GControlPosition.position.Top_Right))

    '        GMap3.addControl(control4)
    '        GMap3.addControl(control5)
    '        ''
    '        ' add Map Scale
    '        GMap3.addControl(New GControl(GControl.preBuilt.LargeMapControl, New GControlPosition(GControlPosition.position.Top_Left)))
    '        '

    '        'add marker and window for address
    '        Dim marker2 As New GMarker(New GLatLng(28.6937499053187R, 77.1473693847656R))
    '        Dim window2 As New GInfoWindow(marker2, "<center style='font-family: Arial; font-size: 12px;'><b>Delhi</b><br />214, Agarwal Tower-2nd Floor,<br />Netaji Subhash Place,<br />Pitampura<br />New Delhi-110 035<br />Mobile : 9810789010<br />E-mail :<a href='mailto:contact@atcomaart.com' style='font-family: Arial; font-size: 12px; color: Blue; text-decoration:none;'>contact@atcomaart.com</a></center>", True)
    '        GMap3.addInfoWindow(window2)
    '        '
    '        GMap3.Height = 300
    '        GMap3.Width = 400
    '        GMap3.enableDragging = True
    '        GMap3.enableGoogleBar = True
    '        GMap3.Language = "en"
    '        GMap3.GZoom = 3
    '        GMap3.enableContinuousZoom = True
    '        GMap3.enableDoubleClickZoom = True
    '        GMap3.enableHookMouseWheelToZoom = True
    '        GMap3.mapType = GMapType.GTypes.Physical
    '        GMap3.addMapType(GMapType.GTypes.Physical)

    '        GMap3.enableGKeyboardHandler = True

    '        Dim latlong2 As New GLatLng(28.6937499053187R, 77.1473693847656R)

    '        Dim maptype2 As GMapType.GTypes = GMapType.GTypes.Hybrid
    '        GMap3.setCenter(latlong2)
    '        GMap3.setCenter(latlong2, 17)
    '        GMap3.setCenter(latlong2, 17, maptype2)

    '        Dim customCursor2 As New GCustomCursor(cursor.hand, cursor.hand)
    '        GMap3.addCustomCursor(customCursor2)

    '        GMap3.enablePostBackPersistence = True
    '        GMap3.enableGetGMapElementById = True
    '        'end Bombay
    '    Catch ex As Exception

    '    End Try
    'End Sub

#End Region

End Class
