Что нового

[Автоматизация] Бот для блога Tumblr.com

kilohel

Новичок
Сообщения
19
Репутация
1
Все привет, пишу для блога бота застрял почти на финале.

вот мой код
Код:
#include <IE.au3>


$file_titels = FileOpen("C:\tumblr\titles.txt",0)
$file_blog_name = FileOpen("C:\tumblr\blog-names.txt",0) 
$file_links = FileOpen("C:\tumblr\links.txt",0) 
$file_kartinka = FileOpen("C:\tumblr\kartinka.txt",0) 
$file_html = FileOpen("C:\tumblr\html.txt",0)


$read_titels = FileReadLine($file_titels)
$read_blog_name = FileReadLine($file_blog_name)
$read_links = FileReadLine($file_links)
$read_kartinka = FileReadLine($file_kartinka)
$read_html = FileReadLine($file_html)


$oIE = _IECreate("http://www.tumblr.com/new/blog/")
_IELoadWait($oIE)

$oForm = _IEFormGetCollection ($oIE, 0)

$zagolovok = _IEFormElementGetCollection ($oForm, 1)
$adres = _IEFormElementGetCollection ($oForm, 2)
$Submit_Bottom = _IEFormElementGetCollection ($oForm, 5)

_IEFormElementSetValue ($zagolovok, $read_titels)
_IEFormElementSetValue ($adres, $read_blog_name)

_IEAction ($Submit_Bottom, "click")
_IELoadWait($oIE)

 $oIE2 = _IECreate("http://www.tumblr.com/new/photo/")
 _IELoadWait($oIE2)
_IELinkClickByText ($oIE2, "Установить ссылку для перехода") 
_IELoadWait($oIE2)
_IELinkClickByText ($oIE2, "Использовать URL-адрес")
_IELoadWait($oIE2)


Вот тестовый аккаунт;
http://www.tumblr.com/blog/clayton-cory
login [email protected]
pass jfjfjf

не получается вот что
 
Автор
K

kilohel

Новичок
Сообщения
19
Репутация
1
Ребят неужели нет ни каких соображений по этому поводу!?
 
Верх