IsOEMPrinterLocked Example for Visual Basic

Private Sub IsOEMPrinterLocked _Click()
   Dim ePrint As New ePrint
   
   ePrint.EnableMethodErrors = False
   
   If (ePrint.IsOEMPrinterLocked ("Test Printer Name") = True) Then
      ePrint.UnlockOEMPrinter "Test Printer Name", "Test Password"
   Else
      ePrint.LockOEMPrinter "Test Printer Name", "Test Password"
   End If
End Sub