CoInitialize(NULL);
 CLSID clsid;
 HRESULT hr = CLSIDFromProgID(L"Word.Application", &clsid);//Выполняет поиск идентификатора CLSID в реестре с учетом идентификатора ProgID.
 // "Excel.Application" for MSExcel

 IDispatch* pWApp = nullptr;
 if (SUCCEEDED(hr))
 {
     hr = CoCreateInstance(clsid, NULL, CLSCTX_LOCAL_SERVER,
         IID_IDispatch, (void**)&pWApp);//Создает и инициализирует по умолчанию один объект класса , связанный с указанным идентификатором CLSID.
 }

 DISPID dispID[2];
 VARIANT pvResult;
 LPOLESTR ptName = LPOLESTR(L"Visible");
 hr = pWApp->GetIDsOfNames(IID_NULL, &ptName, 1, LOCALE_USER_DEFAULT, dispID);
 if (SUCCEEDED(hr))
 {
     VARIANT x;
     x.vt = VT_I4;
     x.lVal = 1; // 1=visible; 0=invisible;
     DISPID prop = DISPATCH_PROPERTYPUT;

     //DISPPARAMS dp = { NULL,NULL,0,0 };
     //dp.cArgs = 1;
     //dp.rgvarg = &x;
     //dp.cNamedArgs = 1;
     //dp.rgdispidNamedArgs = NULL;

     DISPPARAMS dp = { NULL,NULL,0,0 };
     dp.cArgs = 1;
     dp.cNamedArgs = 1;
     dp.rgdispidNamedArgs = &dispID[1];

     dp.rgvarg = new VARIANT[dp.cArgs];
     dp.rgvarg[0].vt = VT_BSTR;
     dp.rgvarg[0].bstrVal = SysAllocString(OLESTR("Hello"));

         hr = pWApp->Invoke(dispID[0], IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_PROPERTYPUT,
             &dp, &pvResult, NULL, NULL);

         //MessageBoxA(hWnd, "Важная инфа", "Дошел", MB_OK);
         pWApp->Release();
         delete[] dp.rgvarg;
 }

function getRandomFileName($path, $extension='')//Генерирует имя файла из 20 случайных символов и возвращает полный путь к файлу
    {
        $extension = $extension ? '.' . $extension : '';
       // $path = $path ? $path . '/' : '';
 
        do {
            $name = substr(md5(microtime() . rand(0, 9999)), 0, 20);
			$hash = sha1($name);
			$chunks = str_split($hash, 4);
			$cache_dir = $path.$chunks[0].'/'.$chunks[1].'/'.$chunks[2].'/';
			if (!is_dir($cache_dir)) mkdir($cache_dir, 0775, true);	
            $file = $cache_dir . $name . $extension;		
        } while (file_exists($file));
 
        return $file;
    }

	list($header, $body) = explode("\r\n\r\n", $result, 2);

