|
|
|
Click here to copy the following block | Enum DomainRole As Integer StandaloneWorkstation = 0 MemberWorkstation = 1 StandaloneServer = 2 MemberServer = 3 BackupDomainController = 4 PrimaryDomainController = 5 End Enum
Function GetDomainRole() As DomainRole Dim mos As New ManagementObjectSearcher _ ("SELECT * FROM Win32_ComputerSystem") Dim mo As ManagementObject For Each mo In mos.Get() Return CType(Integer.Parse(mo("DomainRole").ToString()), DomainRole) Next End Function |
|
|
|
Submitted By :
Nayan Patel
(Member Since : 5/26/2004 12:23:06 PM)
|
![](/main/Images/General/Line.GIF) |
![](/Main/members\Photos/e77abc36-90e5-4e95-88fa-461750eef202.jpg)
|
Job Description :
He is the moderator of this site and currently working as an independent consultant. He works with VB.net/ASP.net, SQL Server and other MS technologies. He is MCSD.net, MCDBA and MCSE. In his free time he likes to watch funny movies and doing oil painting. |
View all (893) submissions by this author
(Birth Date : 7/14/1981 ) |
|
|