Printable View
Can any one please tell me whats wrong in this while loop. Whenever I run this code in ASP I get a compilation error '800a0400' where WEND is situated. 'Expected Statement'
I thing I am forgetting something, can anyone inform me what it is? Thanks in advance.
I = 1
SUM = 0
WHILE (I < 11)
AI = "A" & I
IF (RS(AI) = "1") THEN
SUM = SUM + 10
ELSE IF (RS(AI) = "2") THEN
SUM = SUM + 5
ELSE
SUM = SUM + 2.5
END IF
I = I + 1
WEND
hollow_man,
You left out an "End If"
I = 1
SUM = 0
WHILE (I < 11)
AI = "A" & I
IF (RS(AI) = "1") THEN
SUM = SUM + 10
ELSE
IF (RS(AI) = "2") THEN
SUM = SUM + 5
ELSE
SUM = SUM + 2.5
END IF
END IF '<< You left this out
I = I + 1
WEND
Enjoy :)
Simon Templer
Not real sure so could you tell me what kinda laungauge that is?
Black-Mage21
Black-Mage21 ,
The language is VBScript.
Simon Templer :)
vbscript
Quote:
Originally posted here by Black-Mage21
Not real sure so could you tell me what kinda laungauge that is?
Black-Mage21
How could you help if you dont know what language it is?....
Thank you Simon for a great help. Its difficult sometimese to catch small problems such as these.
Thanx again bud.