Passing parameters to a vb6 query, from form?

[Sky_Blue]

Hi there,
REALLY stuck on something! Am very new to VB6 and am trying to run a data report, which runs off of an sql query in a data environment. This works fine when i manually enter the required parameters into the sql query, but i cant seem to get the syntax right for the query to read the values in text fields on the form. Any help would be much appreciated.

Im guessing its a similar solution, but i also need to know how to filter the contents of one db combo, based on the selection made in another one on the same form.

Hope this makes sense!

[jared22]

Got the same problem here. Can anyone help us???

[Handyman]

Sample of the troubling code?

[Sky_Blue]

Hi there,
Okay, i have found the answer to this, after much toil and trawling the web!!

In the dataenvironment, you need to add a parameter to the sql statement or to the sql builder. For example in my case this was:
select....................
from......................
where agent_name = ? and supervisor_name = ?...... etc.....

then before you open your datareport, in my case from a command button on the vb6 form, you add something like the following into your code:
The next 3 lines seem to vary slightly between vb versions?? but the idea is to close the sql command if it is open. This enables multiple runs of the same command with varying inputs.

if dataenvironment1.command1.adstateopen = true then
dataenvironment1.command1.close
end if

The next line passes the parameters the space between command1 and datacombo1 is intentional and necessary!!!

Dataenvironment1.command1 datacombo1.text, datacombo2.text
Then open the report
datareport1.show


My parameters came from Datacombo's but if in your case they are coming from text boxes then obviously you would pass text1.text etc.....