Running a stored parameter query from a form without pop up boxes.

A

Avid Fan

I know that you can create a query with sSQL = some SQL statment

me.recordsource = sSQL

I have looked at other threads that have talked about using
forms!myform!mycontrol as a parameter this is good but limits the query
to one form.

I remember that there was a way of calling a stored parameter with
something like.

me.recordsource = qryPlanned With mdate1, mdate2

Any easy way to handle this?
 
A

Avid Fan

Is this the kind of thing you are looking for:

Dim db as Database
Dim qdf As QueryDef
Set db = CurrentDb()
Set qdf = db.QueryDefs!yourquery
qdf.Parameters("date1parameter") = mdate1
qdf.Parameters("date2parameter") = mdate2

Me.Recordset = qdf.OpenRecordset()

This one sounds like what I am looking for. I come from a VPF
background recordsets are difficult for me.

I found something similar.

Set qdf = CurrentDB.OpenQueryDef(qryName)

In Access 2007 OpenQueryDef is not a method of CurrentDB.
Or, maybe all you want to do is set the form's Filter
property??

I am afraid I don't even know what that is.
Or, if all this is part of opening the form, then the code
that opens the form should be using the OpenForm method's
WhereCondition argument to filter the form's record source.

Err ?????

To much guessing here. You should explain WHAT you are
trying to accomplish instead of asking about how to take the
next step down the path of your attempted solution.
Thank you very much for your help!

Sorry I am not deliberately trying to be vague.

This is my first access application I want show planned customer
contact between two dates.

a two date boxes and a form list.

I am doing this to help a friend who has been handed a whole lot of new
reporting requirements and no tools to do the job. The work computer
is locked down so I can't write something in VFP for her. I found
Access 2003 on her machine so I decided to write an Access program.

Why do I even have Access? My wife wanted Publisher for work so I
bought her Office Professional 2007.
 
A

Avid Fan

Sure.
currentdb.querydefs("MySELECTQuery").SQL = some SQL statement

This is for creating a stored procedure in code right?
You can call a stored PROCEDURE with
ProcName Param1, Param2....
Does not work for a stored query
but Stored Procedures are only available through ADO.

DAO is gone now right since Access 97?
If all you are trying to do is filter a form or report, you can build the
filter for your form in code and then pass it when you do the DoCmd.OpenForm..
. one of the arguments is for the filter...
First Access program have avoided filters because in the past in other
environments they have been too slow.

I will look into this Thank you
 
A

Avid Fan

OK, so tell us what you are trying to accomplish in which
version and we'll try to get you going.

Access 2007 writing application for Access 2003

OK I have two Text boxes in date format

txtStartDate txtEndDate


I have simple multiple Item form. I want the user to be able to be
able to limit the out put of the query to only the records chosen buy
the user.

This code does not work. Pop up boxes will still appear.
This parameter query still difficult.

The runtime error 3251 Operation not supported by this object
Me.Recordset = qdf.OpenRecordset()

Form_Load

Dim db As Database
Dim qdf As QueryDef


Set db = CurrentDb()
Set qdf = db.QueryDefs!qryCalendar
qdf.Parameters("date1parameter") = #3/23/2010#
qdf.Parameters("date2parameter") = #3/23/2013#

Me.Recordset = qdf.OpenRecordset()


End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top