Añadiendo 2 lineas de codigo adicional podrás conectar a Cloudflare:
Set App = CreateObject("FlexFirewallManager.Admin")
App.FormatOutput="xml"
App.Username="Usuario Dominio Plesk"
App.Password="Clave Dominio Plesk"
App.CloudFlareLogin "mi email","mi clave"
App.CloudflareDomain = "mi dominio"
Dim strIP : strIP = "123.123.123.123"
Dim returnstring : returnstring = App.BlockIp(strIP)
Set objxml = CreateObject("Msxml2.DOMDocument")
objxml.LoadXml(return_string)
if lcase(objxml.SelectSingleNode("/output/result").text) = "true" then
response.write "IP Bloqueada " & strIP
else
response.write "Imposible Bloquear IP " & strIP
end if
$app = new COM("FlexFirewallManager.Admin");
$app->FormatOutput="json";
$app->Username="Usuario Dominio Plesk";
$app->Password="Clave Dominio Plesk";
$app->CloudFlareLogin("mi email","mi clave")
$app->CloudflareDomain = "mi dominio";
$strIP = "123.123.123.123";
$returnstring = app->BlockIp($strIP);
$appjson = json_decode($returnstring);
if($appjson->result){
echo "IP Bloqueada " . $strIP;
}else{
echo "Imposible Bloquear IP " . $strIP;
}