Programmatically creating a pass-through query

Prev: Windows Search
Next: where will the experts go when ms deletes this ng?

From: Ben on 17 May 2010 16:18

---

Hi,

Is there a way to programmatically create pass-through query in Access 2003?

Sub test ()

Dim db As Database
Dim strSQL As String
Dim qdfs As QueryDefs
Dim qdf As QueryDef

strSQL ="Some pass-through SQL statement here"

Set db = CurrentDb
Set qdfs = db.QueryDefs
Set qdf = db.CreateQueryDef("qry_PassThru", strSQL)
qdf.SQL = strSQL

End Sub

But the code about will not create a pass-through query, Access thinks
it is a regular Access query. Is there a way to specify in code the
type of query it is? Thanks for sharing your thoughts.


Ben

From: Armin Zingler on 17 May 2010 18:11

---

Am 17.05.2010 22:18, schrieb Ben:
> Hi,
>
> Is there a way to programmatically create pass-through query in Access 2003?
>
> Sub test ()
>
> Dim db As Database
> Dim strSQL As String
> Dim qdfs As QueryDefs
> Dim qdf As QueryDef
>
> strSQL ="Some pass-through SQL statement here"
>
> Set db = CurrentDb
> Set qdfs = db.QueryDefs
> Set qdf = db.CreateQueryDef("qry_PassThru", strSQL)
> qdf.SQL = strSQL
>
> End Sub
>
> But the code about will not create a pass-through query, Access thinks
> it is a regular Access query. Is there a way to specify in code the
> type of query it is? Thanks for sharing your thoughts.


Even though this is a VB.Net group (which will be dead soon),
the "dbQSQLPassThrough" value should make it:

http://msdn.microsoft.com/en-us/library/bb257317(office.12).aspx


--
Armin

From: Ben on 18 May 2010 10:42

---

Thanks Armin.

Ben

On 5/17/2010 6:11 PM, Armin Zingler wrote:
> Am 17.05.2010 22:18, schrieb Ben:
>> Hi,
>>
>> Is there a way to programmatically create pass-through query in Access 2003?
>>
>> Sub test ()
>>
>> Dim db As Database
>> Dim strSQL As String
>> Dim qdfs As QueryDefs
>> Dim qdf As QueryDef
>>
>> strSQL ="Some pass-through SQL statement here"
>>
>> Set db = CurrentDb
>> Set qdfs = db.QueryDefs
>> Set qdf = db.CreateQueryDef("qry_PassThru", strSQL)
>> qdf.SQL = strSQL
>>
>> End Sub
>>
>> But the code about will not create a pass-through query, Access thinks
>> it is a regular Access query. Is there a way to specify in code the
>> type of query it is? Thanks for sharing your thoughts.
>
>
> Even though this is a VB.Net group (which will be dead soon),
> the "dbQSQLPassThrough" value should make it:
>
> http://msdn.microsoft.com/en-us/library/bb257317(office.12).aspx
>
>

 | 
Pages: 1
Prev: Windows Search
Next: where will the experts go when ms deletes this ng?