字符提取问题？

Question

create function x (@s varchar(8000))
returns varchar(8000)
as
begin
declare 
@sql varchar(8000)
set @sql=''
while (len(@s)>1)
begin
if ascii(left(@s,1))>=48 and ascii(left(@s,1))<=57
set @sql=@sql+left(@s,1)
set @s=right(@s,len(@s)-1)
end
if ascii(left(@s,1))>=48 and ascii(left(@s,1))<=57
set @sql=@sql+@s
return @sql
endprint dbo.x('5#')
print dbo.x('15#')
print dbo.x('@87#')
print dbo.x('@1@389@5#')

Answer 1

create function x (@s varchar(8000))
returns varchar(8000)
as
begin
declare @sql varchar(8000)
declare @I int
set @sql=''
set @I=1
while (@I<=len(@s))
begin
  if  ISNUMERIC(SUBSTRING(@s,@I,1))=1
  set @sql=@sql+SUBSTRING(@s,@I,1)
  set @I=@I+1
end
return @sql
end print dbo.x('#5#')
print dbo.x('15#')
print dbo.x('@87#')
print dbo.x('@1@389@5#')