zhouln2008 2007-9-17 09:54
PB11,取计算机名方法
FUNCTION boolean GetComputerNameA(ref string cname,ref long nbuf) LIBRARY "kernel32.dll" ALIAS FOR "GetComputerNameA;ansi"
string ls_compname
long ll_buf
ll_buf = 25
ls_compname = space(ll_buf)
GetComputerNameA(ls_compname, ll_buf)
return ls_compname