Ошибка тайм-аута при выполнении долгого скрипта

[motorway]

Из макроса VBA идет обращение к PHP скрипту с помощью WinHTTP:

runurl = "http://localhost:6448/parsing2.php"
    Set runReq = New WinHttpRequest
    runReq.Open "POST", runurl, False
    runReq.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    runReq.Send

Так как скрипт работает долго - больше 4 минут уж точно, возникает ошибка:
Run-time error '-2147012894 (80072ee2)':
The operation timed-out.

Это значит, в макросе установлено какое-то время ожидания ответа? Как его увеличить? Как сделать, чтобы макрос ждал ответа от скрипта, даже если он выполняется 30 мин и больше?

[motorway]

Вот нашел такой способ:
runReq.SetTimeouts 3000000, 3000000, 3000000, 3000000
Теперь 14 минут скрипт выполнялся, ошибки не было, но появилась другая:
Ответ сервера преобразуется в другую кодировку.

a$ = serverres
RegionTo% = &H419  ' в какой код преобразовывать
For i% = 1 To Len(a$)
... ' и там дальше перекодировка

На последней строчке ошибка возникает: Overflow. Длина ответа сервера не больше 1 МБ. А с этим что можно сделать?

[motorway]

Надо убрать процент у переменной i. Сейчас получилось...