Web service integration using VB.NET

From KnowledgeTree Document Management Made Simple

Add a service reference in Visual Studio 2008

Right-click your application in the solution explorer and choose "Add Service Reference..". Enter "http://127.0.0.1/ktwebservice/webservice.php?wsdl" (without the quotes and substituting your own server address) and click "Go". You should see "KnowledgeTreeService" listed under services. Give it a namespace like "KnowledegeTreeServiceReference" and click "OK".

Make sure you use the Imports command to import the namespace like so:

Imports WindowsApplication.KnowledgeTreeServiceReference

--Buchenberg 08:03, 5 August 2008 (BST)

Authentication

Dim objWebservice As New KnowledgeTreePortClient
Dim objResponse As kt_response
objResponse = objWebservice.login("admin", "admin", "127.0.0.1")
If objResponse.status_code <> 0 Then
  MsgBox("Cannot authenticate. Reason: " + objResponse.message)
Else
  Dim strSession As String
  strSession = objResponse.message
  'add your code here
  'and log out:
  objWebservice.logout(strSession) 
End If

--Buchenberg 07:44, 5 August 2008 (BST)

Metadata example

Dim fs As kt_metadata_fieldset() = New kt_metadata_fieldset(0) {}
fs(0) = New kt_metadata_fieldset()
fs(0).fieldset = "General information"
fs(0).fields = New kt_metadata_field(2) {}
fs(0).fields(0) = New kt_metadata_field()
fs(0).fields(0).name = "Category"
fs(0).fields(0).value = "Technical"
fs(0).fields(1) = New kt_metadata_field()
fs(0).fields(1).name = "Document Author"
fs(0).fields(1).value = "Joe Soap"
fs(0).fields(2) = New kt_metadata_field()
fs(0).fields(2).name = "Media Type"
fs(0).fields(2).value = "Text"
         
Dim sysdata As kt_sysdata_item() = New kt_sysdata_item(-1) {}

--Stephen c01 16:36, 24 June 2008 (BST)