17-04-19, 01:09 PM
السلام عليكم جميعا
أنا عملت زر لربط ب جهاز عن طريق ssh و الربط نجح لكن عملية الفصل مش قابلة تشتغل ، مثلا لما اضغط على الزر اول مرة يتصل و تظهر كلمة Connect و لما اضغط مرة أخرى اريده ان يظهر Disconnect و يفصل الاتصال. هذا هو الكود يعمل في الاتصال لكن لما اضغل مرة اخرى لفصل الاتصال تظهر كلمة disconnect لكن الاتصال يبقى متصل و لا ينفصل!! ما السبب؟
أنا عملت زر لربط ب جهاز عن طريق ssh و الربط نجح لكن عملية الفصل مش قابلة تشتغل ، مثلا لما اضغط على الزر اول مرة يتصل و تظهر كلمة Connect و لما اضغط مرة أخرى اريده ان يظهر Disconnect و يفصل الاتصال. هذا هو الكود يعمل في الاتصال لكن لما اضغل مرة اخرى لفصل الاتصال تظهر كلمة disconnect لكن الاتصال يبقى متصل و لا ينفصل!! ما السبب؟
كود :
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
"Dim client As SftpClient = New SftpClient(192.168.1.1, "2222", "root", "1234")
If Button3.Text = "Connect" Then
client.Connect()
Button3.Text = "Disconnect"
Timer1.Enabled = True
Else
Button3.Text = "Connect"
client.Disconnect()
Timer1.Enabled = False
End If
End Sub