IEコンポネートを使って2chに書き込み
K'H 2013/4/5(Fri) 00:03:22|NO.53447
hspで2ちゃんねるにレスをしようと思いました。
そのために過去ログをあさっているといくつかヒットしたのですが、どれを試してもレスができません。
見つけた過去ログは
http://hsp.tv/play/pforum.php?mode=pastwch&num=23890
http://hsp.tv/play/pforum.php?mode=pastwch&num=23915
で試してみたソースは
url="URL"
name="名前"
email="メールアドレス"
buf="本文"
FROM = "名前"
mail = "メールアドレス"
MESSAGE = "本文"
objsize 640
input url , , 20
input name , , 20
input email , , 20
mesbox buf , , 100
axobj ie, "Shell.Explorer.2", 640, 220
button "書き込み" ,*write
stop
*write
ie -> "Navigate" ""+url
pDoc = ie("Document")
pForms = pDoc("forms",0)
// 読み込み終わるまで待つ
repeat : wait 10 : if ie("Busy") = 0 { break } : loop
// 名前
p = pForms("from")
p("value") = ttl
// e-mail
p = pForms("mail")
p("value") = email
// 本文
p = pForms("message")
p("value") = buf
wait 10
pForms -> "submit"
stop
です。
どうすれば書き込めるか教えてください
keitetsu1650 2013/4/5(Fri) 00:07:11|NO.53448
自分も過去に似たようなこと(2ch出なく別なもの)をしたことがありますが、
今回の目的ページである、2chの書き込みページのHTMLソースを自分なりに解析するのが一番かと思います。
あとはサンプルを改造する感じでやっていけると思います。