'咱们添加好友触发的事件
AddHandler messenger.Nameserver.ContactAdded, AddressOf Nameserver_ContactAdded这个事件已经在load时载入了
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click messenger.Nameserver.AddNewContact(Me.TextBox1.Text.ToString) End Sub
Private Sub Nameserver_ContactAdded(ByVal sender As Object, ByVal e As XihSolutions.DotMSN.ListMutateEventArgs) SetStatus((e.Contact.Mail + " is added."))
messenger.Nameserver.AddContactToList(e.Contact, XihSolutions.DotMSN.MSNLists.AllowedList)
Invoke(New UpdateContactlistDelegate(AddressOf UpdateContactlist))
End Sub 'Nameserver_ContactAdded
AddNewContact或AddContactToList是添加好友的,但是一运行Button2_Click就提示Account already exists in any of the four possible lists. Use AddContactToList instead.
AddContactToList使用还用不起来,超级郁闷请大家帮忙,谢谢另外上面代码是vb dotnet写的,但是dotmsn的实例是c#的所以就来这里请教了!
AddHandler messenger.Nameserver.ContactAdded, AddressOf Nameserver_ContactAdded这个事件已经在load时载入了
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click messenger.Nameserver.AddNewContact(Me.TextBox1.Text.ToString) End Sub
Private Sub Nameserver_ContactAdded(ByVal sender As Object, ByVal e As XihSolutions.DotMSN.ListMutateEventArgs) SetStatus((e.Contact.Mail + " is added."))
messenger.Nameserver.AddContactToList(e.Contact, XihSolutions.DotMSN.MSNLists.AllowedList)
Invoke(New UpdateContactlistDelegate(AddressOf UpdateContactlist))
End Sub 'Nameserver_ContactAdded
AddNewContact或AddContactToList是添加好友的,但是一运行Button2_Click就提示Account already exists in any of the four possible lists. Use AddContactToList instead.
AddContactToList使用还用不起来,超级郁闷请大家帮忙,谢谢另外上面代码是vb dotnet写的,但是dotmsn的实例是c#的所以就来这里请教了!
{ WhiteLog("准备加入" + mail + "到好友列表"); messenger.Nameserver.AddNewContact(mail); Contact con = messenger.Nameserver.ContactList[mail]; messenger.Nameserver.AddContactToList(con, MSNLists.AllowedList);
messenger.Nameserver.AddContactToList(con, MSNLists.ForwardList); WhiteLog("已经向" + mail + "请求加入");
}接分 :)