New To Reports

[apete8zz]

I have a .dbf spreadsheet and some photos and maps. Listed in the spreadsheet are 76 or so stations. each stations has a different photo and map. I want to be able to have one page in my report devoted to each station. On the report page would be a photo, a map, and all the important fields in the .dbf.

Station Name:
Location:
Address:
Elevation A:
Elevation B:
etc.

Photo and Map.

Can someone point me in the right direction to accomplish this task?

 

[Rickster57]

report

In design view of your report under Sorting and Grouping set the grouping to Station Name with header and footer set to yes. I'm assuming each station has a unique name? Then place the other fields in the detail Section of your report.

 

[apete8zz]

even with the the dbf sorted the image that i insert still appears the same. . .

 

[Rickster57]

photo

How is each photo and map assigned? By Station?

In other words if the station is 001 is the photo stored on the PC as 001photo.jpg? 001map.jpg?

 

[apete8zz]

photo

Yes. each station has a photo and map that are stored as the stations name.

 

[apete8zz]

OWNER ID LOCATION ADDRESS UNITID
JCSA LS 1-1 Jamestwon 1607 1861 Jamestown Road LS11

There is an example of some of the information. i have a photo called LS11.jpg and a map LS11.pdf or it can be a map LS11.jpg which ever works.

 

[Rickster57]

pics

If Dir(MyDirectory & [station] & ".jpg") <> "" Then
imgFileLink.Picture = MyDirectory & [Station] & ".jpg"
imgFileLink.Visible = True
End If

If you drop an image field into your detail section of the report put the above code in the On Print section.

Hope this helps

 

[apete8zz]

the program says that there is an "Extra (" in the query. Moreover, is there a specfic place i should put all of the images.

andrew

 

[Rickster57]

pics

Mydirectory is where your pictures are stored. For instance "C:\My Document\MyPics\"

Then in The On Print of your detail section of the report it would assign the image in your report the picture stored as "C:\My Documents\MyPics\LS11.jpg" where LS11 is your station field in your detail section.

 

[apete8zz]

Microsoft Office Access

Extra ) in query expression '['Image = If Dir(My Directory & [UNITID] & "].[jpg") <> "" Then imgFileLink].[Picture =My Directory & [UNITID] & '].[jpg" imgFileLink].[Visible = True End If]'.

I know that is not the exact query you gave me, but i had to substitute station with UNITID. the other changes i did not make.

thank you for helping!

 

[apete8zz]

If Dir(S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS & [UNITID] & ".jpg") <> "" Then imgFileLink.Image = S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS & [UNITID] & ".jpg" imgFileLink.Visible = True End If

 

[apete8zz]

I think i fixed the Extra ( error now it tells me that there is a "Syntax error (missing operator) in query expression '[If Dir(S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS & [UNITID] & "].[jpg" <> "" Then imgFileLink].[Image = S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS & [UNITID] & "].[jpg" imgFileLink].[Visible = True End If]'

 

[Rickster57]

Query?

Why are you putting this in a query?

 

[apete8zz]

I don't mean to be if i am. I'm place this "If Dir(S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS & [UNITID] & ".jpg" <> "" Then imgFileLink.Image = S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS & [UNITID] & ".jpg" imgFileLink.Visible = True End If" in the box next to the word Image in Design View. I thought that was the On Print Section.

 

[Rickster57]

pics

Assuming the image file you inserted into your report is called imgfilelink ...

see attachment

 

[apete8zz]

thus because my images name is LS11. the code is

If Dir("S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS\" & [UNITID] & ".jpg" <> "" Then
LS11.Image = "S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS\" & [UNITID] & ".jpg"
LS11.Visible = True
end if

 

[apete8zz]

with that the program still says that i am missing an operator.

 

[Rickster57]

reports

If Dir("S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS\" & me.unitid & ".jpg" <> "" Then
Me.LS11.Image = "S:\Jobs\9322\36-JCSA Pump Station Survey\Shapefiles\ArcGIS\" & me.unitid & ".jpg"
Me.LS11Visible = True
end if


Try this.......

 

[apete8zz]

here's a new one

when i entered that and i tried to view the report in layout view a box came up saying "enter parameter value" with a large blank to fill in.

 

[Rickster57]

report

Forgot the dot..

Me.LS11.Visible = True

I'm signing off now but if you are still having issues let me or someone else here know.

Rick