Hola
Prueba con esto
Código asp:
Ver originalFunction solonumeros(cadena)
Dim objRegExp
Set objRegExp= New RegExp
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "([^0-9])"
cadena = objRegExp.Replace(cadena, "")
Set objRegExp = Nothing
solonumero = cadena
End Function
Suerte
Cita:
Iniciado por moncherote 
Es algo trival??
.....
trival? Espero que no
