Hmmm. Querydef isn't supported in ADO, which is now the default library for Access 2000. I'm no ADO expert, but I did find this code in a quick Google search. Perhaps you can use it? Sub ModifyQuery(strDBPath As String, _ strQryName As String, _ strSQL As String) Dim catDB As ADOX.Catalog Dim cmd As ADODB.Command Set catDB = New ADOX.Catalog ' Open the Catalog object. catDB.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & strDBPath Set cmd = New ADODB.Command ' Get the query from the Procedures collection. Set cmd = catDB.Procedures(strQryName).Command ' Update the query's SQL statement. cmd.CommandText = strSQL 'Save the updated query. Set catDB.Procedures(strQryName).Command = cmd Set catDB = Nothing End Sub >> >> Subject: [thelist] RE: 11th hour plea: ASP/Access snapshot hell >> >> My first post. Hope I don't bung this up. >> >> I've run into this situation before. Hopefully, your report is based on a >> query. If not, make it so. Then, using the QueryDef object, edit the SQL >> of the underlying query before opening the report. >> >> Good Luck, > >Thanks, I'll need it. > >I've never used a QueryDef object in VBScript before. Lucky for me, my Access 2000 help doesn't include any entries on QueryDef, much less examples. I can't make heads or tails of the VB examples in MSDN Visual Studio Library 6a. I can't find >any mention of "QueryDef" in my VBScript books. *groan* > >Yes, my report is built on a query. All I need to add is: >"WHERE Cover_EmployeeName="&Session("UserLogin") > >1) Is there a simple snippet of code I can add? >2) is the underscore in Cover_EmployeeName going to throw off my ASP page? Access generated the name. I'm not sure about >hunting back through the report to find all the underscore fields. >If you can point me to any commented code samples, I would greately appreciate it. Thanks for your help so far.