We reserve the right to log and verify your API calls and to contact you if we detect abuse on your part. For example:
	
		- the requests takes too long to return 
- the requests return too much data at a time 
- The requests are too frequent 
		We strongly suggest using the date filter parameters to return only the data that is relevant.
	
Public Class Sample
	
	Public Sub CodeSample_savediscussionsubject()
		Dim params = New NameValueCollection From {
					{"fct", "savediscussionsubject"},
					{"guid", "###"},
					{"title", "###"},
					{"projectid", ###},
					{"discussionsubjectid", "NULL"}
		}
		Dim jsonText = apiCall(params)
		
		Dim jsonObj = Newtonsoft.Json.Linq.JObject.Parse(jsonText)
		Dim success = jsonObj.Item("status").ToString <> "fail"
		Dim jResults = DirectCast(jsonObj.Item("results"), Newtonsoft.Json.Linq.JArray)
		
	End Sub
	    
	Function apiCall(_param As NameValueCollection) As String
		Dim wc As New System.Net.WebClient With {
			.Encoding = System.Text.Encoding.UTF8
		}
		
		Net.ServicePointManager.SecurityProtocol = CType(Net.SecurityProtocolType.Tls12, Net.SecurityProtocolType)
		_param.Item("format") = "iso8601" 
		Dim responseBytes = wc.UploadValues("https://api.aceproject.com", "POST", _param)
		Return System.Text.Encoding.UTF8.GetString(responseBytes)
	End Function
End Class