Code Error 800A01BD – Object doesn’t  support this ACTION

Troubleshooting Code 800A01BD – Object doesn’t support this ACTION

Introduction to Error Code 800A01BD

This error code, 800A01BD usually occurs when you execute a VBScript.  One of your commands is not valid.  The method / property combination does not interact.  A wild guess, you copied and pasted a .Property from one script to another.

The Symptoms You Get Code: 800A01BD Object doesn't support this action

The script does not execute as you hoped, instead you get a WSH error message. The probable scenario is that you are attempting to use a WSH method or property that is inappropriate.

The Cause of Error 800A01BD

Your VBScript contains an illegal method, maybe a typing mistake, an extra letter or space. Note the Source: Is a VBScript runtime error.  Beware using a .property from another object.

The Solution Object doesn’t support this ACTION

Check the syntax of your script, particularly the method that you have used.  Look for clues, particularly in the Line: number.  In my example Line 12 is at fault.  However Char : 1 is a surprise as its actually the method about character 50. 

Incidentally, Source: reports a runtime error not a compilation error, this means you are looking not for a pure syntax problem, but a fault logic error.  In the case of runtime errors, you can use this temporary work around.  Add this statement just before the line which errors: On Error Resume Next.


Example 1 of Script with error 800A01BD

Here the problem is is the .UserProfile property. The objNetwork does not support this property, thus it cannot perform the required action.

  ‘ Start
‘ User.vbs
‘ 800A01BD Script to Echo the name of the current user
‘ Version 2.1 August 2010
‘ Guy Thomas

Option Explicit
Dim objNetwork, objFSO
Dim strName ‘ String Variables here

Set ObjNetwork = CreateObject("Wscript.Network")
Wscript.Echo objNetwork.UserName & objNetwork.UserProfile


‘ End of Guy’s Error 800A01BD script


Another Solution

One solution would be try a completely method, for example ‘winmgmts’

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkConnection",,48)

For Each objItem in colItems


See More Windows Update Error Codes 8004 Series

Error 800A101A8 Object Required   •Error 800A0046   •Error 800A10AD   •Error 800A000D

Error 80048820   •Error 800A0401   •Review of SolarWinds Permissions Monitor

Error 80040E14   • Error 800A03EA   • Error 800A0408   • Error 800A03EE

Solarwinds Free WMI MonitorGuy Recommends: WMI Monitor and It’s Free!

Windows Management Instrumentation (WMI) is one of the hidden treasures of Microsoft operating systems.  Fortunately, SolarWinds have created the WMI Monitor so that you can examine these gems of performance information for free.  Take the guess work out of which WMI counters to use for applications like Microsoft Active Directory, SQL or Exchange Server.

Download your free copy of WMI Monitor

Do you need additional help?

Give something back?

Would you like to help others?  If you have a good example of this error, then please email me, I will publish it with a credit to you:


If you like this page then please share it with your friends