[3asfa~mdmra]

سلام عليكم

بعد الصلاة على الحبيب المصطفي

اريد عمل اتصال مثل هكذا

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

وشكراً اروع موقع