Pass a variable to Enter Parameter Value box

[vangundy]

With my code below I am exporting a report to snp format onto my c: drive. ONLY problem is I keep getting the Enter Parameter Value box. How can I pass a variable (varName) to this parameter and then export the report to snp. Again the export works fine but I keep getting the Enter Parameter box. I want to bypass this box with a value contained within my variable.

Dim Axs As Access.Application
Set Axs = CreateObject("Access.Application")

varName = "smith"

Axs.Visible = False
Axs.RunCommand acCmdAppMaximize
Axs.OpenCurrentDatabase ("c:\Report.mdb")
Axs.DoCmd.OutputTo acOutputReport, "Report1", acFormatSNP, _
CurrentProject.Path & "\Test.snp"

 

[ZmrAbdulla]

What exactly the parameter box asks?
Are you getting the report filtered with the varName? Or the report brings all the records?
Is the report's recordsource is a query?
If it is a query then, does the query needs any criteria to be given before it run?
One more thing... You didn't declare varName
Please comeback

Zameer Abdulla
JVBP MDS
_{Jack of Visual Basic Programming, Master in Dining & Sleeping}
Visit Me

 

[vangundy]

Yes its the query that contains the parameter. The query within Access. The query is connected to the report so when you run the report you are prompted to enter a parameter which is normal..

 

[ZmrAbdulla]

You didn't reply all of my questions...
any way..
Convert the query into SQL and paste it into the module where you can use the parameter. Also connect the SQL to the report.

Zameer Abdulla
_{Jack of Visual Basic Programming, Master in Dining & Sleeping}
Visit Me