To get the Query text, try the following:
Dim rsCommandText As New ADODB.Recordset
Dim SQLStmt as String
rsCommandText.Open "exec sp_helptext dbo.MyQueryObject", CurrentProject.Connection
SQLStmt = rsCommandText.GetString(adClipString, , , vbCrLf)
Greetings....
I have a Microsoft Access 2002 Data Project (ADP) and I'm trying to programatically create a new ServerView. It seems as if the only way I can do it through code is by doing the following:
DoCmd.SelectObject acServerView, "Create View in designer", True
SendKeys "{ENTER}", True...