Имя: Пароль:
1C
 
HTTP Соединение, как получить файл?
0 LipTan
 
16.09.10
16:17
Не работает загрузка банков с РБК. Типовая  конфигурация. Пробовали и в УТ и в БП.
по команде
НТТР.Получить(Адрес, ВремКаталог + "\" + мИмяФайлаЗип) - файл получает, но размер его 18К, а если набрать строку в браузере, то размер сохраненного файла 222К и соответственно с полученным из 1с загрузки банков не происходит, а если подставить в нужную папку скаченный из браузера - все нормально. В 1С могут быть ограничения на размер файла? Или проблема в чем то еще?
1 Jstunner
 
16.09.10
16:18
проблема в чем-то еще
2 LipTan
 
16.09.10
16:19
а что может быть?
3 Jstunner
 
16.09.10
16:20
какой Адрес?
4 hhhh
 
16.09.10
16:22
(2) "\" - вот эта фитюлина точно не должна работать. Должно быть знак деления.
5 LipTan
 
16.09.10
16:24
СерверИсточник = "cbrates.rbc.ru";
НТТР = Новый HTTPСоединение(СерверИсточник);
Адрес = "bnk/bnk.exe";
ВремКаталог = КаталогВременныхФайлов() + "tempBik";
СоздатьКаталог(ВремКаталог);
Попытка
НТТР.Получить(Адрес, ВремКаталог + "\" + мИмяФайлаЗип);
ВходящийФайл = Новый Файл(ВремКаталог + "\" + мИмяФайлаЗип);
   Исключение
       Сообщить("Неудачная попытка соединения.");
       Возврат;
   КонецПопытки;
6 LipTan
 
16.09.10
16:24
все как в типовой, ничего не меняли
7 LipTan
 
16.09.10
16:30
(4) поменяли "\" на "/" - тоже самое. Попытка срабатывает нормально, в исключение не попадает, но все те же 18К.
8 Jstunner
 
16.09.10
16:32
у меня все скачал
9 Jstunner
 
16.09.10
16:33
ты ВходящийФайл дальше точно ничем не перезаписываешь?
10 Jstunner
 
16.09.10
16:36
кажись врубился. у тебя он не туда скачивается, где ты смотришь. Т.к. в путь прописывается два \\. КаталогВременныхФайлов() возвращает путь с конечным "\".

Вообще убери  + "\". Сделай: ВремКаталог + мИмяФайлаЗип
11 LipTan
 
16.09.10
16:36
ВходящийФайл = Новый Файл(ВремКаталог + "\" + мИмяФайлаЗип);  - это единственное, что дописали(сейчас в процессе попыток). В типовой этой строки нет. Там:
Попытка
   НТТР.Получить(Адрес, ВремКаталог + "/" + мИмяФайлаЗип);
Исключение
   Сообщить("Неудачная попытка соединения.");
   Возврат;
КонецПопытки;
12 LipTan
 
16.09.10
16:38
(10) как не туда смотрю, если даже размер файла смотрю и фижу как он в каталоге появляется и удаляется?
13 Jstunner
 
16.09.10
16:38
прокси есть?
14 Jstunner
 
16.09.10
16:39
что в этих 18K? переименую в test.html и открой в браузере
15 LipTan
 
16.09.10
16:54
(13) вот в этом не понимаю....на форумах нашли:  заменить эту строку
   НТТР = Новый HTTPСоединение(СерверИсточник);
на
   ПроксиСервер = Новый ИнтернетПрокси();
   ПроксиСервер.Пользователь = "1";
   ПроксиСервер.Пароль       = "p@ssword";    
   НТТР = Новый HTTPСоединение(СерверИсточник,,,,ПроксиСервер);
не помогло....
16 LipTan
 
16.09.10
16:54
(14)....Downloading filein progress...
Pending...
17 Jstunner
 
16.09.10
17:01
(15) Панель управления -> Свойства обозревателя -> Подключения -> Настройка LAN. Флажок "Использовать прокси-сервер" стоит?
18 LipTan
 
16.09.10
17:10
(17) Использовать прокси сервер для LAN - флажок стоит. Далее адрес и порт....потом еще флажок - не использовать прокси сервер для локальных адресов - тоже стоит
19 Jstunner
 
16.09.10
17:22
используй код


   ВремКаталог = КаталогВременныхФайлов() + "tempBik";
   СоздатьКаталог(ВремКаталог);
   Прокси = Новый ИнтернетПрокси;
   Прокси.Установить("HTTP","___АДРЕС___","___ПОРТ___");
   //Прокси.Пользователь = "___ЮЗЕР___";
   //Прокси.Пароль = "___ПАРОЛЬ___";
   НТТР = Новый HTTPСоединение("cbrates.rbc.ru",,,,Прокси);
   НТТР.Получить("bnk/bnk.exe", ВремКаталог + "\" + мИмяФайлаЗип);


___АДРЕС___ и ___ПОРТ___ замени на те, что записаны в настройках.

если при открытии браузера для просмотра страничек нужно вводить пароль, убери комментарий со строк аутентификации и пропиши свои логин и пароль
20 LipTan
 
16.09.10
18:31
(19) Недопустимое значение параметра (параметр номер '1')
21 LipTan
 
16.09.10
19:08
Прокси.Установить("HTTP","___АДРЕС___","___ПОРТ___");
При чем порт указывали и как строку и как число, т.к.
Установить(<Протокол>, <Сервер>, <Порт>)
Параметры:
<Протокол> (обязательный)
Тип: Строка. Протокол, для которого устанавливаются параметры прокси-сервера.
<Сервер> (обязательный)
Тип: Строка. Имя сервера.
<Порт> (необязательный)
Тип: Число. Порт прокси-сервера. Если в качестве протокола указана пустая строка, то все обращения к прокси-серверу для каждого протокола будут идти через порт по умолчанию для этого протокола.

ошибку не выдает, но и файл грузит опять короткий.
файл открыли....
ничего особенного
html>
<head><title>Downloading status</title>
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
.
.
.
script LANGUAGE="javascript"> UpdatePage(6237,"Size: 222.0 KB Downloaded 6 KB","");</script>

<script LANGUAGE="javascript">UpdatePage(227336," Size from cache: 222 KB.","");
ScanUpdate("","","",0,4,4);</script>
<script LANGUAGE="javascript"> UpdatePage(79965," Size from cache: 222 KB.","");</script>
<script LANGUAGE="javascript">ScanUpdate("","","2009-04-27 11:31",0,0,2);
</script><script LANGUAGE="javascript">DownloadFinished(227336,1," Scanned with Norman  antivirus.","463810628/477605904T100916113941.txt.binXMysM0dapplication/octet-streamXsysM0dhttp://cbrates.rbc.ru/bnk/bnk.exe");</script></body></html>;
22 Jstunner
 
16.09.10
23:12
(21) покажи код, который получился
23 LipTan
 
17.09.10
10:32
СерверИсточник = "cbrates.rbc.ru";
ПроксиСервер = Новый ИнтернетПрокси();
ПроксиСервер.Установить("HTTP","адрес", порт);
НТТР = Новый HTTPСоединение(СерверИсточник,,,,ПроксиСервер);
Адрес = "bnk/bnk.exe";
ВремКаталог = КаталогВременныхФайлов() + "tempBik";
СоздатьКаталог(ВремКаталог);
УдалитьФайлы(ВремКаталог,"*.*");
Попытка
   НТТР.Получить(Адрес, ВремКаталог + "/" + мИмяФайлаЗип);
Исключение
   Сообщить("Неудачная попытка соединения.");
   Возврат;
КонецПопытки;
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс