infoRouter Document Management System - Web Services API Documentation
UpdateUserEmail
Updates the email of the specified user
Syntax
[Visual Basic]
Public Shared Function functionname(ByVal AuthenticationTicket As String, _
ByVal UserName As String, _
Byval NewEmailAddress as string) as xmldocument
Parameters

AuthenticationTicket

infoRouter Authentication Ticket

UserName

The User Name of the user you wish to change the email address


Return Value
returns xml fragment.
<response success="true" error="">
if success = "true", the email address has been updated successfully
if success = "false", the error attribute returns the error description.
Remarks
The caller must be sysadmin, the domain manager or the user him/her self.
Example
Sub UpdateUserEmail_sample()
Const IRAuthenticationTicket as String="sid-xxxxxxxxxxxxxxxxxxxx"
Const IR_UserName As String = "TestUser"
Const IR_NewEmailAddress As String = "testUser@abccorp.com"

'**** END OF INPUT CONSTANTS ****


Dim IR_OBJ As InfoRouter.srv

Dim xmlResponse As System.Xml.XmlElement
Try
ClearOutputWindow()
WriteOutputLine("[UpdateUserEmail]")
WriteOutputLine("UserName = " & IR_UserName)
WriteOutputLine("Email Address= " & IR_NewEmailAddress)
WriteOutputLine("---------------------------")
Application.DoEvents()
Me.ActiveForm.Cursor = Cursors.WaitCursor

IR_OBJ = New InfoRouter.srv
IR_OBJ.Url = (txtSrvUrl.Text & "/srv.asmx")

xmlResponse = IR_OBJ.UpdateUserEmail(AuthenticationTicket, IR_UserName, IR_NewEmailAddress)
If xmlResponse.GetAttribute("success") = "true" Then
WriteOutputLine("The User email address has been updated.")
Else
WriteOutputLine("server response:" & xmlResponse.GetAttribute("error"))
End If
xmlResponse = Nothing

Catch ex As Exception
WriteOutputLine("error:" & ex.Message)
Finally
IR_OBJ = Nothing
Me.ActiveForm.Cursor = Cursors.Default
End Try
End Sub
See Also
UserExists
Syntax based on infoRouter Document Management System Web Services API Version 7.0
Copyright() 1998-2003 Active Innovations, Inc.
infoRouter Document Management System