Set FaxServer = WScript.CreateObject("FAXCOMEX.FaxServer") 
FaxServer.Connect ""
' use empty quotes if you want the local machine
set FaxDevices = FaxServer.GetDevices()

msgbox(FaxDevices.count)

Discovered that this only queries physical fax devices that show up in Fax Manager not the remotely connected faxes that appear per user.