I'm trying to program something in ASP to isolate a date using a "Select Case" in ASP/VBScript

What I'm trying to do is pull a record from a database (lnID) based on the date.

Right now this is the code I'm using

Dim lnDay, lnNotifyDay
lnDay = day(now)


If lnDay <= 20 Then
lnID = lnDay + 2
lnNotifyDay = lnDay + 2
Else
lnID = (lnDay - 22) + 2
lnNotifyDay = lnDay + 2
End If

I really want to use a "Select Case" but if I try this....

Select Case lnDay
Case < 20
lnID = lnDay
lnNotifyDay = lnDay + 2
End Select

I get an error on the "< 20"

It seems as if the Select Case hates numbers. Is this true? Obviously I'm going to add more Case statements but this is driving me nuts!

I think you'd want to use syntax like Case Is < 20, or a between operator.

Here's what Microsoft has to say on the matter: http://msdn2.microsoft.com/en-us/library/cy37t14y.aspx

the Case statement in VBScript is limited to equalities in its use

There is no "less than" or "greater than" only "equal to"

You can check for equality to multiple values by using a comma delimited list

Case 20,21,22,23, ...

then use Case else to catch anything outside that list

Thanks to both of you. I'll try this tonight.

DonnaZ

If you want to use <=, use If. I personally prefer it to Case because it's much more flexible and because I think the Select Case syntax looks weird.

Something like if number <= 20 then ... elseif number <= 30 then ... else ... end if.