IsNumeric - Skal kunne finde et tal og ikke - + . ect.....

Min teksstreng indeholder et tal og det tjekker jeg for.
F.eks
?code=112

MEN står der f.eks
?code=12- eller ?code=-12
?code=12. eller ?code=.12

Så bliver strengen godkendt, det skal den ikke. Jeg vil kun have et \"rent\" tal

Hvad gør jeg forkert??

_______________________________________________________

intCode1 = mid(Request(\"code\"),1,3)

    If IsNumeric(intCode1) Then
        Response.Write intCode1
    Else
        Response.Write \"er ikke et tal\"
    End If

/def