如何取得網路環境裡的網域名稱
如何取得網路環境裡的網域名稱 ( Domain Name )
做法如下 :
先引用 Active DS Type Library
Dim namespace As IADsContainer
Dim domain As IADs
Set namespace = GetObject("WinNT:")
For Each domain In namespace
MsgBox domain.Name '由此 Loop 取的 Domain Name
Next
PS : 需有ADSI ( Active Directory Service Interfaces ) run time
