printing image from datareport

[demian007cur]

Hi to all,
I am a beginner at programming and is trying to learn myself on the way. I was trying the print a data report i created from my DataEnvironment. My only problem is that i have i image in on my datareport. whatever i do it will not load that image on the datareport.
So my question is:
How to load an image on to your datareport?

Kind regards
Demian007cur
Stay alive or die trying

[hawisme000]

ei bro, i suggest u use Crystal Report than the data environment,
atlist Crystal Report 8.5 will be nice , it easy to use and connect, esp on your prob

[cometburn]

try this and let me know if it worked..

Dim RptPic As StdPicture
Dim rptImg As RptImage

'Locate pictures location
Set RptPic = LoadPicture("D:\Jesus Reference\Desktop\vistatrends.jpg")

'img is the RptImg on the datareport
Set rptImg = DataReport1.Sections("Section2").Controls("img")

set rptImg.picture = RptPic

[demian007cur]

try this and let me know if it worked..

hi cometburn
thank you for your reply but it did not work. Maybe because my problem is further up because i made a data environment and then i made the data report from it but i don`t see my report show up. i used a rs_cmd_print from the data environment where i select all my data from the table and then i use the code

datareport1.show (1)

but i don`t see my report

[demian007cur]

ei bro, i suggest u use Crystal Report than the data environment,
atlist Crystal Report 8.5 will be nice , it easy to use and connect, esp on your prob

hi hawisme000
where i can find Crystal Report 8.5 to download i can find it on the net.

[hawisme000]

unfortunately the crystal report provider had an "end of life event"
where they will no more provide with crystal reports

if u still want it, try to search for a p2p file (torrent)
u might be lucky to find 1, or buy crystal report,
(u wont regret using it,)

[cometburn]

You may find crystal reports download here

the code worked on me...

[abhaypathak]

Give "SET" , this way :

Set DataReport1.Sections(1).Controls("image1").Picture = LoadPicture("C:\MyBmp.bmp")

Regards
abhay