set dim to zero 1

[schase]

Hi all,

I have a repeating table, that has repeating rows inside. With the rows inside i have the following.

<% Dim strOne, strtwo
strOne = (strOne + (rs.Fields.item(&quot;expr1001&quot.Value))
strtwo = (strtwo + (rs.Fields.item(&quot;expr1000&quot.Value))
%>

Which adds the rows as they go by really good. But at the end of that individual's table, when it's time to go onto the next I need to set the Dim's to zero.

setting them to nothing returns some really nice errors.

Any ideas?

Thank you &quot;Damn the torpedoes, full speed ahead!&quot;

-Adm. James Farragut

Stuart

 

[FateFirst]

ReDim them. - FateFirst

 

[schase]

hey Fate,

I tried that, I must have had the string wrong

when I do

<%
Redim strOne(0)
Redim strTwo(0)
%>

It then gives me a
Microsoft VBScript runtime error '800a000d'
Type mismatch

on the line where I have the

<% Dim strOne, strtwo
strOne = (strOne + (rs.Fields.item(&quot;expr1001&quot.Value))
strtwo = (strtwo + (rs.Fields.item(&quot;expr1000&quot.Value))
%>
&quot;Damn the torpedoes, full speed ahead!&quot;

-Adm. James Farragut

Stuart

 

[GabeC]

Your trying to ReDim on an object that is not an array.

strOne = 0
strTwo = 0

That should do the trick.

Thanks,

Gabe

 

[schase]

wow thought I had tried that - but must have done everything but!

worked great - thanks Gabe &quot;Damn the torpedoes, full speed ahead!&quot;

-Adm. James Farragut

Stuart