Skip to main content

Use PowerShell to get BING Map Quadkeys

I spent part of my day trying to decipher how to ask BING for map tiles from its database. You can find a lot of useful information at Bing Maps Tile System. I’m plucking through the logic of how BING handles maps for a project that I am working on.  One of the mysteries is how to calculate a tile based on the zoom level and location.  I am not going to go through the specifics of how this works.  You can read the reference article for that.  My objective was to feed a function the X and Y location values and zoom level and get the Quadkey value back.  This is not going to be a stand alone function, but inside other code. Here it is.

 

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

Function ConvertQuadKeyTo-String

{

Param (

    $ZoomLevel = 3,

    $TileX = "3",

    $TileY = "5"

)

    $XVaL = [Convert]::ToString("$TileX",2)

    $YVaL = [Convert]::ToString("$Tiley",2)

 

    # Pad the values based on the zoom level.

    $XVal = $XVal.Padleft($ZoomLevel,"0")

    $YVal = $YVal.Padleft($ZoomLevel,"0")

 

    # Joint the 2 values together.

    # To do this, take the first character of the YVal

    # and then append the first character of the XVal.  Repeat.

    $LoopControl = 0

    $Combined = ""

    $XVal = $XVal.ToCharArray()

    $YVal = $YVal.toCharArray()

    While ($LoopControl -lt $ZoomLevel)

    {

        $Combined = $Combined+ $YVal[$LoopControl] + $XVal[$LoopControl]

        $LoopControl++

    }

   

    # Convert the combined number to Base4.

   

    # Determine if there is an even or odd number of digits.

    # if odd, the prepend a zero.

    If ($Combined.Length % 2) {$Combined = "0"+$Combined}

 

    # Take each pair of digits and convert them from Base 2

    # to Base 10. 

    $QuadKey = ""

    $Combined = $Combined.ToCharArray()

    For($X=0;$X -lt $Combined.Length; $X+=2)

    {

        $String = $Combined[$X]+$Combined[$X+1]

        $Int = [Convert]::ToInt32("$String",2)

        $QuadKey = $QuadKey + $Int.ToString()

    }

 

 

    Write-Output $QuadKey

} # END: Function ConvertQuadKeyTo-String

 

The string that is returned in used in the request for the image. Here is the image from QuadKey “0”.  Yes, I have Sapien’s PowerShell Studio 2015 engaged on this project.

image

Zoom level 2 at QuadKey 02

image

No error handling for valid values is in this code.  That will be handled by another set of code.

Comments

Popular posts from this blog

Sticky Key problem between Windows Server 2012 and LogMeIn

This week I instructed my first class using Windows Server 2012 accessed via LogMeIn and discovered a Sticky Key problem every time you press the Shift key. Here is my solution to resolve this.  First off, in the Preferences of LogMeIn for the connection to the Windows Server, click General . Change the Keyboard and mouse priority to Host side user and click Apply at the bottom. On the Windows 2012 server, open the Control Panel – Ease of Access – Change how your keyboard works . Uncheck Turn on Sticky Keys . Click Set up Sticky Keys . Uncheck Turn on Sticky Keys when SHIFT is pressed five times . Click OK twice. If you are using Windows Server 2012 as a Hyper-V host, you will need to redo the Easy of Use settings on each guest operating system in order to avoid the Sticky Key Problem. Updated Information: March 20, 2013 If you continue to have problems, Uncheck Turn on Filter Keys .

With the AD Recycle Bin Turned on, What Happens when you Create a User Account with a Password that does not meet the Password Policy?

This was an interesting observation from one of my Windows Server 2012 classes.  While working with the AD Recycle bin in a lab, one of my students discovered some interesting accounts that were created. When he created user accounts that did not meet password complexity requirements, an account is temporarily made and then deleted.  When a new password is provided that meets the password requirements, then a new account is made. We discovered this in two places.  First off in the Active Directory Administrative Center.  This is what caused the initial confusion.  Take a look.  This is in the Deleted Objects OU. You can see multiple deleted accounts for Test2 and one for Test3.  Test3 is a valid, functioning user account.  Using the PowerShell command Get-ADObject –IncludeDeletedObjects –Filter * –Properties ObjectSID we can see that indeed, two accounts were created, with one of them deleted. Notice the RID portion of the SID is different. ...

Where did a User’s Account Get Locked Out?

Updated: May 15, 2015 When this article was originally published, two extra carriage returns were add causing the code to malfunction.  The code below is correct.   My client for this week’s PowerShell class had a really interesting question. They needed to know where an account is being locked out at. OK, interesting. Apparently users hop around clients and forget to log off, leading to eventual lock out of their accounts. The accounts can be unlocked, but are then relocked after Active Directory replication. This problem is solved in two parts. The first one is to modify the event auditing on the network. The second part is resolved with PowerShell. The first part involves creating a group policy that will encompass your Domain Controllers. In this GPO, make these changes. Expand Computer Configuration \ Policies \ Windows Settings \ Security Settings \ Advanced Audit Policy Configuration \ Audit Policies \ Account Management Double click User Account Management C...