29-01-17, 05:10 PM
سلام عليكم
بعد الصلاة على الحبيب المصطفي
اريد عمل اتصال مثل هكذا
username@password@Resource
عبر هذا الكود
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
emad = New agsXMPP.XmppClientConnection
With emad
.Server = "nimbuzz.com"
.ConnectServer = "o.nimbuzz.com"
.Open(username.Text, password.Text)
.Resource = ("textbox3.text")
.Port = "5222"
AddHandler .OnClose, AddressOf dc
AddHandler .OnReadXml, AddressOf Xml1
AddHandler .OnLogin, AddressOf loged
AddHandler .OnAuthError, AddressOf wrong
End With
End Sub
يعني بدل مااضع
textbox1 = username
textbox2=password
textbox3=Resource
اريد اختصارهم
كتالي داخل تكست بوكس واحد فقط
username@password@Resource
وشكراً اروع موقع