|
Q. VB.Net sample A.
'
' Send:
' Username as string
' Return:
' Nothing
' Action:
' Deletes the user and logs the Authentix Return code
'
Public Sub DeleteAuthentix(ByVal sLogin As String)
Dim Auth = CreateObject("AUTHXOCX.AuthXOCXCtrl.1")
Dim iTemp As Integer = Auth.UserDelete(sLogin)
Auth.Flush()
Auth = Nothing
PrintRecurLog("Auth.UserDelete return code:" & iTemp.ToString)
End Sub
|
|