ASP

本类阅读TOP10

·asp常用数据库连接方法和技巧
·无组件生成BMP验证码
·一些常用的辅助代码 (网络收藏)
·JavaScript实现的数据表格:冻结列、调整列宽和客户端排序
·VisualStudio.NET_2003及其 MSDN 下载地址
·ASP模拟MVC模式编程
·图片以二进制流输出到网页
·MD5加密算法 ASP版
·ASP.NET编程中的十大技巧
·改进 ASP 的字符串处理性能

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
奇特的用法:把列名取到一个字符串中

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

if exists(select * from sysobjects where  type='P' and name='sys_ysl_getColumnNameToArrayByTableName' )
drop procedure sys_ysl_getColumnNameToArrayByTableName
go
create procedure sys_ysl_getColumnNameToArrayByTableName
 @tablename varchar(100),
 @colnameArrayList varchar(1000) output

With
 Encryption
as
   declare @sql nvarchar(1000)
   declare @colnameArray varchar(1000)
   declare @colname varchar(50)
   SET @sql =N'DECLARE CUR_COLNAME CURSOR FOR select a.name from syscolumns a  inner join sysobjects b on a.id=b.id where b.name='''+@tablename+N'''  order by a.colorder '

   execute sp_executesql @sql

   OPEN CUR_COLNAME  
   WHILE (0=0)
   BEGIN
    FETCH NEXT FROM CUR_COLNAME
           INTO @colname

    If (@@fetch_status<>0) break

    IF @colnameArray<>''
       set @colnameArray=@colnameArray+','+@colname
    Else
       set @colnameArray=@colname
   
   END

   Close CUR_COLNAME
   DEALLOCATE CUR_COLNAME
  
   set @colnameArrayList=@colnameArray


   /*
   print @colnameArrayList  -- 供测试使用
  
   --测试代码
 DECLARE @@AA VARCHAR(100)
        exec sys_ysl_getColumnNameToArrayByTableName 'SPBLA',@@AA
   --结束

   sp_helptext sys_ysl_getColumnNameToArrayByTableName   --查看过程文本
   */




相关文章

相关软件