Things I've spent hours to find

How to find screen resolution using VBscript

Set objWMIService = GetObject("Winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_DesktopMonitor where DeviceID = 'DesktopMonitor1'",,0)
For Each objItem in colItems
    width = objItem.ScreenWidth
    height = objItem.ScreenHeight
Next

VBscripts for Iview MediaPro

Make selected image wallpaper (requires IrfanView)

På svenska

Dropdownmeny

If this helped you, please send me an e-mail elsa.nordh@gmail.com