netapi.bas

很好的行政管理系统,供大家享用,功能非常强大,希望大家的支持

Attribute VB_Name = "NetAPI"
Option Explicit

Public Const SRV_TYPE_SERVER = &H2
Public Const SRV_TYPE_SQLSERVER = &H4
Public Const SRV_TYPE_NT_PDC = &H8
Public Const SRV_TYPE_NT_BDC = &H10
Public Const SRV_TYPE_PRINT = &H200
Public Const SRV_TYPE_NT = &H1000
Public Const SRV_TYPE_RAS = &H400

Public Const SRV_TYPE_ALL = &HFFFF
Public Const SRV_PRIMARY = 1
Public Const SRV_BACKUP = 2
Public Const SRV_SERVER = 3
Public Const SRV_NTWK = 4
Public Const SRV_WIN95 = 5
Public Const SRV_WIN3 = 6
Public Const NERR_Success = 0&