<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns:o =
"urn:schemas-microsoft-com:office:office"><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<TITLE>Message</TITLE>
<META content="MSHTML 6.00.2800.1170" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff
size=2>Ed,</FONT></SPAN></DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff size=2>Two
very quick comments -</FONT></SPAN></DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff size=2>1) Use
Me.Refresh instead of Me.Requery. Me.Requery is only needed if you have
changed the query itself. Me.Refresh is used when the underlying data has
changed and you just want to re-run the existing query or recordsource, as in
your case. Access help goes into detail on the differences between these
two commands.</FONT></SPAN></DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff
size=2>2) If you have a 1 - Many relationship established between the
ComplaintGeneralCode fields in the two lookup tables, remove it.
</FONT></SPAN></DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff
size=2>HTH,</FONT></SPAN></DIV>
<DIV><SPAN class=033534419-27052003><FONT face=Arial color=#0000ff size=2>Dan
Waters</FONT></SPAN></DIV>
<BLOCKQUOTE dir=ltr style="MARGIN-RIGHT: 0px">
<DIV></DIV>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left><FONT
face=Tahoma size=2>-----Original Message-----<BR><B>From:</B>
accessd-bounces@databaseadvisors.com
[mailto:accessd-bounces@databaseadvisors.com] <B>On Behalf Of </B>Tesiny,
Ed<BR><B>Sent:</B> Tuesday, May 27, 2003 1:28 PM<BR><B>To:</B>
accessd@databaseadvisors.com<BR><B>Subject:</B> [AccessD] Help with Combo
Box<BR><BR></FONT></DIV>
<DIV>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">I have two combo boxes and I’m
trying to limit the contents of the second combo box based on the selection
made in the first box.<SPAN style="mso-spacerun: yes"> </SPAN>I’m
obviously doing something wrong because the second combo box saving the value
of the first box in the table.</P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">For the Row Source of the
2<SUP>nd</SUP> <SPAN style="mso-spacerun: yes"> </SPAN>combo box I
have:</P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p> </o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">SELECT ComplaintGeneralCode,
ComplaintSpecificDesc<o:p></o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">FROM
tblComplaintSpecific<o:p></o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">WHERE ComplaintGeneralCode =
Forms!SF_Complaints_New!cboComplaintGeneral;</P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p> </o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">For the 1<SUP>st</SUP> combo
box I have:</P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p> </o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">Private Sub
cboComplaintGeneral_AfterUpdate()<o:p></o:p></P>
<P class=MsoNormal
style="MARGIN: 0in 0in 0pt">Me!cboComplaintSpecific.Requery<o:p></o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">End Sub</P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><FONT face=Arial
size=2></FONT> </P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p><SPAN
class=801191919-27052003><FONT face=Arial size=2>Table tblComplaintGeneral has
two fields: ComplaintGeneralCode (autonumber), ComplaintGeneralDesc
(text)</FONT></SPAN></o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p><SPAN
class=801191919-27052003></SPAN><SPAN class=801191919-27052003><FONT
face=Arial size=2>Table tblComplaintSpecific has 3 fields:
ComplaintSpecificCode (autonumber), ComplaintGeneralCode (long integer),
ComplaintSpecificDesc (text)</FONT></SPAN></o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p><SPAN
class=801191919-27052003></SPAN></o:p> </P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">In addition, when I try to
close the form I get a parameter window asking for a value for
Forms!SF_Complaints_New!cboComplaintGeneral</P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p> </o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">Any help is greatly
appreciated.</P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt"><o:p> </o:p></P>
<P class=MsoNormal style="MARGIN: 0in 0in 0pt">Ed</P></DIV>
<DIV> </DIV>
<DIV align=left><FONT size=1>Edward P. Tesiny</FONT></DIV>
<DIV align=left><FONT size=1>New York State OASAS</FONT></DIV>
<DIV align=left><FONT size=1>Evaluation and Program Monitoring</FONT></DIV>
<DIV align=left><FONT size=1>1450 Western Ave.</FONT></DIV>
<DIV align=left><FONT size=1>Albany, New York 12203-3526</FONT></DIV>
<DIV align=left><FONT size=1>Phone: (518) 485-7189</FONT></DIV>
<DIV align=left><FONT size=1>Fax: (518) 485-5769</FONT></DIV>
<DIV align=left><FONT size=1>EdTesiny@oasas.state.ny.us</FONT></DIV>
<DIV> </DIV></BLOCKQUOTE></BODY></HTML>