你怎么得到Skype来阅读消息vb.net中的其他文本？

Question

我想知道是否有一种简单的方法可以使用SKYPE4COMLib.dll API支持的文件从skype的命令加载文本。我试图让机器人触发！那么 - 是否有一种简单的方法可以将其复制到文本框中？ 谢谢！ -dom

Answer 1

这是一个例子：

Imports SKYPE4COMLib
Imports System.Net

Public Class Form1
Dim valid As Boolean = False
Dim WithEvents sBot As New Skype

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    sBot.Attach(7, False)
End Sub

Private _WaitHandle_FirstThreadDone As New System.Threading.AutoResetEvent(False)

Private Sub sBot_MessageStatus(pMessage As ChatMessage, Status As TChatMessageStatus) Handles sBot.MessageStatus
    If Status = TChatMessageStatus.cmsReceived Or Status = TChatMessageStatus.cmsSent Then

        Dim Msg As String = pMessage.Body
        Dim c As Chat = pMessage.Chat

        If Msg.StartsWith("!hello") Then
            c.SendMessage("Hello sir!")