如何遍历某个数据库中所有有记录的表?

declare @row varchar(30)
declare @tbname varchar(30)
DECLARE string_find_cursor CURSOR FAST_FORWARD FOR
SELECT [name]
FROM sysobjects where type='U' and name like 'A%'
ORDER BY [name]

OPEN string_find_cursor

FETCH NEXT FROM string_find_cursor
INTO @tbname

WHILE @@FETCH_STATUS = 0
BEGIN
--select @row=count(*) from @tbname
select @row=rows from sysindexes where id = object_id(cast(@tbname as varchar(30))) and indid in (0,1)
if(cast(@row as int))>0
print @tbname+' '+@row+' '+'select * from '+@tbname
FETCH NEXT FROM string_find_cursor
INTO @tbname
END

CLOSE string_find_cursor
DEALLOCATE string_find_cursor