• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 151
  • Last Modified:

Disable User with VB6

How can I have VB enable/disable a user, the same way I would manually do it through "Control Panel/Administrative Tools/Computer Management/Local Users and Groups/Users" and right-click to open the "Properties" window and check/uncheck the "Account is Disable" checkbox?

Thanks,
Mike
0
CCIG2006
Asked:
CCIG2006
1 Solution
 
tone28Commented:
Here is a quick example of one way you could do it.

Private Sub Command1_Click()
    Dim t As Object
    Dim strComputer As String
    strComputer = "."
    On Error GoTo HandleError
    Set t = GetObject("WinNT://" & strComputer & "/" & Text1.Text)
    MsgBox t.AccountDisabled
    t.AccountDisabled = True
    t.SetInfo
    MsgBox t.AccountDisabled
    Exit Sub
HandleError:
    MsgBox Err.Description
End Sub
0

Featured Post

Receive 1:1 tech help

Solve your biggest tech problems alongside global tech experts with 1:1 help.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now