У меня заработало с такими корректировками:
//СБОР ДАННЫХ О КУРСАХ ВАЛЮТ С СЕРВЕРА ЦБРФ
Текст=СоздатьОбъект("Текст");
ДатаЗагрузки=НачДата;
Пока ДатаЗагрузки <= КонДата Цикл
Стр="";
Адрес = "http://www.cbr.ru/scripts/XML_daily.asp?date_req="+Лев(Строка(ДатаЗагрузки),6)+ДатаГод(ДатаЗагрузки);
Попытка
Соединение.ПолучитьКакСтроку(Адрес, Стр);
Исключение
Сообщить("Неудачная попытка соединения.");
КонецПопытки;
Стр = СтрЗаменить(Стр,"<ValCurs Date","
|<ValCurs Date" );
Стр = СтрЗаменить(Стр,"<Valute I","
|<Valute I" );
Стр = СтрЗаменить(Стр,"<NumCode>","
|<NumCode>" );
Стр = СтрЗаменить(Стр,"<CharCode>","
|<CharCode>" );
Стр = СтрЗаменить(Стр,"<Nominal>","
|<Nominal>" );
Стр = СтрЗаменить(Стр,"<Value>","
|<Value>" );
Текст.ДобавитьСтроку(Стр);
ДатаЗагрузки=ДатаЗагрузки+1;
КонецЦикла;
Показать