<%@ Language=VBScript %>
<%
'
'subtypes.asp
'Author: xx
'Date: xx
'Version: 1.0
'Description: Explore the subtypes of variants
'
'
'declare script variables
Dim varAnything
'assign a value
varAnything = 234
%>
VBScript Data Types
The value is: <%= CCur(VarAnything) %> and the type is: <%= TypeName(CCur(VarAnything)) %>