CREATE procedure InfoSearch @wave varchar(2),@time1 varchar(22),@time2 varchar(22) asdeclare @salemainid varchar(13)
declare @goodslist varchar(250)
declare @temp1 varchar(100),@temp2 varchar(100),@temp3 varchar(100),@temp4 varchar(100),
@temp5 varchar(100),@temp6 varchar(100),@temp7 varchar(100),@temp8 varchar(100),
@temp9 varchar(100),@temp10 varchar(100),@temp11 varchar(100),@temp12 varchar(100),
@temp13 varchar(100),@temp14 varchar(100),@temp15 varchar(100),@temp16 varchar(100)create table #tempa(salemainid varchar(13),goodslist varchar(250),temp1 varchar(100),
temp2 varchar(100),temp3 varchar(100),temp4 varchar(100),
temp5 varchar(100),temp6 varchar(100),temp7 varchar(100),
temp8 varchar(100),temp9 varchar(100),temp10 varchar(100),
temp11 varchar(100),temp12 varchar(100),temp13 varchar(100),
temp14 varchar(100),temp15 varchar(100),temp16 varchar(100))
set @goodslist=''
declare cursor1 cursor for
(select * from vsendmain where rtrim(wave)=rtrim(@wave) and sendday between @time1 and @time2 and (right(rtrim(sendstate),1)='0' or right(rtrim(sendstate),1)='3'))
open cursor1
fetch next from cursor1 into @salemainid,@temp1,@temp2,@temp3,@temp4,@temp5,@temp6,@temp7,@temp8,@temp9,@temp10,@temp11,@temp12,@temp13,@temp14,@temp15,@temp16
while @@fetch_status=0
begin
select @goodslist=@goodslist+goods+'('+convert(varchar(10),nowcount)+shave2+')(¥'+convert(varchar(20),realprice)+') '
from vsend where rtrim(salemainid)=rtrim(@salemainid)
insert into #tempa select salemainid,@goodslist,@temp1,@temp2,@temp3,@temp4,
@temp5,@temp6,@temp7,@temp8,@temp9,@temp10,@temp11,@temp12,@temp13,@temp14,@temp15,@temp16
set @goodslist=''
fetch next from cursor1 into @salemainid,@temp1,@temp2,@temp3,@temp4,@temp5,@temp6,@temp7,@temp8,@temp9,@temp10,@temp11,@temp12,@temp13,@temp14,@temp15,@temp16
end
close cursor1
deallocate cursor1select * from #tempa
有点乱,麻烦大家了!!!解决了给高分
declare @goodslist varchar(250)
declare @temp1 varchar(100),@temp2 varchar(100),@temp3 varchar(100),@temp4 varchar(100),
@temp5 varchar(100),@temp6 varchar(100),@temp7 varchar(100),@temp8 varchar(100),
@temp9 varchar(100),@temp10 varchar(100),@temp11 varchar(100),@temp12 varchar(100),
@temp13 varchar(100),@temp14 varchar(100),@temp15 varchar(100),@temp16 varchar(100)create table #tempa(salemainid varchar(13),goodslist varchar(250),temp1 varchar(100),
temp2 varchar(100),temp3 varchar(100),temp4 varchar(100),
temp5 varchar(100),temp6 varchar(100),temp7 varchar(100),
temp8 varchar(100),temp9 varchar(100),temp10 varchar(100),
temp11 varchar(100),temp12 varchar(100),temp13 varchar(100),
temp14 varchar(100),temp15 varchar(100),temp16 varchar(100))
set @goodslist=''
declare cursor1 cursor for
(select * from vsendmain where rtrim(wave)=rtrim(@wave) and sendday between @time1 and @time2 and (right(rtrim(sendstate),1)='0' or right(rtrim(sendstate),1)='3'))
open cursor1
fetch next from cursor1 into @salemainid,@temp1,@temp2,@temp3,@temp4,@temp5,@temp6,@temp7,@temp8,@temp9,@temp10,@temp11,@temp12,@temp13,@temp14,@temp15,@temp16
while @@fetch_status=0
begin
select @goodslist=@goodslist+goods+'('+convert(varchar(10),nowcount)+shave2+')(¥'+convert(varchar(20),realprice)+') '
from vsend where rtrim(salemainid)=rtrim(@salemainid)
insert into #tempa select salemainid,@goodslist,@temp1,@temp2,@temp3,@temp4,
@temp5,@temp6,@temp7,@temp8,@temp9,@temp10,@temp11,@temp12,@temp13,@temp14,@temp15,@temp16
set @goodslist=''
fetch next from cursor1 into @salemainid,@temp1,@temp2,@temp3,@temp4,@temp5,@temp6,@temp7,@temp8,@temp9,@temp10,@temp11,@temp12,@temp13,@temp14,@temp15,@temp16
end
close cursor1
deallocate cursor1select * from #tempa
有点乱,麻烦大家了!!!解决了给高分
解决方案 »
- 求高手解决,dbgird中上下行互换后的问题,无法定位行(在线等)
- ftp小问题。
- 大家帮忙!为什么我的程序运行一段时间后会占用很多资源,以至程序死掉了~
- 无法正常运行程序,请教高手!~
- dbgrid排序问题?
- 关于一个如何加入图片的问题?
- 防止修改目录名称
- 有关访问远程局域网服务器问题(用RemObjects做中间件)
- 祝CSDN改版成功!大家新年快乐!放分!
- 一个很不容乐观的现象:看看18号未解决问题数目和已解决的问题数目,就会知道,请大家注意,该给分的给分,不要偷懒,否则打消专家积极性
- 一个TWebBrowser的问题,怎么控制TWebBrowser翻页?
- 有没有谁知道什么地方有《悟透Delphi》的全部书搞?
deallocate cursor1应该是执行这个的结果
select * from #tempa不应该写在存储过程里,而应该写在你的程序调用里
with adostoredproc do
begin
close;
parameters[1].value := xxx ;
......
Open;
end;
发生错误,提示是“得不到返回的数据集”