Cannot Use VBScript Classes with Application or Session Scope (246596)



The information in this article applies to:

  • Microsoft Internet Information Services 5.0

This article was previously published under Q246596

SYMPTOMS

The VBScript 5.0 engine allows the creation of user defined classes, similar to the Visual Basic classes.

When you attempt to assign a class as an Application variable, the following error message occurs:
Error Type:
Application object, ASP 0197 (0x80004005)
Disallowed object use
Cannot add object with apartment model behavior to the application intrinsic object.
/<path>/<file.ext>, line <nn>
In addition, when you assign a class to a Session variable, the following error message occurs when you attempt to use the class:
Error Type:
Microsoft VBScript runtime (0x800A01B6)
Object doesn't support this property or method: <class variable>
/<path>/<file.ext>, line <nn>

CAUSE

This behavior is by design. There are specific threading issues that prevent this functionality from being exposed at the Application or Session level.

RESOLUTION

Only use VBScript classes with page-level scope.

WORKAROUND

To work around this issue, use Include files to store VBScript classes. To do this perform the following steps:
  1. Save the following ASP code as Convert.inc in a folder with at least Script access:
    <%
    Class Convert
    	Function Celsius(F)
    		Celsius = ((F-32)*5)/9
    	End Function
    	Function Fahrenheit(C)
    		Fahrenheit = ((C*9)/5)+32
    	End Function
    End Class
    %>
    Save the following ASP code as Convert.asp in the same folder as the above file:
    <% @LANGUAGE="VBSCRIPT" %>
    <!--#include file="class.inc"-->
    <% Set MyConvert = New Convert %>
    <html>
    <body>
    <pre>32F = <%=MyConvert.Celsius(32)%>C</pre>
    <pre>32C = <%=MyConvert.Fahrenheit(32)%>F</pre>
    </body>
    </html>
    						
    When you browse the Convert.asp page, the following should be returned:

    32F = 0C
    32C = 89.6F
    							

  2. Save the following ASP code as Convert.asp in the same folder as the above file:
    <% @LANGUAGE="VBSCRIPT" %>
    <!--#include file="class.inc"-->
    <% Set MyConvert = New Convert %>
    <html>
    <body>
    <pre>32F = <%=MyConvert.Celsius(32)%>C</pre>
    <pre>32C = <%=MyConvert.Fahrenheit(32)%>F</pre>
    </body>
    </html>
    						
    When you browse the Convert.asp page, the following should be returned:

    32F = 0C
    32C = 89.6F
    							

  3. When you browse the Convert.asp page, the following should be returned:

    32F = 0C
    32C = 89.6F
    							

Note: The above example does not preserve class state between pages. In other words, if any variables are created in the class, they will be destroyed when the page goes out of scope.

MORE INFORMATION

For more information on Microsoft Scripting Technologies, please see the Microsoft Developer Network (MSDN) Web site at the following URL: Note: Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. For more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site:

Modification Type:MajorLast Reviewed:6/23/2005
Keywords:kbpending kbprb KB246596