Usando o VBScript para localizar e substituir todo o texto de várias linhas entre chaves de um nó em um arquivo JSON

Como parte de um script de logon do Windows (daí o requisito do VBScript), gostaria de definir valores nas preferências do usuário do Google Chrome (armazenadas em um arquivo JSON no perfil do usuário) para aplicar as configurações de download quando elas fizerem logon.

Estou tentando conseguir o seguinte:

Abra um arquivo JSON (%userprofile%\Local Settings\Application Data\Google\Chrome\User Data\Default\Preferences) e leia o conteúdo para uma string;Procure um nó específico chamado "download", que é pré-preenchido com valores de várias linhas que podem variar entre as construções;Substitua o texto inteiro entre as chaves por um texto de várias linhas especificado; eEscreva a string atualizada no arquivo original e salve.

O arquivo JSON completo é bastante grande, mas como amostra a ser usada como entrada, isso é copiado de um arquivo JSON típico do Google Chrome:

"bookmark_bar": {
    "show_on_all_tabs": false
},
"download": {
    "directory_upgrade": true,
    "prompt_for_download": false
},
"sync": {
    "suppress_start": true
},

Eu gostaria de procurar programaticamente o nó "download" e substituir tudo entre as chaves apenas deste nó para que ele leia:

"download": {
    "default_directory": "C:\\Windows\\Temp",
    "extensions_to_open": "pdf",
    "prompt_for_download": false
},

... com o resto do conteúdo do arquivo inalterado.

Dado o espaço em branco e várias linhas na seção do JSON a ser substituído, bem como o requisito de curingas para incluir todo o texto entre as chaves, não posso fazer isso usando a função VBScript Replace, mas meu conhecimento RegEx é limitado .

questionAnswers(1)

yourAnswerToTheQuestion