获取Sql数据库字段的默认值，并去掉括号(N'')和单引号

前几天在写一个存储过程的时候，需要提取表中一个字段的默认值进行操作，在查询了多个资料(网上找的)以后，写了以下的一个函数：

CREATE function GetVarcharFieldDefaultValue(
 @tableName varchar(256),
 @FieldName varchar(256)
)returns varchar(1000)
as
begin
 declare @defaultStr varchar(1000)
 select   @defaultStr=m.text   from   syscolumns   c   join   syscomments   m   on   c.cdefault=m.id  
   where   c.id=object_id(@tableName)   and   c.name=@FieldName
 --获得第二个单引号所在位置
 --CHARINDEX('''',@aa,4)-4
 set @defaultStr=substring(@defaultStr,4,CHARINDEX('''',@defaultStr,4)-4)
 return @defaultStr
end

 --调用该函数的方法--两个参数分别为表名和字段名，此处返回值为字符串，也可以根据自己需要，转换为其他的返回类型，例如整型；
declare @aa varchar(1000)
 select @aa=dbo.GetVarcharFieldDefaultValue('Users','Theme')
print @aa