Converted CheckPowerPortOrientation from Delphi to VB script (now .vbs).