AutoIt

Google Search Console API - List

See more Google Search Console Examples

Lists the user's Search Console sites. AutoIt

Local $bSuccess = False

;  This example requires the Chilkat API to have been previously unlocked.
;  See Global Unlock Sample for sample code.

;  This example uses a previously obtained access token having permission for the 
;  Google Search Console scope.

;  In this example, Get a Google Search Console OAuth2 Access Token, the access
;  token was saved to a JSON file.  This example fetches the access token from the file..
$oJsonToken = ObjCreate("Chilkat.JsonObject")
$bSuccess = $oJsonToken.LoadFile("qa_data/tokens/googleSearchConsole.json")
If ($oJsonToken.HasMember("access_token") = False) Then
    ConsoleWrite("No access token found." & @CRLF)
    Exit
EndIf

$oHttp = ObjCreate("Chilkat.Http")
$oHttp.AuthToken = $oJsonToken.StringOf("access_token")

Local $sResponseStr = $oHttp.QuickGetStr("https://www.googleapis.com/webmasters/v3/sites")
If ($oHttp.LastMethodSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

Local $iStatusCode = $oHttp.LastStatus
ConsoleWrite("Response Status Code: " & $iStatusCode & @CRLF)

;  Sample response:

;  {
;   "siteEntry": [
;    {
;     "siteUrl": "https://www.example.com/",
;     "permissionLevel": "siteUnverifiedUser"
;    },
;    {
;     "siteUrl": "http://www.chilkatsoft.com/",
;     "permissionLevel": "siteOwner"
;    }
;   ]
;  }

ConsoleWrite($sResponseStr & @CRLF)

;  Use this online tool to generate parsing code from sample JSON: 
;  Generate Parsing Code from JSON

$oJson = ObjCreate("Chilkat.JsonObject")

$bSuccess = $oJson.Load($sResponseStr)

Local $siteUrl
Local $sPermissionLevel

Local $i = 0
Local $iCount_i = $oJson.SizeOfArray("siteEntry")
While $i < $iCount_i
    $oJson.I = $i
    $siteUrl = $oJson.StringOf("siteEntry[i].siteUrl")
    ConsoleWrite("siteUrl: " & $siteUrl & @CRLF)
    $sPermissionLevel = $oJson.StringOf("siteEntry[i].permissionLevel")
    ConsoleWrite("permissionLevel: " & $sPermissionLevel & @CRLF)
    $i = $i + 1
Wend