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


HSPTV!掲示板


未解決 解決 停止 削除要請

2012
0617
Skypeに悩んでます。Skype4comでオンラインステータスの変更2解決


Skypeに悩んでます。

リンク

2012/6/17(Sun) 15:54:31|NO.47293

Skype4comを使って自分のSkypeのステータス(オンラインとか退席中とか)設定できる
ソフトを作ろうと思い、過去の質問の例をコピーして、プログラムの一部を変更し、
使おうと思ったのですが、どうもうまくいきません。
ソースは以下のとおりです。

#define VARIANT_FALSE (0) newcom oSkype, "Skype4COM.Skype" skypeClient = oSkype("Client") skypeIsRunning = skypeClient("IsRunning") if (skypeIsRunning == VARIANT_FALSE) { mes "Error: skype is not running." stop } // oSkype->"Attach" しなくてもMoodTextを操作できるらしい //ocall = oSkype("USERSTATUS","ONLINE") //oSkype("USERSTATUS") ="ONLINE" //oSkype->"UserStatus" "ONLINE"

これの

//ocall = oSkype("USERSTATUS","ONLINE") //oSkype("USERSTATUS") ="ONLINE" //oSkype->"UserStatus" "ONLINE"
を1行ずつコメント外して試したのですが
「#Error 30 in line 17 (???)
-->無効な名前がパラメーターに指定されています」
と表示されてしまいます。

どうすればいいのでしょうか?



この記事に返信する


Cookies

リンク

2012/6/17(Sun) 18:53:25|NO.47295

DLL本体およびそのマニュアルがDLできます。
http://developer.skype.com/accessories/skype4comより

全部英語、サンプルはVBScriptとなっているようですが、まあ、がんばればいける。

ヒントのほうがいいのかもしれないが、答えを載せちゃうとこんな感じ

#define VARIANT_FALSE (0) newcom oSkype, "Skype4COM.Skype" skypeClient = oSkype("Client") skypeIsRunning = skypeClient("IsRunning") if (skypeIsRunning == VARIANT_FALSE) { mes "Error: skype is not running." stop } //oSkype->"Attach" しなくてもMoodTextを操作できるらしい oConversion = oSkype("Convert") //ISkype::ConvertでIConversionってのが返る nStatus = oConversion("TextToOnlineStatus", "ONLINE") //"ONLINE"に相当する数値を取得 oSkype->"ChangeUserStatus" nStatus //変更
エラー処理とかあんまりしてない。

なお、これでは一応TextToOnlineStatusしたけれど、マニュアル内に

enum TUserStatus { cusUnknown = -1, cusOffline = 0, cusOnline = 1, cusAway = 2, cusNotAvailable = 3, cusDoNotDisturb = 4, cusInvisible = 5, cusLoggedOut = 6, cusSkypeMe = 7 }
とあるから、しなくても即値でいいのかも。


Text contains a text string ("OFFLINE", "ONLINE", "AWAY", "NA", "DND", "SKYPEME", "SKYPEOUT").



Skypeに悩んでます。

リンク

2012/6/17(Sun) 23:44:19|NO.47302

なるほど・・・ありがとうございます><



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