• State Suggested Answer
  • Replies 5 replies
  • Answers 1 answer
  • Subscribers 94 subscribers
  • Views 8355 views
  • Users 0 members are here
Options
Related

Calling One IAM REST API from VB.NET

dnyandev garad extern
over 3 years ago

Hi All,

I need some help from you.

I have below the PowerShell code and it is working fine.

We have a requirement to call this One IAM rest API from VB.Net  code and don't know how to pass all these parameters. Looked on google and tried but always failed.

Does anyone has called REST API from VB.NET code and if so could you please share sample code. Thank you in advance.

$authdata = @{AuthString="Module=DialogUser;User=***;Password=*****"}

$authJson = ConvertTo-Json $authdata -Depth 2

# Login (important, pass the NAME for your session variable in -SessionVariable)

Invoke-RestMethod -Uri "http://<Server>/AppServer/auth/apphost" -Body $authJson.ToString() -Method Post -UseDefaultCredentials -Headers @{Accept="application/json"} -SessionVariable wsession

# Sample 1: Load collection using Post method

$body = @{parameters = @("test1284@test.com","98456798","FirstName","LastName","Middle Name","Department name")} | ConvertTo-Json

Invoke-RestMethod -Uri "http://<Server>//AppServer/api/script/CCC_CreateDepartment_TPA" -WebSession $wsession -Method PUT -Body $body -ContentType application/json

Invoke-RestMethod -Uri "http://<Server>//AppServer/auth/logout" -WebSession $wsession -Method Post
Kind Regards,
Dnyandev
Parents
  • 0 over 3 years ago

    I do not have the full sample code for your question, but the following sample code I have found should answer most of the questions of how to do this in general.

    It uses the 3rd party components RestSharp and NewtonSoft.Json.


    Dim client As New RestSharp.RestClient("http://myAppServer/AppServer")
client.CookieContainer = New System.Net.CookieContainer

' Authenticate against OneIM AppServer
Dim request = New RestSharp.RestRequest("auth/apphost", RestSharp.Method.POST)
Dim Body As String = "{""authString"":""Module=DialogUser;User=viadmin;Password=myPassword""}"
request.RequestFormat = RestSharp.DataFormat.Json
request.AddHeader("Content-Type", "application/json")
request.UseDefaultCredentials = True
request.AddParameter("application/json", Body, RestSharp.ParameterType.RequestBody)

Dim response As RestSharp.IRestResponse = client.Execute(request)
If response.StatusCode = Net.HttpStatusCode.OK Then
	' Fetch password
	request.Parameters.Clear()
	request.Resource = "api/entities/DialogConfigParm"
	request.Method = RestSharp.Method.GET
	request.AddQueryParameter("Fullpath", "Custom\DynamicSyncPW")
	request.AddQueryParameter("displayColumns", "Value")
	response = client.Execute(request)
	Dim responseObj As Newtonsoft.Json.Linq.JArray = Newtonsoft.Json.Linq.JArray.Parse(response.Content)
	Dim pw As String = responseObj.SelectToken("[0].values.Value").ToStringNullSafe
	If Not String.IsNullOrEmpty(pw) Then
		log.Debug("Dynamic Sync Password:{0}",pw)
		Return pw
	Else
		Throw New Exception("Password could not be determined.")
	End If
End If

Throw New Exception("Password could not be determined.")

    HTH

  • 0 over 3 years ago in reply to Markus Weiss-Ehlers

    Thank you Markus for your help.

    This helped me a lot.

Reply Children
No Data