1

さて、私はSkypeでユーザーを追加するためのコードを検索していましたが、見つけたのは次のことだけでした:

Imports SKYPE4COMLib

Public Class frmMain

    Public WithEvents oSkype As New SKYPE4COMLib.Skype

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        oSkype.Client.OpenAddContactDialog("username")
    End Sub
End Class

しかし、リクエストは送信されません..そして、oSkype.Friends.Add(New SKYPE4COMLib.User("username"))は機能しません....

助けてください!! :(

4

3 に答える 3

0 
Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)

Private Sub Command1_Click()
Skype1.Client.OpenAuthorizationDialog "username_here"
Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{TAB}"
Sleep 1000
WshShell.SendKeys "{ENTER}"
Sleep 1000


End Sub
于 2015-02-15T22:43:07.880 に答える
0

これを行うだけです：

u.BuddyStatus = TBuddyStatus.budPendingAuthorization
于 2015-02-15T21:47:00.760 に答える