[MBennett]

I have vbscript program that uses a select case statement to redirect users based on their zip code.

All other zip codes not specifically listed in the case statement are directed to the same place using "case else". Now I am trying to break down the "all others" into three categories based only on the first two digits of the zip code entered.

All other zip codes are matched by all numbers and now I need to match just the first two numbers.

This of course needs to happen after the original cases have been ruled out.


I have been trying to use:
"case Instr(04)"
but this doesn't work as the user is directed to "page not found"

Thanks in advance for any tips or advice!!!

[C.Ingram]

try something like:

select case Zip
...
    case else:
        Dim String FirstTwo
        FirstTwo = Left(CStr(Zip), 2)
        select case FirstTwo
            case "04": 'Code...
            case "05": 'Code...
        end select
end select

[MBennett]

I have since figured out a way to get it to work.. It might be a little "messy" but this is what I have done:

case else
if sZipCode > 02999 then
'Code
end if

if sZipCode > 03999 then
'Code
end if

if sZipCode > 04999 then
'Code
end if
end select

Like it said, it might be considered a bit 'crude' and unconventional but it does the trick.

I appreciate your opinions. Let me know what you think of this idea or the possible benefite of changing it...

THANKS!!

[C.Ingram]

Just make sure your code logic is solid. If the zip code is 50000 it will trigger all 3 If blocks.