[Batch processing application] Computer enumeration of new domains, displaying domain-added personnel

File Name: querycomputer. bat
Function: finds ungrouped computers in the domain and displays the computer name and users in the domain.
Purpose: monitor the computer list to remind you to group computers. You can also check whether the computer naming rules are correct and determine the owner.
Note: Before batch processing, you are advised to group all the computers in the computers container in the existing domain by OU. After the script is run, the new computers in the computers container will be listed.

1. @ Echo off
3. Ungrouped computers in the ECHO domain Monitor
5. Echo if a computer is found, a list of computers is displayed, and a prompt is displayed through the PC speaker.
7. Echo.
9. CD/d % ~ Dp0
14. Rem sets NetBIOS Domain Name
16. Set domain = domainname
20. Rem set Domain Name
    
22. Set Dc = mydomain
24. Set DC1 = com
25. 
    
29. : Loop
31. Set found = 0
32. 
    
36. Rem search comouters
38. For/F % I in ('dsquery computer CN ^ = computers ^, DC ^ = % DC % ^, DC ^ = % DC1 % ') do set found = 1
43. Rem calls the display module if a computer is found.
45. If % found % = 1 call: Display
47. Ping-N 600 127.0.0.1> NUL 2> & 1
49. Goto Loop
51. Goto: EOF
52. 
    
56. : Display
58. Echo % date % time % found following computers:
63. Rem reads the computer's ad path and calls the display information module
65. For/F % I in ('dsquery computer CN ^ = computers ^, DC ^ = % DC % ^, DC ^ = % DC1 % ') Do call: info % I
67. Goto: EOF
74. : Info
76. Set dsname = % 1
78. Set dsname1 = // % DC %. % DC1 %/% dsname: "= %
83. Rem obtains the computer name
85. For/F "tokens = 2, 3 * delims =, =" % I in ('echo % dsname % ') do set name = % I
90. Rem displays the computer permissions and the users who can set DNS information (persons with Domain Names). dscals needs to install Support Tools
    
92. Dsacls % dsname1 % | find "% domain %" | find "DNS"> name.txt 2> & 1
94. For/F "tokens = 1, 2, 3 *" % I in (name.txt) do set user = % J
96. Echo % name %, % USER %
100. Rem record information
102. Echo % name %, % USER %> "paidate0000.csv"
109. Rem beep alert, which is written by beep or found on the Internet
110. Echo.
112. Beep 1500 500
114. Beep 500 500
116. Beep 1500 500
118. Beep 500 500
120. Beep 1500 500
122. Beep 500 500
124. Beep 1500 500
126. Beep 500 500
128. Goto: EOF