删除字符串中非字符

CREATE FUNCTION Del_Char(@s varchar(100))
RETURNS VARCHAR(100)
BEGIN 
  while patindex('%[^0-9]%',@s)>0
    begin
        SELECT  @s=stuff(@s,patindex('%[^0-9]%',@s),1,'')
    end  
   RETURN @s
END