各コンピュータの情報の取得

  Computer オブジェクト



普通に考えれば次の文字列は、"WinNT://MYGROUP/XpHome" で問題ありません。しかし、コンピュータの場合は以下のように記述する事もできます

WinNT://XpHome

Name : XpHome
Class : Computer
名称 クラス
AdministratorUser
GuestUser
HelpAssistantUser
lightboxUser
SQLAgentCmdExecUser
SUPPORT_388945a0User
AdministratorsGroup
GuestsGroup
UsersGroup
HelpServicesGroupGroup
ORA_DBAGroup
AlerterService
大量の為途中省略Service
WZCSVCService

  
<SCRIPT language=VBScript>

function EnumTest()

	Set obj = GetObject("WinNT://MYGROUP/XpHome")

	List = List & "Name : " & obj.Name & "<BR>"
	List = List & "Class : " & obj.Class & "<BR>"

	List = List & "<TABLE border=0 cellspacing=1 cellpadding=5 bgcolor=black>"
	List = List & "<TH bgcolor=silver>名称</TH>" & vbCrLf
	List = List & "<TH bgcolor=silver>クラス</TH>" & vbCrLf
	For Each objTarget In obj
		List = List & "<TR>"
		List = List & "<TD bgcolor=white>" & objTarget.Name & "</TD>"
		List = List & "<TD bgcolor=white>" & objTarget.Class & "</TD>"
		List = List & "</TR>" & vbCrLf
	Next
	List = List & "</TABLE>"

	document.all("Result").innerHTML = List

end function

</SCRIPT>
<HTML>
<HEAD>
<META http-equiv="Content-Type" CONTENT="text/html; CHARSET=Shift_JIS">
</HEAD>
<BODY>
<INPUT type=button value="表示" onClick='Call EnumTest()'>
<INPUT type=button value="再表示" onClick='Call location.reload( true )'>
<BR><BR>
<DIV id=Result></DIV>
</BODY>
</HTML>
  



  Windows 2000



WinNT://SV

Name : SV
Class : Computer
名称 クラス
AdministratorUser
GuestUser
IUSR_SVUser
IWAM_SVUser
krbtgtUser
lightboxUser
shockwaveUser
SQLAgentCmdExecUser
TsInternetUserUser
VUSR_SVUser
AdministratorsGroup
UsersGroup
GuestsGroup
Backup OperatorsGroup
ReplicatorGroup
Server OperatorsGroup
Account OperatorsGroup
Print OperatorsGroup
Pre-Windows 2000 Compatible AccessGroup
RAS and IAS ServersGroup
DHCP UsersGroup
DHCP AdministratorsGroup
DnsAdminsGroup
Cert PublishersGroup
DnsUpdateProxyGroup
Domain AdminsGroup
Domain ComputersGroup
Domain ControllersGroup
Domain GuestsGroup
Domain UsersGroup
Enterprise AdminsGroup
Group Policy Creator OwnersGroup
IMSUsersGroup
Schema AdminsGroup
AlerterService
途中省略Service
wuauservService



  Windows NT4.0

WinNT://NT

Name : NT
Class : Computer
名称 クラス
AdministratorUser
GuestUser
IUSR_NTUser
IWAM_NTUser
lightboxUser
SQLAgentCmdExecUser
testUser
yamadaUser
Account OperatorsGroup
AdministratorsGroup
Backup OperatorsGroup
GuestsGroup
Print OperatorsGroup
ReplicatorGroup
Server OperatorsGroup
UsersGroup
MTS ImpersonatorsGroup
Domain AdminsGroup
Domain GuestsGroup
Domain UsersGroup
AlerterService
途中省略Service
WinMgmtService










  infoboard   管理者用   
このエントリーをはてなブックマークに追加





フリーフォントWEBサービス
SQLの窓WEBサービス

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