|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
17.11.2012, 18:04 | #21 |
Новичок
Джуниор
Регистрация: 15.11.2012
Сообщений: 14
|
Коллеги,
меня можно поздравить Вот программа, которая работает у меня: Sub VSOL() Set ie = CreateObject("InternetExplorer.Appl ication"): DoEvents NavStr = "http://www.virtualsoccer.ru/" ie.Navigate NavStr While ie.busy Or (ie.readyState <> 4): DoEvents: Wend Set ieDoc = ie.Document If ieDoc.Title Like "I^?e`a'e^a` n~a*?o`e`o^e`e^a`o`a`*" Or ieDoc.Title Like "Certificate Error*" Then ieDoc.Links(1).Click While ie.busy Or (ie.readyState <> 4): DoEvents: Wend Set ieDoc = ie.Document End If With ieDoc .all("login_n").Value = "Сюда ввожу свой логин" .all("login_p").Value = "Сюда ввожу свой пароль" .all("login_form").Click For i = 1 To 1000: DoEvents: Next While ie.busy Or (ie.readyState <> 4): DoEvents: Wend End With For i = 1 To 20000: DoEvents: Next While ie.busy Or (ie.readyState <> 4): DoEvents: Wend For i = 0 To ie.Document.all.Length - 1 Cells(i + 1, 1).Value = ie.Document.all.Item(i).innerText Next ie.Quit Set ie = Nothing End Sub Но работает не так как мне надо. Она импортирует текст только с главной страницы, а мне нужна инфа именно с ростера. Буду разбираться как программой перейтина другую страницу. Последний раз редактировалось tosha_79; 17.11.2012 в 18:06. |
17.11.2012, 18:25 | #22 | |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Цитата:
Код:
Анализ,обработка данных Недорого
|
|
17.11.2012, 19:04 | #23 |
Новичок
Джуниор
Регистрация: 15.11.2012
Сообщений: 14
|
А какая команда в данном случае для запуска авторизации?
В смысле я понимаю что onclick, но чем отличается onclick от click? Стягивает инфу с ростера прогресс. 1. Теперь нужно почитать в инете, как сделать так что бы стягивало инфу с моей 3й команды, а не первой, которая загружается при авторизации. 2. Так же , если кто может посоветуйте, где можно найти инфу, что бы я мог сделать в макросе программу, которая позволяла бы стягивать инфу в удобном виде, а не только в первую колонку в Экселе. Очень неудобно. Если будет стягиваться инфа с сайта в эксель по ячейкам и вниз и вправо было бы намного удобнее такую инфу обрабатывать Последний раз редактировалось tosha_79; 17.11.2012 в 19:38. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Импорт текста в готовый написанный другими эксель | Novich | Microsoft Office Excel | 7 | 24.08.2011 13:46 |
Импорт из дбгрида в эксель | Ake | Общие вопросы Delphi | 4 | 24.12.2010 22:51 |
импорт в эксель | Demonmov | Microsoft Office Excel | 2 | 28.04.2010 10:07 |