result := FindUrl(obj, url)
if (result)
	MsgBox, %result%
else
	MsgBox, Насяльника! Усе пропала! Адреса пропала!

FindUrl(obj, url, folderPath := "") {
	if (obj.type = "url" && obj.url = url)
		Return folderPath
	else if (obj.type = "folder")
	{
		folderPath .= (folderPath = "" ? "" : "\") . obj.name
		for k, v in obj {
			if IsObject(v) && p := FindUrl(v, url, folderPath)
				Return p
		}
	} else {
   		Return False
	}
}

#NoEnv
SetBatchLines, -1

filePath := A_AppData . "\..\Local\Google\Chrome\User Data\Default\Bookmarks"
url := "https://forum.script-coding.com/"
FileRead, json, % "*P65001 " . filePath
obj := JsonToAHK(json)
MsgBox, % FindUrl(obj, url)

FindUrl(obj, url, folderPath := "") {
   if (obj.type = "url" && obj.url = url)
      Return folderPath
   if (obj.type = "folder")
      folderPath .= (folderPath = "" ? "" : "\") . obj.name
   for k, v in obj {
      if IsObject(v) && p := FindUrl(v, url, folderPath)
         Return p
   }
}

JsonToAHK(json, rec := false) {
   static doc := ComObjCreate("htmlfile")
         , __ := doc.write("<meta http-equiv=""X-UA-Compatible"" content=""IE=9"">")
         , JS := doc.parentWindow
   if !rec
      obj := %A_ThisFunc%(JS.JSON.parse(json), true)
   else if !IsObject(json)
      obj := json
   else if JS.Object.prototype.toString.call(json) == "[object Array]" {
      obj := []
      Loop % json.length
         obj.Push( %A_ThisFunc%(json[A_Index - 1], true) )
   }
   else {
      obj := {}
      keys := JS.Object.keys(json)
      Loop % keys.length {
         k := keys[A_Index - 1]
         obj[k] := %A_ThisFunc%(json[k], true)
      }
   }
   Return obj
}