>>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
>

Declare GetComputerName in WIN32API string @,long @


>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
>