301 Redirect

Additional question to this issue...
While the given code works perfectly (thanks Greg!), I'm wondering if the following would be an option.

Say I have 5 categories: 120/121/122/123/124
I could write the code for each single line, but could it be made more simple by doing something like:
If idCategory >119 AND idCategory < 125 Then
.... [action to be taken] .....

I know I prob. have to convert the string to a number, but not sure on these things.
Somehow I have a feeling this should be simple to do?

It sure would save a lot of coding!

------ EDIT ------
Found the solution

Dim idCategory
idCategory = Cint(getUserInput(Request("idCategory"),5))
if idCategory>119 AND idCategory<125 then
.... [action to be taken] .....


Edited by worldofrugs - 19-August-2010 at 2:58pm

Isn't the native ProductCart variable pIdCategory category already sanitized?

*edit*

Not to confuse anyone... Greg's solution is completely secure and I'm sure the processor overhead for such a simple calculation is minimal. However, it seems a bit redundant to have two variables holding the same number.

Edited by Brett - 03-June-2010 at 2:18pm

That's what I had in mind.  You DO NOT want to wake up one day and receive reports that the store has been attacked.  Concientious use of proper protection methods is absolutely critical.

Thanks for that tip Greg...
However, as I am not a programming guru, I'm not sure how to implement this in my situation.

I have quickly tried:

Dim idCategory idCategory = getUserInput(Request("id"),5) if idCategory="224" then Response.Status="301 Moved Permanently" Response.AddHeader "Location", "/shop/pc/TheOtherPage.asp" Response.End() end if

but this does not work. It simply goes to the "msg.asp?message=86" page (not a valid category), not resulting in the redirect I want and not returning the 301 header status.

Did I miss something?

Thanks for that tip Brett!  Will try this out today and when it works (asuming it does), it will keep the coding a little cleaner
Thanks!