Problem with Class Level Properties

[ChrisRath]

One of our servers fried here a couple of weeks back, so we temporarily
switched to run IIS on another server. Well, when the new server replacement
got set up, I started having problems with what I thought was a fairly simple
ASP feature.

<%
Class clsHREF
Dim child(10)
Sub init()
Dim i
For i = LBound(child) To UBound(child)
child(i) = ""
Next
End Sub
End Class

Dim objHREF
Set objHREF = new clsHREF
Call objHREF.init()
Response.Write(objHREF.child(1))
%>

The problem here is that the class level variables that are dimensioned as
arrays are not accessible in the class methods. Not sure why the server does
not recognize this construct, but it gives the following script error:

Error Type:
Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'LBound'
test.asp, line 7

All that really means is that the child attribute is not recognized (especially
not as an array that has a Lower Bound). Are there any configuration issues on
IIS that might cause it to have grief along these lines? The non-class
features seem to work ok, and I'm connecting with the DB fine, but I can't grok
why this would run afoul.

Thanks,
Chris Rathman

[Bob Barrows [MVP]]

ChrisRath wrote:

One of our servers fried here a couple of weeks back, so we
temporarily switched to run IIS on another server. Well, when the
new server replacement got set up, I started having problems with
what I thought was a fairly simple ASP feature.

<%
Class clsHREF
Dim child(10)
Sub init()
Dim i
For i = LBound(child) To UBound(child)
child(i) = ""
Next
End Sub
End Class

Dim objHREF
Set objHREF = new clsHREF
Call objHREF.init()
Response.Write(objHREF.child(1))
%>

The problem here is that the class level variables that are
dimensioned as arrays are not accessible in the class methods. Not
sure why the server does not recognize this construct, but it gives
the following script error:

Error Type:
Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'LBound'
test.asp, line 7

All that really means is that the child attribute is not recognized
(especially not as an array that has a Lower Bound). Are there any
configuration issues on IIS that might cause it to have grief along
these lines? The non-class features seem to work ok, and I'm
connecting with the DB fine, but I can't grok why this would run
afoul.

Thanks,
Chris Rathman

Since you can't have a lower bound greater than zero in vbscript, the LBound
function is pretty superfluous. You may as well just substitute "0"
everywhere you have an LBound statement.

Bob Barrows
--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[ChrisRath]

>Since you can't have a lower bound greater than zero in vbscript, the LBound

function is pretty superfluous. You may as well just substitute "0"
everywhere you have an LBound statement.

Bad habits that I supposed I picked up from my Pascal days.

The problem persists whether I used fixed constants or use the Bound functions.
I can change the offending statement to:

For i = 0 To 10

and still get an error - albeit one that probably is more descriptive of the
actual source of the problem.

Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'child'
/demo/aaa2.asp, line 7

Like I said, this code works fine on multiple other IIS boxes. It's just this
one new box that's thrown me for a loop.

Thanks,
Chris Rathman

[Bob Barrows [MVP]]

ChrisRath wrote:

Since you can't have a lower bound greater than zero in vbscript,
the LBound function is pretty superfluous. You may as well just
substitute "0" everywhere you have an LBound statement.

Bad habits that I supposed I picked up from my Pascal days.

The problem persists whether I used fixed constants or use the Bound
functions. I can change the offending statement to:

For i = 0 To 10

and still get an error - albeit one that probably is more descriptive
of the actual source of the problem.

Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'child'
/demo/aaa2.asp, line 7

Like I said, this code works fine on multiple other IIS boxes. It's
just this one new box that's thrown me for a loop.

That IS strange. What does Vartype(child) return?
Does this problem effect non-class arrays?

I would try reinstalling the WSH.

Bob Barrows
--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[ChrisRath]

>That IS strange. What does Vartype(child) return?

Does this problem effect non-class arrays?

I would try reinstalling the WSH.

The problem didn't effect the non-class arrays. Before I found the VarType, I
tried your other suggestion of reinstallation (and updating). Low and behold,
the problem is cured. Thanks for the suggestion - I got so stuck in trying the
diagnose the nature of the problem, I didn't even think of checking the
installation.

Must've been that the ISP pulled a mirror from somewhere else and didn't get a
pristine copy. Thanks for the suggestion. Hopefully, I'll never see that
problem again. :-)