You might want to try something like:

declare @astring varchar(20), @loop int, @maxlen int, @SearchString varchar(20)

set @astring = 'crap1'

set @maxlen = len(@astring)

set @loop = 1

while @loop <= @maxlen

begin

     select @SearchStrign =...