CREATE PROCEDURE test (@ontime char(10) )
AS
begin
declare @afdname char(11)
declare @itemid char(11)
declare @djgtype char(1)
select itemid,djgtype from tem_zzjgarc
open tem_zzjgarc_cur
fetch next from tem_zzjgarc_cur into @itemid,@djgtype
while (@@fetch_status=0)
begin
set @afdname=substring(@ontime,1,2)
if @afdname='0'
begin
set @afdname='h24'
end else
begin
set @afdname='h'+@afdname
end
update todayshd set @afdname=@afdname+100 where itemid=@itemid and djgtype=@djgtype
if @@Rowcount<1 /*如果不存在则增加*/
begin
insert into todayshd (itemid,djgtype,@afdname) values (@itemid,@djgtype,1000)
/*因为要插入的一个字段名是动态,不能用变量做字段名用吗?@afdname*/
end
fetch next from tem_zzjgarc_cur into @itemid,@djgtype
end
close tem_zzjgarc_cur
deallocate tem_zzjgarc_cur
end
AS
begin
declare @afdname char(11)
declare @itemid char(11)
declare @djgtype char(1)
select itemid,djgtype from tem_zzjgarc
open tem_zzjgarc_cur
fetch next from tem_zzjgarc_cur into @itemid,@djgtype
while (@@fetch_status=0)
begin
set @afdname=substring(@ontime,1,2)
if @afdname='0'
begin
set @afdname='h24'
end else
begin
set @afdname='h'+@afdname
end
update todayshd set @afdname=@afdname+100 where itemid=@itemid and djgtype=@djgtype
if @@Rowcount<1 /*如果不存在则增加*/
begin
insert into todayshd (itemid,djgtype,@afdname) values (@itemid,@djgtype,1000)
/*因为要插入的一个字段名是动态,不能用变量做字段名用吗?@afdname*/
end
fetch next from tem_zzjgarc_cur into @itemid,@djgtype
end
close tem_zzjgarc_cur
deallocate tem_zzjgarc_cur
end
解决方案 »
- 【delphi xe】错误提示:....bitmap image is not valid
- 使用idsmtp组件进行邮件发送遇的问题?大侠帮看看吧
- 用fastreport如何把两个dbgrid中的内容打印到同一个页面上?
- 简单问题,关于cxGrid
- DBGRID导出EXCLE后,怎样保持原来的数据格式和自动调整列宽?
- chart线型图的小问题
- 100分求助,FastReport问题。
- 用SPCOMM通讯,但11和13收不到怎么办,我需要0到255之间的所有数
- DELPHI中对文件操作用什么类?PASCAL中好像不能对文件进行定位,记取文件指定位置的数据。
- 求助delphi小程序,大侠支招
- 请教:在Delphi中调用OLE创建Excel表后,对Excel表的几个操作?
- 我用DELPHI实现SQL<->EXCEL 的数据导入或导出,用ProgressBar怎么样才能实现进度?
AS
begin
declare @sqlstr varchar(4000) --加这里!!!
declare @afdname char(11)
declare @itemid char(11)
declare @djgtype char(1)
select itemid,djgtype from tem_zzjgarc
open tem_zzjgarc_cur
fetch next from tem_zzjgarc_cur into @itemid,@djgtype
while (@@fetch_status=0)
begin
set @afdname=substring(@ontime,1,2)
if @afdname='0'
begin
set @afdname='h24'
end else
begin
set @afdname='h'+@afdname
end
update todayshd set @afdname=@afdname+100 where itemid=@itemid and djgtype=@djgtype
if @@Rowcount<1 /*如果不存在则增加*/
begin
Set @sqlstr = 'insert into todayshd (itemid,djgtype,' + @afdname +') values ('@itemid,@djgtype,1000)'--改这里,可能还要改改,把变量值替换进去,希望你自己会:)
exec(@sqlstr)--改这里!!!!!!!
end
fetch next from tem_zzjgarc_cur into @itemid,@djgtype
end
close tem_zzjgarc_cur
deallocate tem_zzjgarc_cur
end
===============================================================
◆◆◆ CSDN查询助手,查询方便快捷 ◆◆◆ 下载地址:
http://CoolSlob.ifood1.com/Download/CSDNFinder.exe
http://CoolSlob.8u8.com/Download/Tools/CSDNFinder.Slob[更名为.exe即可]