'БЛОК ПОДКЛЮЧЕНИЯ К САЙТУ 
.....
Dim user as String ' логин 
Dim password as String ' пароль
keyAction = "select_action" 'ключ параметр определяющий тип запроса ,передаваемый в PHP
argumentString = "user=" & user & "&password=" & password ' & "&keyAction=" & keyAction & "&fullQuery=" & fullQuery
'MsgBox argumentString
On Error GoTo err_description
URL = "http://АдресВашейСтраницы/имяВашейСтраницы.php"
xmlhttp.Open "POST", URL, False
xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xmlhttp.setRequestHeader "Cache-Control", "no-cache"
xmlhttp.send argumentString
MsgBox xmlhttp.responseText ' пример вывода содержимого страницы после подключения

' PS если логин или пароль неправильный, или нет доступа к сайту, все это у меня выводится в error_description.
.....

<?php
if (empty($_POST['user']) || empty($_POST['password']))  
{
    echo "Вы что-то не заполнили";  
} else {
    $log= $_POST['user'];
    $pass=$_POST['password'];
    
	try {
     $dbh = new PDO('mysql:host=localhost;charset=utf8;dbname=db_sales', $log, $pass);
     $response = $dbh->query("SELECT * FROM tbl_sales")->fetchAll(PDO::FETCH_ASSOC);
    
    foreach ($response as $row)
        {
            $tblData[]=$row;
        }
    
    print json_encode($tblData,JSON_UNESCAPED_UNICODE);
    
} catch (PDOException $e) {
    print "Error!: " . $e->getMessage();
   // die();
}

 } 
?>