print current record based on two ID's 1

[Pampers]

Hi everyone,
I want to print the current record (from my form) where the strWhere consists of two ID's, ConsigneeID and VoyageID. Not sure how to do this, I tried the below code (combining the two ID's into one), but that sometimes produces a double record ;-) for obvious reasons. Any Tips?

Dim strReportName As String
    Dim strWhere1, strWhere2, strWhere3 As Integer
    Dim ConsVoyID As String

    strReportName = "rprtDemurrageInvoice"
    
    strWhere1 = "[ConsVoyID]=" & Me![ConsVoyID]
    DoCmd.OpenReport strReportName, acViewPreview, , strWhere1

Pampers
There is only one way to change a diaper - fast

 

[PHV]

I'm a bit confused with your issue.
You wanted this ?
DoCmd.OpenReport "rprtDemurrageInvoice", acViewPreview, , "ConsigneeID=" & Me!ConsigneeID & " AND VoyageID=" & Me!VoyageID

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[Pampers]

Yes, that is the one... Perfect! Couldn't get it right. I also tried to do it with three strWhere's, but could't get that to work either. It seems the conconnotation for this:

strWhere1 = "ConsigneeID=" & Me!ConsigneeID & " AND VoyageID=" & Me!VoyageID

is this ===>

strWhere1 = "ConsigneeID =" & Me.ConsigneeID
strWhere2 = "VoyageID=" & Me.VoyageID
strWhere3 = strWhere1 & " And strWhere2"

The conconnotations always drive me nuts, I think I can't even spell the word right.
Anyway, tnx a lot.




Pampers
There is only one way to change a diaper - fast

 

[Pampers]

what I put above is wrong.

must be:

is this ====>

strWhere1 = "ConsigneeID=" & Me!ConsigneeID
strWhere2 = "and VoyageID=" & Me!VoyageID
strWhere3 = strWhere1 & strWhere2


Pampers
There is only one way to change a diaper - fast

 

[JoeAtWork]

Actually, I think you're going to have to add a space in front of that "and", i.e.

strWhere2 = " and VoyageID=" & Me!VoyageID

 

[Pampers]

tnx JoeAtWOrk, you right.

Pampers
There is only one way to change a diaper - fast