>I'm looking for functions to to retrieve information about computers. I have found that:
>OS() which gives info about Windows OS.
>SYS(17) which gives processor, but only "Pentium"?
>Drivetype() and DiskSpace() to get disk size and available space
>Anetresources() to get the available net and resources on each net, but how do I get the volumes on each machine?
>
>But how can I get
>* the Ethernet address?
>* available ports like USB, COM?
>* TCP/IP setting?
>* Processor speed?
>* Installed software?
>
>and maybe other info that is useful in a support situation.

Here is name and ip

lcMachineName=space(200)
lnLen=200
llRetVal=GetComputerName(@lcMachineName,@lnLen) 
...
IPSocket = CreateObject("MSWinsock.Winsock")
...
? " This information is about your PC!" FONT "Courier",8 
?" Date and Time:   "+ TtoC(DateTime()) FONT "Courier",8
If Type('IPSocket')='O'
   IPAddress = IPSocket.LocalIP
   localhostname=IPSocket.localhostname
   If llRetval
      ?" Machine Name:    "+ SubStr(lcMachineName,1,lnLen) FONT "Courier",8
   Else   
      ?" Machine Name:    Undetermined!" FONT "Courier",8
   EndIf
   ?" Local Host Name: "+localhostname FONT "Courier",8
   ?" Local IP:        " + IPAddress FONT "Courier",8
EndIf