Recuperando Informações da BIOS com Windows Management Instrumentation e VBScript
Windows Management Instrumentation, ou simplesmente WMI, é uma biblioteca cujas classes nos permitem obter uma série de informações sobre o sistema.
Vou postar um exemplo simples onde recuperamos alguns dados da BIOS usando a classe Win32_BIOS com VBScript.
'-- Nome do computador remoto, ou simplesmente "." para local
strComputer = "."
'-- Objeto WMI
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
'-- Classe Win32_BIOS
Set colBIOS = objWMIService.ExecQuery _
("Select * from Win32_BIOS")
'-- Loop nas propriedades
For each objBIOS in colBIOS
Wscript.Echo "Build Number: " & objBIOS.BuildNumber & vbCrLf & _
"Current Language: " & objBIOS.CurrentLanguage & vbCrLf & _
"Installable Languages: " & objBIOS.InstallableLanguages & vbCrLf & _
"Manufacturer: " & objBIOS.Manufacturer & vbCrLf & _
"Name: " & objBIOS.Name & vbCrLf & _
"Primary BIOS: " & objBIOS.PrimaryBIOS & vbCrLf & _
"Release Date: " & objBIOS.ReleaseDate & vbCrLf & _
"Serial Number: " & objBIOS.SerialNumber & vbCrLf & _
"SMBIOS Version: " & objBIOS.SMBIOSBIOSVersion & vbCrLf & _
"SMBIOS Major Version: " & objBIOS.SMBIOSMajorVersion & vbCrLf & _
"SMBIOS Minor Version: " & objBIOS.SMBIOSMinorVersion & vbCrLf & _
"SMBIOS Present: " & objBIOS.SMBIOSPresent & vbCrLf & _
"Status: " & objBIOS.Status & vbCrLf & _
"Version: " & objBIOS.Version
Next
'-- Finaliza objeto WMI
Set objWMIService = Nothing
Salvando o código acima em um arquivo .vbs, ao executá-lo, o resultado é o da imagem abaixo :
Espero que seja útil
[]s
Impedir múltiplos logons em uma rede com Active Directory
Em parceria com o Portal Tecnologia, blog mantido pelo amigo Tiago Souza, Administrador de Redes, publicamos um passo a passo de como implementar uma funcionalidade similar a alguns softwares de mercado como o Limit Login da Microsoft, a limitação de multiplos logins de uma rede com Active Directory. Tudo feito de forma bem mais simples que os conhecidos softwares, mas muito prática e funcional.
Espero que seja útil.
Críticas e opiniões serão muito bem vindas, confiram!
http://www.portaltecnologia.net/2009/05/27/como-impedir-multiplos-logons-em-uma-rede-com-active-directory/
[]s