用友服务器登录显示未设置变量,用友软件报错,运行时错误 '91'-未设置对象变量或 With block 变量...

卡片管理查询中的数据为空卡片管理查询中的数据为空

问题现象：850sp固定资产，问题如下： 打开卡片管理，按部门查询，发现卡片列表上下列卡片编号为：00733、01180、02071、05758、07360的数据为空，点击此卡片，卡片上的各个数据都是正常存在，请解决！！

问题版本：8.50sp

问题模块：固定资产

问题原因：此问题是由于在fa_cards表内这几条记录都存在非法字符。

解决方案：请执行下面脚本修复即可： --- SET NOCOUNT ON DECLARE @TblName VARCHAR(100) DECLARE @UpdateString NVARCHAR(1000) DECLARE @SelectString NVARCHAR(1000) DECLARE @COlName VARCHAR(100) DECLARE @COUNT INT SET @TblName = 'fa_cards'--指定想要修改的表名 --定义游标取出指定表内的数据类型是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,[email protected] 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,[email protected] 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,[email protected] 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,[email protected] INT OUTPUT',@COUNT OUTPUT END PRINT 'column: ' + @ColName + '－－－ok' FETCH NEXT FROM cur_ColName INTO @ColName END --关闭、释放游标 LABCLOSE: CLOSE cur_ColName DEALLOCATE cur_ColName