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:
- 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: - 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: - When you browse the Convert.asp page, the following should be returned:
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.
Modification Type: | Major | Last Reviewed: | 6/23/2005 |
---|
Keywords: | kbpending kbprb KB246596 |
---|
|