if (!$fp) {
    echo "Ошибка создания сокета $errstr ($errno)
\n";
} else {
	echo "Сокет успешно создан: $fp
\n";
	
    fwrite($fp, "GET /$path HTTP/1.0\r\nHost: $host\r\nAccept: */*\r\n\r\n");
	
    while (!feof($fp)) {
        echo fgets($fp, 128);
    }
	
    fclose($fp);

$port = 443;
$timeout = 30;
$host = "torta-torta.ru";
$path = "docs/pustoy-fayl-pdf-5-5d1eee323ff31-5d43c64a48619.pdf"; 
$opts = array(
    'ssl' => array(
        'verify_peer' => false,
        'verify_peer_name' => false
    ),
	'header'=>array(
		"Accept-language: ru\r\n" .
        "Cookie: foo=bar\r\n" .
		"charset: windows-1251"
			)
);
$context = stream_context_create($opts);
$fp = stream_socket_client('ssl://'.$host.':'.$port, $errno, $errstr, 30, STREAM_CLIENT_CONNECT, $context);
if (!$fp) {
    echo "Ошибка создания сокета $errstr ($errno)
\n";
} else {
	//fwrite($fp, $out);
    $out = "GET /$path  HTTP/1.1\r\n";
    $out .= "Host: $host\r\n";
    $out .= "Connection: Close\r\n\r\n";
	echo "$out
\n";
    fwrite($fp, $out);
	
    while (!feof($fp)) {
        echo fgets($fp, 128);
    }
	
    fclose($fp);
}

function getRandomFileName($path, $extension='')
    {
        $extension = $extension ? '.' . $extension : '';
        do {
            $name = substr(md5(microtime() . rand(0, 9999)), 0, 20);			
            $file = $path . $name . $extension;		
        } while (file_exists($file));
        return $file;
    }

$start = microtime(true);
	set_time_limit(600);
	
	$key = API_KEY;
	$host = TIME_WEB_HOST;
	$user = TIME_WEB_USER;
	$pass = TIME_WEB_PASS;
	$base = TIME_WEB_BASE;
	$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "\n\n $date *****************ПОПЫТКА СКАЧАТЬ ФАЙЛ***************\n Адрес для скачивания https://?key=$key&pdfUrl=$arg \n", FILE_APPEND);	
	$link = new mysqli($host, $user, $pass, $base);
	$sql = "SELECT * FROM files WHERE URL = '$arg'";
	if(!$link->ping){$link = new mysqli($host, $user, $pass, $base);}
	$sql_result = $link->query($sql);
	$nr = $sql_result -> num_rows;//mysqli_num_rows($sql_result);
	if($nr == 0){//Не скачивали этот файл
		$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date Файл не загружался ранее \n", FILE_APPEND );
		$ch = curl_init("https://?key=$key&pdfUrl=$arg");
		$fname = getRandomFileName(dirname(__FILE__)."/", "pdf");
		$tmp = dirname(__FILE__)."/!tmp";
		$fp = fopen($tmp, 'wb');
		curl_setopt($ch, CURLOPT_FILE, $fp);
		curl_setopt($ch, CURLOPT_HEADER, 0);
		curl_setopt($ch, CURLOPT_TIMEOUT, 60); //CURLOPT_TIMEOUT => 60
		do{
			$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date *****************ПОПЫТКА СКАЧАТЬ ФАЙЛ***************\n", FILE_APPEND);	
			set_time_limit(600);
			//sleep(61);
			curl_exec($ch);
			if(curl_errno($ch)){
				$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date curl_errno - ".curl_errno($ch), FILE_APPEND);
				
				//throw new Exception(curl_error($ch));
				
				
				}
			$http_code = curl_getinfo($ch, CURLINFO_HTTP_CODE);	
			$content_length_download = curl_getinfo($ch, CURLINFO_CONTENT_LENGTH_DOWNLOAD);
			$curl_info_size_download =  curl_getinfo($ch, CURLINFO_SIZE_DOWNLOAD);
			$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date http_code - $http_code  content_length_download - $content_length_download curl_info_size_download - $curl_info_size_download
			Время выполнения скрипта: ".round(microtime(true) - $start, 4)." сек.\n", FILE_APPEND);	
			}while($http_code!=200);	
		//$info = curl_getinfo($ch);	
		//print_r($info);
		curl_close($ch);
		fclose($fp);
		file_put_contents($fname, file_get_contents($tmp));	
		if(($file_size = filesize($fname))==0){
			unlink($fname);
			}else{
				$sql = "INSERT INTO files
				(URL, download_to)
				VALUES
				('$arg','$fname')";
				if(!$link->ping){$link = new mysqli($host, $user, $pass, $base);}
				$sql_result = $link->query($sql);	
				$file_id = $link->insert_id;

			}
			
		}else{//Есть кэшированные данные			
		$row = $sql_result -> fetch_assoc();
		$fname = $row['download_to'];
		$file_id = $row['pk'];
		$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date Файл загружен из кэша $fname\n", FILE_APPEND );
		}
	

	//$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date http_code - $http_code content_length_download - $content_length_download file_size - $file_size curl_info_size_download $curl_info_size_download, arg - $arg\n", FILE_APPEND );	
	$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date fname - $fname\n", FILE_APPEND );	
	return $file_id;
	$date = date('Y-m-d H:i:s'); file_put_contents(dirname(__FILE__)."/logs/curl_info.log", "$date file_id - $file_id\n", FILE_APPEND );	
}

			$defaults = array(
				CURLOPT_URL => "URL",
				CURLOPT_HEADER => 0,
				CURLOPT_RETURNTRANSFER => TRUE,
				CURLOPT_TIMEOUT => 60
			); 	
			$ch = curl_init();
			curl_setopt_array($ch, $defaults);
			set_time_limit(130);
			$date = date('Y-m-d H:i:s');
			file_put_contents(dirname(__FILE__)."/logs/call_API.log", "$date делан запрос: http:\n", FILE_APPEND);			
			$data = curl_exec($ch);
			$date = date('Y-m-d H:i:s');
			file_put_contents(dirname(__FILE__)."/logs/call_API.log", "$date Запрос вернул: \n".$data, FILE_APPEND);			
			while($data === false or $data == '' ){
				set_time_limit(130);
				$date = date('Y-m-d H:i:s');
				file_put_contents(dirname(__FILE__)."/logs/call_API.log", "$date зашли в обработку ошибки или пустого значения\n". $data, FILE_APPEND);
					
					if($data === false){
						set_time_limit(130);
						$date = date('Y-m-d H:i:s');
						file_put_contents(dirname(__FILE__)."/logs/call_API.log", "$date Запрос вернул ошибку: $data \n".curl_error($ch), FILE_APPEND);
				}
				
			
			}

while(($data = curl_exec($ch)) === false or $data == '' )