<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2800.1106" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff size=2>My
fave way to do this is to use a static function that sets/gets the parm of
interest. (God I must sound like a very squeaky wheel on this subject
:-)</FONT></SPAN></DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff
size=2>Assuming a get/set func that sets and gets a parm of interest, your code
reduces to:</FONT></SPAN></DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff size=2>EXEC
"mySproc " & MyStaticValue()</FONT></SPAN></DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff size=2>Here
is the template for my static funcs:</FONT></SPAN></DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff size=2>Static
Function CurrentX(Optional lngNew As Long) As Long<BR>'Copy this template each
time you need a new set/get function<BR>'Then Replace "X" with the name of your
object, i.e.,"Employee"<BR>'Replace all in current proc and you're
done.</FONT></SPAN></DIV>
<DIV> </DIV>
<DIV><SPAN class=734314919-09092003><FONT face=Arial color=#0000ff
size=2> Dim lngCurrent As Long<BR> If lngNew
<> 0 Then lngCurrent = lngNew<BR> CurrentX =
lngCurrent<BR> #If conDebug = 1
Then<BR> Debug.Print "Current X: ",
CurrentX<BR> #End If<BR>End Function<BR></FONT></SPAN></DIV>
<BLOCKQUOTE>
<DIV class=OutlookMessageHeader 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>Brett
Barabash<BR><B>Sent:</B> Tuesday, September 09, 2003 8:52 AM<BR><B>To:</B>
'accessd@databaseadvisors.com'<BR><B>Subject:</B> [AccessD] Access 2000
Pass-Through Query Reports<BR><BR></FONT></DIV>
<DIV><SPAN class=662124615-09092003><FONT face=Arial size=2>What is the best
approach to using a parameterized SQL Server stored procedure as a
recordsource for an A2k report?</FONT></SPAN></DIV>
<DIV><SPAN class=662124615-09092003><FONT face=Arial size=2>I was thinking of
basing the report on a pass-through query (containing an EXEC statement), but
it appears that I would need to modify the pass-through SQL each time the
report is run, to set the parameter values.</FONT></SPAN></DIV>
<P><FONT face=Arial size=2>Brett Barabash, MCP <BR>Tappe Construction, Co.
<BR>Eagan, MN <BR>bbarabash@tappeconstruction.com <BR>(651) 256-6831
</FONT></P>
<P><FONT face=Arial size=2>"<FONT size=2>One thing a computer can do that most
humans can't is be sealed up in a cardboard box and sit in a warehouse."
-Jack Handey</P></FONT></FONT>
<DIV> </DIV><BR><BR>--------------------------------------------------------------------------------------------------------------------<BR>This
email and any files transmitted with it are confidential and<BR>intended
solely for the use of the individual or entity to whom<BR>they are
addressed.<BR>If you have received this email in error please notify
the<BR>originator of the message. This footer also confirms that this<BR>email
message has been scanned for the presence of computer viruses.<BR><BR>Any
views expressed in this message are those of the individual<BR>sender, except
where the sender specifies and with authority,<BR>states them to be the views
of Tappe Construction Co.<BR><BR>Scanning of this message and addition of this
footer is performed<BR>by SurfControl E-mail Filter software in conjunction
with <BR>virus detection software.<BR></BLOCKQUOTE></BODY></HTML>