Blog Archives

Show Dell Asset tag / part number / serial number using VB-script

This little vb-script shows the Asset tag / part number of serial number of your Dell computer.

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colSMBIOS = objWMIService.ExecQuery _
("Select * from Win32_SystemEnclosure")

For Each objSMBIOS in colSMBIOS
Wscript.Echo "Part Number: " & objSMBIOS.PartNumber
Wscript.Echo "Serial Number: " & objSMBIOS.SerialNumber
Wscript.Echo "Asset Tag: " & objSMBIOS.SMBIOSAssetTag


SCRIPT: Simple Delete Script

I needed to delete one file in every home directory of the users. For this i used an easy script using ‘for’.

@echo off
REM DELETE Powerfuse Printer Settings

cd \users\Home
for /F "usebackq delims==" %%i in (`dir *.* /B`) DO del /F /Q e:\users\home\%%i\PwrMenu\UserPref\PrinterPreferences.dat