SQL code --================================================ --绕圈的SQL算法（感觉很笨，不知道有没有更好的算法） --作者：冷箫轻笛 --日期：2008-02-21 --执行方式（参数必须为整数的平方，但大小并不是无限制的） --exec raoquan 2500 --================================================ create proc raoquan ( @num int ) as begin set nocount on declare @i int set @i = SQRT(@num) if CEILING(@i) @i return declare @table varchar(8000) declare @insert varchar(8000) declare @update varchar(8000) declare @print varchar(8000) select @insert = '',@update = '',@print = '' select @table = ' create table #t (' declare @k int select @k = 1 while (@k 0) begin if @s3 % 2 = 0 select @len = @len - 1 select @len2 = @len while(@len2 > 0) begin if @s1 = ''+'' begin if @s2 = ''c'' select @c = @c + 1 else select @r = @r + 1 end else begin if @s2 = ''c'' select @c = @c - 1 else select @r = @r - 1 end declare @sql varchar(8000) select @sql = ''update #t set ['' + cast(@c as varchar) + ''] = '' + cast(@i as varchar) + '' where [1] = '' + cast(@r as varchar) exec (@sql) select @len2 = @len2 - 1 select @i = @i + 1 end if @s3/2 % 2 = 1 select @s1 = ''+'' else select @s1 = ''-'' if @s2 = ''c'' select @s2 = ''r'' else select @s2 = ''c'' select @s3 = @s3 + 1 end --select * from #t ' select @print = ' declare @string varchar(8000) select @string = '''' declare @conn varchar(1000) select @conn ='''' declare @ii int select @ii = sqrt('+ cast(@num as varchar) + ') declare @m int select @m = 1 declare @n int select @n = 1 while (@ii >= @n) begin select @string = ''declare @conn varchar(1000) select @conn ='' select @m = 1 while (@ii >= @m) begin select @string = @string + '' right( SPACE(len(cast('+cast(@num as varchar)+' as varchar))) + cast(['' + cast(@m as varchar) + ''] as varchar), len(cast('+cast(@num as varchar)+' as varchar)) + 1) +'' select @m = @m + 1 end select @string = reverse(stuff(reverse(@string),1,1,'''')) select @string = @string + '' from #t where [1] = '' + cast(@n as varchar) + '' print @conn'' exec(@string) select @n = @n + 1 end ' exec (@table + @insert + @update + @print) end