关于select case 的用法。。。怪摘。

[yangxuhua]

我想算出不同价格范围内，打折后的价格。。

dim totalcash1
dim totalcash
totalcash=totalcash+(rs("basket_count")*rs("price"))

case totalcash
case totalcash<10000 '打折9
totalcash1=totalcash*0.9

case totalcash>10000 and totalcash<30000
totalcash1=totalcash*0.8

case totalcash>30000
totalcash1=totalcash*0.7

end select
response.Write(totalcash1)

结果这样写得不到totalcash1 的值。。。。

请高手指点一，二。。。

[ATHENA112]

dim totalcash1
dim totalcash
totalcash=clng(totalcash)+(clng(rs("basket_count"))*clng(rs("price")))

Select case totalcash
case totalcash<10000 '打折9
totalcash1=totalcash*0.9

case totalcash>10000 and totalcash<30000
totalcash1=totalcash*0.8

case totalcash>30000
totalcash1=totalcash*0.7

end select
response.Write(totalcash1)

[竹林听雨2005]

楼上正解，就是这种方法，