how to create and open query on fly in adp

[Jerry Qu]

Hi All

how to create and open query on fly in adp?

in mdb we use:

dim qdf as querydef

on error resume next
docmd.deleteobject acquery, "queryname"

set qdf = currentdb.createquerydef("queryname",strSQL)

docmd.requery("queryname")

docmd.openquery "queryname"


it will create and display query on fly according to the strSQL which is
dynamic.


But, how should I do the samething in adp where there is using above code
nothing happen.

TIA

Jerry