如何用API取得windows的Company名称？

Question

company名称？你说的是像ie上的microsoft internet explorer这样的？

Answer 1

HKEY_CURRENT_USER\Software\Microsoft\MS Setup (ACME)\User Info\DefCompany读注册表的这个值就可以了。是一个字符串。是不是很简单呀。下面这个是注册用户名：
HKEY_CURRENT_USER\Software\Microsoft\MS Setup (ACME)\User Info\DefName

Answer 2

不好意思应该是这个：
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner这是WINDOWSNT 跟 WINDOWS2000/XP 的，
WINDOWS 98/95 就是HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RegisteredOrganization
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RegisteredOwner

Answer 3

用属性
App.CompanyName
也可以！！！

Answer 4

App.CompanyName是不是指软件制造商的公司名称，而不是使用系统的客户的公司名称呀？

Answer 5

你自己试试看，就是系统的客户公司名。
Private Sub Command1_Click()
   MsgBox App.CompanyName
End Sub

Answer 6

API :GetComputerName 
API声明如下:
Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long