怎么获得计算机所在的域

如何获得计算机所在的域？
想要获取计算机所加入域的名字，有函数调用吗？必须得用脚本的话，用脚本怎么写？

最近问的问题太多，实在没分了
------解决方案--------------------
如果上边无效，用这个（妖哥原创代码）
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    LPWSTR lpDomainName = NULL;
    NETSETUP_JOIN_STATUS njs = NetSetupWorkgroupName;
    ::NetGetJoinInformation(NULL, &lpDomainName, &njs);
    ShowMessage(lpDomainName);
 
    // 63 63 72 75 6E 2E 63 6F 6D
    ::NetApiBufferFree(lpDomainName);
}
------解决方案--------------------
头文件加个 #include "lm.h"看看
------解决方案--------------------
NetGetJoinInformation属于局域网管理的API函数，需要包含相应的头文件。
#include <lm.h>

参考我以前回复的帖子：
http://bbs.csdn.net/topics/340055852