After Parenthesis in ASP Variables - Query

[ll]

Hi,
I'm wondering about variable declaration in ASP - is there a good
resource for this? In naming variables, is there a way to include
characters in a variable name after the parenthesis/variable in a
loop? I have quite a few variables (e.g. strOut1_a, strOut2_a, etc)
and thought a loop would be the best way to do this, but I am getting
errors for the characters after the parenthesis. My code is below.
Thanks for any help or resources.
Louis

-----------------------------------------
for a=1 to 3
strOut(a)_a=obj Comm("Out"&a&"_ a")
response.write( "Out"&a&"_a ")
next

[Anthony Jones]

"ll" <ba**********@y ahoo.comwrote in message
news:c6******** *************** ***********@k30 g2000hse.google groups.com...

On Jun 1, 12:40 am, Old Pedant <OldPed...@disc ussions.microso ft.com>
wrote:

One more (hopefully quick) question... within the loops as shown in
my code, does each variable created (e.g. strOutP1, strOutP2, etc)
retain its value, or is an array needed for this?

Ummm...."loops" ??? You only show ONE loop there.

And you don't show *ANY* variables name strOutP1 or strOutP2 or anything
similar to that.

What in the heck are you talking about??? Maybe code you didn't show

us?

>
Sorry for the confusion - allow me to just start from the beginning,
which might be easier. I have a set of variables
(strOut1_a....t o...strOut15_a) .
I'm looking for a way to loop through these variable names to
establish their values, such as:

strOut1_a = objComm("Out1_a ")

but with a loop, rather than writing out each.

That can't be done, you need an array. I know thats already been said but
things in this thread seemed to have got over complicated for some reason.

Dim strOut_a(4)

' Stuff to assign values to the array elements
For i = 0 To UBound(strOut_a )
Response.Write strOut_a(i) & "<br />"
Next


--
Anthony Jones - MVP ASP/ASP.NET

[=?Utf-8?B?T2xkIFBlZGFudA==?=]

Sorry for the confusion - allow me to just start from the beginning,

which might be easier. I have a set of variables
(strOut1_a....t o...strOut15_a) .
I'm looking for a way to loop through these variable names to
establish their values, such as:

strOut1_a = objComm("Out1_a ")

No, you do *NOT* want to do that. As a couple of people pointed out.

You WANT TO USE AN ARRAY.

Dim strOut_a(15)
For i = 1 To 15
strOut_a(i) = objComm("Out" & i & "_a")
Next

And then, where your *OTHER* code *WAS* using
strOut7_a
or whatever, you simply use
strOut_a(7)

What is wrong with that solution??

Now, there *IS* a way to do what you claimed to want. But it is slow slow
slow and clumsy and is not good programming practice and...well, the list
goes on. But if we truly can't convince you to use an array--perhaps because
some other component is expecting the indivdual names? if so, would you
really want to use that component?--then:

For i = 1 To 15
Execute "strOut" & i & "_a = objComm(""Out" & i & "_a"")"
Next

Untested, but I think that's right.

Ugly and slow code, though. Try hard to avoid it.

[=?Utf-8?B?T2xkIFBlZGFudA==?=]

As I noted:

<%
For i = 1 To 15
Execute "strOut" & i & "_a = objComm(""Out" & i & "_a"")"
Next
%>

Or use ExecuteGlobal, of course.

As I said, a crappy idea, but it does work.