Как узнать текст запроса для объекта MSXML2.XMLHTTP

[Ципихович Эндрю]

запрос в ЦБ РФ при помощи объекта MSXML2.XMLHTTP чтобы узнать курс доллара выглядит так:
http://cbr.ru/currency_base/daily.aspx?C_month=01&C_year=2011&date_req=06%2F01%2F2011
Как на нужном сайте узнать какой запрос посылать чтобы узнать нужную информацию??

[RXL]

На том сайте и поинтересоваться. Чудес не бывает.

[Dimka]

RXL, пару лет назад я как-то искал веб-сервис у ЦБ РФ, но не нашёл. Поэтому для местной фабрики оставили старое решение, работающее уже лет 8: парсинг вот этой HTML странички. Дополнительно для фабрики в Харькове нужны были курсы гривны - и у Нацбанка Украины будто бы веб-сервис нашёлся, хотя сейчас точно не помню. Помню, что обидно за Родину стало

[Ципихович Эндрю]

можете скрипт выложить: "парсинг вот этой HTML странички"

Добавлено через 2 минуты и 15 секунд:
а также осталось одно
ответ от сайта для машины как перевести на человеческий язык???
В этих двух строках

Код:

Ответ = UCase(oHttp.responseText)
Курс = CCur(Mid(Ответ, InStr(InStr(1, Ответ, "USD"), Ответ, "</TD></TR>") - 7, 7))

ноги сломать можно и голову тоже, ответ сам большой, откидывают и получилось 30,565, как откидывают???

[Dimka]

Ципихович Эндрю, во-первых, это не скрипт, а код на языке C#.NET; во-вторых, не могу, потому что код принадлежит фабрике, а не мне. Писать же для тебя парсинг такой банальной вещи мне лениво, и я не уверен, что в VBA есть регулярные выражения, хотя можно и всякими Mid, InStr и прочими функциями - это ещё ленивее .

[Ципихович Эндрю]

не уверен, что в VBA есть регулярные выражения, вот пример

Код:

'правильный ренж, удаляет все абзацы и пробелы
Set reg = CreateObject("vbscript.regexp")
reg.Global = True
reg.Pattern = Chr$(13) 'Chr$(13) это абзац
s = Trim(ActiveDocument.Tables(u).Rows(q).Range)
s2 = reg.Replace(s, "")
reg.Pattern = " +" '+ означает, что заменяем и два и три и четыре и более пробелов подряд
s3 = Trim(reg.Replace(s2, ""))
reg.Pattern = Chr$(7) 'Chr$(7) это концевая сноска таблицы
s4 = Trim(reg.Replace(s3, ""))

фабрика, вещь серьёзная!!!!