gethostname

win32api/gethostn.txt 16-Jun-00
http://members.xoom.com/n_s_wong
http://www.angelfire.com/ns/nswong

int gethostname( char FAR * name, int namelen )

DLL FUNC gethostname(neme AS PSZ, namelen AS INT) ;
  AS INT PASCAL:WSOCK32.gethostname#44

PROCEDURE Start()
  LOCAL structData IS _winWSAData
  LOCAL DIM abBuffer[128] AS BYTE
  WSAStartup(2,@structData)
  gethostname(@abBuffer,128)
  MessageBox(NULL,@abBuffer,String2Psz("gethostname"),0)
RETURN
