Set DataReport1.Sections("Section1").Controls("Image1").Picture = LoadPicture(App.Path & "\pic\" & rsStampDetail.Fields("邮票编号") & ".jpg")应该是这句的问题?
但我不知该怎样实现?sorry

解决方案 »

  1.   

    你单步看看你每一次取出的rsStampDetail.Fields("邮票编号") 值是什么
      

  2.   

    除非你将图片嵌入数据库,否则你不能用报表处理。(因为它既非记录,也非分类汇总。当然不能一一显示每张图片。)
        你的程序所做的只是:反复地给一个IMAGE对象装入图片。就好象反复地改变一个LABEL控件显示的内容一样,当然,你看到的只能是最后一次的内容了!
       还有一种办法,就是:使用VBA,将需要打印的内容写到EXCEL上,再进行打印!
      

  3.   

    单不调试查看,可看到每步取出的rsStampDetail.Fields("邮票编号")就是每张不同邮票的编号,即记录集中的数据。这点没有问题。
    我只是不知道怎样为每条记录指定一幅图。从以上代码可知,用了
    Set DataReport1.Sections("Section1").Controls("Image1").Picture = LoadPicture(App.Path & "\pic\" & rsStampDetail.Fields("邮票编号") & ".jpg")之后,data report的图像控件依次指定为临时图像文件,但是每指定一幅新图像,就将前面设定的值冲掉了。直到停在最后一条记录上。我想实现每指定一张图像就生成一页,指定下一张图就生成下页,各页合起来作为一份表报,有不同的页码,不知怎样实现。
      

  4.   

    to BILL9(bill9)
    能给我用EXCEL实现的代码例子吗?急!!
      

  5.   

    欢迎你去www.myvc.net编程技术论坛  
    你可以在那里交流编程技术  
    注册用户请去以下帖子领分  
    http://www.csdn.net/expert/topic/682/682036.xml?temp=.5972101  
    http://www.csdn.net/expert/topic/681/681917.xml?temp=.5434992  
    http://www.csdn.net/expert/topic/676/676074.xml?temp=.9520075  
    http://www.csdn.net/expert/topic/641/641938.xml?temp=5.826968E-02
      

  6.   

    按BILL9(bill9)地提示,昨晚第一次尝试用EXCEL对象库编程,现已能够打印单页的报表。由于对EXCEL不熟悉,还不知道怎样将包含多条记录的记录集内容打印出来。大家给点提示好吗?
      

  7.   

    谢谢各位回答我的问题,虽然问题没有得到正面解决,不过我已通过EXCEL解决了报表问题。