• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 345
  • Last Modified:

Are there any commadsto list all computers in one domain?

Usually we can use "net view ..." to list all on-line computers in a domain.
For this domain, it seems to have a strict rule in place. When I issue the same command, I got "System error 6118 has occurred. This workgroup is not currently available..."
However ping the other computer OK and we can copy/share files by making a shared point without problem. Do you know what kind of privileges are needed to make it work? Any other commands list all the computers in a domain? Thanks a lot.  
0
jl66
Asked:
jl66
3 Solutions
 
Tyler LaczkoCommented:
it seems that your computer is not part of a domain.

you can log into your server and look at DHCP
0
 
Daniel Van Der WerkenIndependent ConsultantCommented:
I'm pretty sure your computer has to be part of the domain for this to work, but  you can try using LDAP and active directory.  Here is a site with some decent scripts:

http://www.activexperts.com/activmonitor/windowsmanagement/scripts/activedirectory/computer/

I modified this one and ran it and it is listing all the computers.  From a command prompt, run it as
c:\>cscript name.vbs

where name.vbs is the name of the script file on your local drive.



Const ADS_SCOPE_SUBTREE = 2

Set objConnection = CreateObject("ADODB.Connection")
Set objCommand =   CreateObject("ADODB.Command")
objConnection.Provider = "ADsDSOObject"
objConnection.Open "Active Directory Provider"

Set objCOmmand.ActiveConnection = objConnection
objCommand.CommandText = _
    "Select Name, Location from 'LDAP://DC=firmwide,DC=corp,DC=gs,DC=com' " & "Where objectClass='computer'"  
objCommand.Properties("Page Size") = 1000
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE 
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst

Do Until objRecordSet.EOF
    wscript.stdout.write "Computer Name: " & objRecordSet.Fields("Name").Value & " "
    wscript.stdout.writeline "Location: " & objRecordSet.Fields("Location").Value
    objRecordSet.MoveNext
Loop

Open in new window

0
 
jl66Author Commented:
Thanks for the info and tips.
Dan7el: FOr "DC=firmwide,DC=corp,DC=gs,DC=com", how to determine these values?
Per instruction I ran it and got some error:
..."(13, 1) Provider: Table does not exist."
which is "Set objRecordSet = objCommand.Execute"
Thanks in advance!
0
Never miss a deadline with monday.com

The revolutionary project management tool is here!   Plan visually with a single glance and make sure your projects get done.

 
Daniel Van Der WerkenIndependent ConsultantCommented:
You'll have to set that to your specific domain.
In this instance, you'll use whatever your domain is.   For example, if you were at microsoft.com, then you'd use
DC=Microsoft,DC=com
0
 
RGRodgersCommented:
Have you looked into Microsoft's Sysinternals?  The ADexplorer can provide the list under DC=domain.com,CN=Computers.  The whole Sysinternals package is a free Microsoft download.
0
 
jl66Author Commented:
Thank all of you so much.
0

Featured Post

Never miss a deadline with monday.com

The revolutionary project management tool is here!   Plan visually with a single glance and make sure your projects get done.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now