24-09-14, 06:52 PM
[ltr]الحمد لله تم التوصل للحل [/ltr]
[ltr]اللكود للناس اللي ممكن تحتاجه [/ltr]
[ltr]و مرفق ملف api [/ltr]
[ltr]Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click[/ltr]
[ltr] Using session As New Tik4Net.TikSession(Tik4Net.TikConnectorType.Api)[/ltr]
[ltr] session.Open("2.2.2.1", "admin", "mssm")[/ltr]
[ltr] Dim api As Tik4Net.Connector.Api.IApiConnector = session.Connector[/ltr]
[ltr] Dim result As String[/ltr]
[ltr] Dim x As New Generic.Dictionary(Of String, String)[/ltr]
[ltr] x.Add(".id", "01023")[/ltr]
[ltr] x.Add("comment", "1000")[/ltr]
[ltr] [/ltr]
[ltr] api.ApiExecuteNonQuery("/tool/user-manager/user/set", x)[/ltr]
[ltr] End Using[/ltr]
[ltr] End Sub[/ltr]
[ltr]اللكود للناس اللي ممكن تحتاجه [/ltr]
[ltr]و مرفق ملف api [/ltr]
[ltr]Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click[/ltr]
[ltr] Using session As New Tik4Net.TikSession(Tik4Net.TikConnectorType.Api)[/ltr]
[ltr] session.Open("2.2.2.1", "admin", "mssm")[/ltr]
[ltr] Dim api As Tik4Net.Connector.Api.IApiConnector = session.Connector[/ltr]
[ltr] Dim result As String[/ltr]
[ltr] Dim x As New Generic.Dictionary(Of String, String)[/ltr]
[ltr] x.Add(".id", "01023")[/ltr]
[ltr] x.Add("comment", "1000")[/ltr]
[ltr] [/ltr]
[ltr] api.ApiExecuteNonQuery("/tool/user-manager/user/set", x)[/ltr]
[ltr] End Using[/ltr]
[ltr] End Sub[/ltr]
