HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2009
1218
tsukaTwitterへ投稿。4解決


tsuka

リンク

2009/12/18(Fri) 22:29:52|NO.29334

Twitterについっとするプログラムを組んでいます。
自分ではうまくできたつもりなのですが、エラーが出て動きません。
そのまま貼るには余分なものが多いので、サンプルを改造し再現したものを貼ります。


#include "hspinet.as" netinit if stat : dialog "ネット接続できません。" : end username = "hsp_taro" password = "greathsp" neturl "http://"+username+":"+password+"@twitter.com/statuses/" prm = "status=HSP%82%A9%82%E7%93%8A%8De%83e%83X%83g%81I%20%5Bhsp%5D" netrequest_post "update.xml", prm mes "DOWNLOAD 開始" *main ; 結果待ちのためのループ netexec res if res > 0 : goto *comp if res < 0 : goto *bad await 50 goto *main *bad ; エラー neterror estr mes "ERROR "+estr stop *comp ; 完了 mes "DOWNLOAD 完了" netgetv buf mesbox buf,640,400,1 stop
投稿するにはどうすればいいでしょうか。



この記事に返信する


inovia

リンク

2009/12/19(Sat) 11:29:00|NO.29347

これでOKなはずです。

#include "hspinet.as" // HSP3用多倍長整数演算プラグイン・RSAモジュール // (BASE64エンコードに使用) // http://hsp.tv/make/tool1.html #include "rsa.hsp" netinit if stat : dialog "ネット接続できません。" : end username = "UserName" password = "Password" sdim base64 b=""+username+":"+password EncodeBase64 base64,b,strlen(b) neturl "http://twitter.com/statuses/" netheader "Authorization: Basic "+base64+"\n" prm = "status=HSP+Send+Test" netrequest_post "update.xml", prm *main ; 結果待ちのためのループ netexec res if res > 0 : goto *comp if res < 0 : goto *bad await 50 goto *main *bad ; エラー neterror estr mes "ERROR "+estr stop *comp ; 完了 mes "DOWNLOAD 完了" netgetv buf mesbox buf,640,400,1 stop ;http://twitter.com/statuses/update.xml



inovia

リンク

2009/12/19(Sat) 12:55:43|NO.29348

投稿したらこうなりました。
http://twitter.com/hinekure_inovia



tsuka

リンク

2009/12/19(Sat) 14:52:26|NO.29349

ふむふむ。
認証のところが違ったのですね。
これでHSPでもTwitterクライアントが作れることが証明できました。
ありがとうございます。
ついでにフォローさせていただきます。



tsuka

リンク

2009/12/19(Sat) 14:52:42|NO.29350

解決忘れ。



ONION software Copyright 1997-2023(c) All rights reserved.