adandelion

诗词在线 http:/www.chinapoesy.com


诗词在线 |唐诗|宋词|元曲|诗经|离骚|乐府|现代诗歌

博客园 首页 联系 订阅 管理


 

SET NOCOUNT ON
DECLARE @TblName  VARCHAR(100)
DECLARE @UpdateString NVARCHAR(1000)
DECLARE @SelectString NVARCHAR(1000)
DECLARE @COlName VARCHAR(100)
DECLARE @COUNT  INT
SET @TblName = '表名称'--指定想要修改的表名
--
定义游标取出指定表内的数据类型是VARCHAR,char,nVARCHAR的字段名称
DECLARE cur_ColName  CURSOR
FOR
SELECT col.name
FROM syscolumns AS col
inner join sysobjects  AS obj  ON col.ID = obj.ID 
INNER join systypes  AS typ  ON col.xtype = typ.xtype
WHERE obj.xtype ='U'
AND obj.name = @TblName
AND typ.name IN ('VARCHAR','CHAR','NVARCHAR','NCHAR')
FOR READ ONLY
--打开游标
OPEN cur_ColName
FETCH NEXT FROM cur_ColName INTO @ColName
IF @@FETCH_STATUS<>0
BEGIN 
PRINT '没有对应表或字段,'PRINT '请确认当前数据库内有' + @TblName + '表,' PRINT '或该表内有VARCHAR、CHAR、NVARCHAR、NCHAR类型的字段!' GOTO LABCLOSE
END--循环修改
WHILE @@FETCH_STATUS=0
BEGIN 
--拼修改字符串 
--
去掉左边的不可见字符 
SET @SelectString = 'SELECT @COU=COUNT(*)     
FROM 
' + @TblName +'    
WHERE ASCII(LEFT(
' + @ColName +',1))<32
AND 
'+ @ColName + ' IS NOT NULL' 
EXEC sp_executesql @SelectString,N'@COU INT OUTPUT',
@COUNT OUTPUT WHILE @COUNT>0 
BEGIN  
SET @UpdateString =   
' UPDATE ' + @TblName +   
' SET ' + @ColName + '=RIGHT(' + @ColName + ',LEN(' + @ColName + ')-1)    
WHERE ASCII(LEFT(
' + @ColName + ',1))<32    
AND 
' + @ColName + ' IS NOT NULL'  
EXEC sp_executesql @UpdateString  
EXEC sp_executesql @SelectString,N'@COU INT OUTPUT',@COUNT OUTPUT 
END 
--去掉右边的不可见字符 
SET @SelectString = 'SELECT @COU=COUNT(*)     
FROM 
' + @TblName +'    
WHERE ASCII(RIGHT(
' + @ColName +',1))<32    
AND 
'+ @ColName + ' IS NOT NULL' 
EXEC sp_executesql @SelectString,N'@COU INT OUTPUT',
@COUNT OUTPUT WHILE @COUNT>0 
BEGIN  
SET @UpdateString =   ' UPDATE ' + @TblName +   ' SET ' 
+ @ColName + '=LEFT(' + @ColName + ',LEN(' + @ColName + ')-1)    
WHERE ASCII(RIGHT(
' + @ColName + ',1))<32    
AND 
' + @ColName + ' IS NOT NULL'  
EXEC SP_EXECUTESQL @UpdateString  
EXEC sp_executesql @SelectString,N'@COU INT OUTPUT',
@COUNT OUTPUT 
END 
PRINT 'column: ' + @ColName + '---ok' 
FETCH NEXT FROM cur_ColName INTO @ColName
END
--关闭、释放游标
LABCLOSE: CLOSE cur_ColName  
DEALLOCATE cur_ColName
GO
posted on 2007-12-10 21:59  猪头  阅读(1023)  评论(0)    收藏  举报

欢迎访问诗词在线http://www.chinapoesy.com   诗词在线 |唐诗|宋词|元曲|诗经|离骚|乐府|古典诗歌|现代诗歌|古典诗词|现代诗词|诗歌可以陶冶你的情操、丰富你的生活,让你更具内涵。诗词在线打造中国最好的诗词社区!

诗词在线社区

126在线阅读网 历史书籍、文学书籍、小说。。。