ASC Function i ASP

Microsoft VBScript runtime error '800a0005'

Invalid procedure call or argument: 'Asc'

hvad gør scriptet??

det tjekker om et nummer et et mobil nummer.

det skal være tal
det skal være over 8 ciffer
og om det er fastnet nummer

Jeg har rettet to fejl i funktionen:

Function FilterNumber(myNum)
    FilterNumber = True
    If Not IsNumeric(cstr(myNum)) Then ' IsNumeric melder true for blanke - derfor cstr
      FilterNumber = False
    End If
    If Len(myNum) <> 8 Then
      FilterNumber = False
    else ' Acs må ikke anvendes med blanke
      If Asc(Mid(myNum, 1, 1)) < 50 Or Asc(Mid(myNum, 1, 1)) > 54 Then
        FilterNumber = False
      End If
    End If
End Function