Article ID: 210323 - Last Review: June 28, 2004 - Revision: 2.0

ACC2000: Sample Code for Running Temporary SQL Pass-Through Query

View products that this article applies to.

This article was previously published under Q210323

Advanced: Requires expert coding, interoperability, and multiuser skills.

This article applies only to a Microsoft Access database (.mdb).

Expand all | Collapse all

SUMMARY

This article lists sample code that you can use to call and run a temporary SQL pass-through query.

Back to the top

You can use the following sample Visual Basic code to call and run a temporary SQL pass-through query:

NOTE: The sample code in this article uses Microsoft Data Access Objects. For this code to run properly, you must reference the Microsoft DAO 3.6 Object Library. To do so, click References on the Tools menu in the Visual Basic Editor, and make sure that the Microsoft DAO 3.6 Object Library check box is selected.

Function ExecuteSPT (sqltext As String, connectstring As String)

' Purpose: Run a temporary pass-through query.
' Accepts: sqltext: SQL string to run.
'          connectstring: Connection string, which must be at least
'          "ODBC;".
' Returns: nothing.

Dim mydb As DAO.Database, myq As DAO.QueryDef
Set mydb = DBEngine.Workspaces(0).Databases(0)

' Create a temporary QueryDef object that is not saved.
Set myq = mydb.CreateQueryDef("")

' Set the ReturnsRecords property to False in order to use the
' Execute method.
myq.returnsrecords = False

myq.connect = connectstring
myq.sql = sqltext

myq.Execute
myq.Close

End Function

To run a stored procedure called sp_example on your SQL Server, type the following line in the Immediate window:

?ExecuteSPT("sp_example","ODBC;")

Note that this code accepts SQL statements that are specific to the server that you are using. Please refer to your server's documentation to determine valid SQL statements for your server.

Back to the top

REFERENCES

For more information about pass-through queries, click Microsoft Access Help on the Help menu, type send commands to an sql database using a pass-through query in the Office Assistant or the Answer Wizard, and then click Search to view the topics returned.

Back to the top