I am having trouble getting the counter to increment 5 varibles.
Error: Variable is undefined: 'lcClass'
All varibles (lcClass1,2,3,4; lcAssign1,2,3,4;...etc) are defined
This is the code:

dim i, varstr
for i = 1 to 4
varstr = "lcClass"&cstr(i)
If varstr="lcClass1" and lcClass&(i)="None" Then
Response.write "H2 NO code Selected /H2"
Response.end
Exit For
Else
if lcClass&cstr(i) = "None" Then
If lcAssign&cstr(i)="R" Then
Response.write "First Selection for Reassigment"&"br"
Else
Response.write "First Selection for Promotion"&"br"
End If
Response.write "Class Title:" &"  " &lcClass&cstr(i) &"br"
Response.write "Class Desc:" &"  " &lcTitle&cstr(i) &"br"
Response.write "County:" &"  " &lcCounty&cstr(i) &"br"
Response.write "District:" &"  " &lcDiv&cstr(i) &"br"
End If
End If
Next

Anyone have any ideas, I do appreciate it.
Thanks, Chuck