|
Работа с сайтом из 1с |
☑ |
0
belarus
04.12.12
✎
16:27
|
Есть некий сайт..
1. нужно на него зайти из 1с (программно)
2. Заполнить логин и пароль ... нажать на кнопку вход
3. Перейти на одну из многих сылок
4. По ссылке сохранить файл
Как такое реализовать... где копать? кто сталкивался... посоветуйте... что посмотреть?
|
|
1
le_
04.12.12
✎
16:29
|
1. Обратиться к скрипту авторизации на сайте, передав ему нужные параметры.
2. Запросить файл.
|
|
2
Юрий Лазаренко
04.12.12
✎
16:29
|
(0) Запросы на сайт идут POST или GET?
|
|
3
belarus
04.12.12
✎
16:31
|
GET
|
|
4
х86
04.12.12
✎
16:34
|
не моё
'переходим на страницу:
wb.navigate "http://xxx.ru/base.php"
получаем станицу:
Set DOCUMENT = wb.DOCUMENT
'ждем загрузки страницы
Do Until wb.readyState = 4
doevents
loop
'заполняем логин
Set login_field = wb.DOCUMENT.getElementById("login")
login_field="my_login_name"
'заполняем пароль
Set pwf_field = wb.DOCUMENT.getElementById("pwd")
pwd_field="my_pwd"
'нажимаем кнопку входа
Set button_login = wb.DOCUMENT.getElementById("button_login")
button_login.click
'пауза на вход - ждем когда войдем
Delay (5)
'шарим по таблице с данными нужными
'получаем таблицу с данными
Set TABLE = DOCUMENT.getElementById("detail_table")
'два цикла по строкам и потом по ячекам(столбцам)
For Each TR In TABLE.rows
For Each TD In TR.cells
'данные в ячеке берем из TD.innerText, в моем случае пишу в excell
my_report.worksheets(list_name1).cells(my_row, 3) = TD.innerText
next
next
|
|
5
belarus
04.12.12
✎
16:51
|
спасибо
|
|
6
Юрий Лазаренко
04.12.12
✎
16:59
|
Ну или раз GET то формируем строку подключения к странице с включенными уже в нее логином и паролем, получаем страницу через HTTP-соединение и качаем с нее все что надо.
|
|