Expected Statement - End If

[endoflux]

I'm using an IF statement to check for a valid data type, and redirecting to another page (url stored in a variable) if its invalid. I'm getting an "Expected Statement" error when I use "End If", and I can't figure out why...ideas?

Thanks!

Code:
If vartype(Request.Form("quantity")) <> "2" Then Response.Redirect ReDir3
End If


Error:
Microsoft VBScript compilation error '800a0400'

Expected statement

/test/newsln/new_post_sln.asp, line 41

End If
^

 

[PHV]

If vartype(Request.Form("quantity")) <> "2" Then
Response.Redirect ReDir3
End If


Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[endoflux]

That produces the following:

Code:
If vartype(Request.Form("quantity")) <> "2"
Then Response.Redirect ReDir3
End If

Error:
Microsoft VBScript compilation error '800a03f9'

Expected 'Then'

/test/newsln/new_post_sln.asp, line 40

If vartype(Request.Form("quantity")) <> "2"
-------------------------------------------^

 

[PHV]

Reread carefully my suggestion and compare it to your code ...

 

[endoflux]

By putting it all on 1 line, it worked <scratching head>

If Not isNumeric(Request.Form("quantity")) Then Response.Redirect ReDir3 End If

 

[PHV]

Well, put the cursor inside the If word in your code and press the F1 key.

 

[dilettante]

Get rid of the End If which is totally redundant here.

 

[PHV]

OOps, VBScript, so usually no context sensitive help :~/
Have a look here:

http://msdn2.microsoft.com/en-us/library/5h27x7e9.aspx

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[sparkbyte]

This may be silly. But I had a simular problem with a VBscript.

I don't think you need the end if with it written this way.

If vartype(Request.Form("quantity")) <> "2" Then Response.Redirect ReDir3

but would if done this way.

If vartype(Request.Form("quantity")) <> "2" Then
        Response.Redirect ReDir3
End If

Thanks

John Fuhrman
Titan Global Services

http://www.titangs.com