Имя: Пароль:
1C
1С v8
распарсить в 1с странцу платного сайта
,
0 ambez
 
30.11.14
17:34
как распарсить я знаю
ЭлементыФормы.Сайт.Перейти(СсылкаНаСтраницу);

но мне надо распарсить страницу которая видна только при логине с платной учетки. как задать логин и пасс при открытии страницы?
1 ambez
 
30.11.14
17:38
было бы идеально если в форме 1с лазить по сайту, открывать нужную страничку. и в 1с нажимать кнопку "распарсить"
2 Котокот
 
30.11.14
17:42
(1) Ну так добавь на форму реквизит с отображением "ПолеHTMLДокумента" и лазий. В нужный момент получай его текст и разбирай.
3 Рэйв
 
30.11.14
17:44
>> которая видна только при логине с платной учетки

Да ты оптимист:-)
4 Котокот
 
30.11.14
17:49
(3) А что не так?
5 ambez
 
30.11.14
17:58
(3) типа это нереально?
6 ambez
 
30.11.14
17:59
если я тупо ссылку из бразуера открываю в 1с, то она не открывается, т.к. авторизации нет. весь вопрос в том как при открытии через 1с задать авторизацию на сайте
8 ambez
 
30.11.14
19:38
по теме кто-то может скзать что-то полезное?
9 zulu_mix
 
30.11.14
21:50
имясайта = "http://user.1c.ru";;
логин = "кетя";
пароль = "киздуй";
имясайтабезхттп = стрзаменить(имясайта,"http://","";);
урл = "http://"+логин+":"+пароль+"@";+имясайтабезхттп;
10 Armando
 
30.11.14
21:58
Помню Г1С когда-то писал, что у него бот для мамбы есть на 1С.
11 ambez
 
01.12.14
00:36
(9) похоже на правду. буду пробовать
12 Sasha_Rapira
 
01.12.14
01:11
Соединение = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
    Соединение.Open("POST", "https://accounts.google.com/SignUp?dsh="+Хеш+"&service";);
    Соединение.SetRequestHeader("User-Agent", Браузер);
    Соединение.SetRequestHeader("Accept", "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8");
    Соединение.SetRequestHeader("Accept-Language", "ru-RU,ru;q=0.8,en-US;q=0.5,en;q=0.3");

    Соединение.setRequestHeader("Content-type", "application/x-www-form-urlencoded; charset=utf-8");
    Соединение.SetRequestHeader("Cookie", Сессия);
    Соединение.SetRequestHeader("Referer", "https://accounts.google.com/SignUp";);
    
    Параметры = "FirstName="+Имя.......;
    
    Соединение.Send(Параметры);
    
    Ответ = Соединение.ResponseText();    




Пример моего авторегера аккаунтов гугла
Парси текст хоть где.
13 ambez
 
01.12.14
23:38
(12) спасибо