SKYPEAPIを使ってソースを書いているのですが、スカイプが最新版だと
3行目で「外部オブジェクトの呼び出しに失敗しました」とでてエラーがでます。
何かスカイプのバージョンを下げる以外方法はないでしょうか?
;ソース
;***SAMPLE***
newcom oSkype, "Skype4COM.Skype"
skypeClient = oSkype("Client")
skypeIsRunning = skypeClient("IsRunning")
if ( skypeIsRunning == 0 /*VARIANT_FALSE*/ ) {
dialog "Error: skype is not running.",1,"ERROR!!"
goto *exit
}
onexit *exit
//dialog oSkype("Version"),,"スカイプのバージョン情報"
convert = oSkype("Convert")
mes "callStatusToText"
repeat 23,-1
mes ""+cnt+" : "+convert("callStatusToText",cnt)
loop
pos 300,000
mes "onlineStatusToText"
repeat 9,-1
mes ""+cnt+" : "+convert("onlineStatusToText",cnt)
loop
// 通話ウィンドウ表示
skypeClient->"OpenMessageDialog" "echo123"
// チャット文字列送信
oSkype->"SendMessage" "echo123", "☆テスト☆\ntest strings!!\nnow I'll call you soon!!"
ocall = oSkype("PlaceCall","echo123") // コール先
oSkype("Mute") = 1 // マイクをミュートに設定
repeat 150
wait 10
// ステータス表示
call_status = ocall("status")
title convert("callStatusToText",call_status)+"("+call_status+")"
loop
// 通話終了
ocall->"Finish"
repeat 10
wait 10
call_status = ocall("status")
title convert("callStatusToText",call_status)+"("+call_status+")"
loop
stop
*exit
// 通話終了
ocall->"Finish"
delcom oSkype
end