How do I open a from with two criteria?

H

hanski

Hi

I have in my form, called Accidents, fields called AccNumber and
AccYear.

I have also a form called Accidents_work in which I have also fields
called AccNumber and AccYear.


I would like to open form Accidents_work from form Accidents and I made
this:


Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Accidents_work"
stLinkCriteria = "[AccNumber]=" & Me.AccNumber
DoCmd.OpenForm stDocName, , , stLinkCriteria

But I have the same AccNumber in every year so I would like to make
stlinkcriteria with AccNumber and AccYear. How can I do it??
 
B

Baz

Well you haven't said what data type AccYear is. If it's numeric:

stLinkCriteria = "AccYear=" & Me.AccYear & " AND [AccNumber]=" &
Me.AccNumber

If it's text:

stLinkCriteria = "AccYear=""" & Me.AccYear & """ AND [AccNumber]=" &
Me.AccNumber
 
H

hanski

Thanks a lot! It helped.


hanski

Baz kirjoitti:
Well you haven't said what data type AccYear is. If it's numeric:

stLinkCriteria = "AccYear=" & Me.AccYear & " AND [AccNumber]=" &
Me.AccNumber

If it's text:

stLinkCriteria = "AccYear=""" & Me.AccYear & """ AND [AccNumber]=" &
Me.AccNumber


hanski said:
Hi

I have in my form, called Accidents, fields called AccNumber and
AccYear.

I have also a form called Accidents_work in which I have also fields
called AccNumber and AccYear.


I would like to open form Accidents_work from form Accidents and I made
this:


Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Accidents_work"
stLinkCriteria = "[AccNumber]=" & Me.AccNumber
DoCmd.OpenForm stDocName, , , stLinkCriteria

But I have the same AccNumber in every year so I would like to make
stlinkcriteria with AccNumber and AccYear. How can I do it??
Click to expand...
Click to expand...
 
Top