Solved

Using a global variable to filter a query

Posted on 2001-07-24
11
214 Views
Last Modified: 2012-06-27
I set a global variable up and it?s value is set using data from a form. I then wish  to filter records in a query using this variable. I have tried putting [var name] on the criteria line but this does not work. Has anyone a suggestions?
0
Comment
Question by:hotathens
  • 3
  • 3
  • 2
  • +3
11 Comments
 
LVL 6

Expert Comment

by:cjswimmer
ID: 6313129
Have you tried referencing the form directly?

SELECT * FROM tblYourTable WHERE ID = [Forms]![YourFormName]![txtIDSelection]
0
 
LVL 2

Accepted Solution

by:
hotbudare earned 100 total points
ID: 6313165
You'll have to create UDF that returns the variable's value, something like (in a standard module):

public MyGlobalVar as YourDataType

public function MyGlobalVarValue() as YourDataType

    MyGlobalVarValue=MyGlobalVar
end function

and then use this function in your query.
Please keep in mind that this code has to be in a standard module ...

HTH/EQTA
T.S.U. Mario Osorio
Punto Fijo, Falcon, Venezuela

0
 
LVL 6

Expert Comment

by:cjswimmer
ID: 6313170
you could also make a public function in a module that returns the variable and use the function in the criteria:

Public Function GetCurrentID() As Long
    GetCurrentID = GlobalID
End Function

SELECT * FROM tblYourTable WHERE ID = GetCurrentID()
0
 
LVL 8

Expert Comment

by:dovholuk
ID: 6313184
cjswimmer's answer will suit you best. you don't need to use a function or a global variable if you reference the data from your form directly.

dovholuk
0
 
LVL 6

Expert Comment

by:Mach1pro
ID: 6313189
create a Public function and set its value to your global variable then reference the Function in your query.

Public Function MyVariable() As Long
     MyVariable = GlobalVariableName
End Function


In the criteria section of your query field just put in   MyVariable()
If your global variable is of numeric type and it hasn't been initialized, MyVariable() will equal zero.
If your global variable is not numeric and has not been initialized, you will probably get an error
0
Comprehensive Backup Solutions for Microsoft

Acronis protects the complete Microsoft technology stack: Windows Server, Windows PC, laptop and Surface data; Microsoft business applications; Microsoft Hyper-V; Azure VMs; Microsoft Windows Server 2016; Microsoft Exchange 2016 and SQL Server 2016.

 
LVL 2

Expert Comment

by:hotbudare
ID: 6314199
dovholuk,
You are right, but there's an advantage to my approach, and it is that in my proposed way hotathens will be able to use this query anytime, he'll just have to make sure he's got the appropiate values in the global variable(s)before he uses his query.

BTW, cjswimmer (in his second proposition) and Mach1pro are both using the same approach I originaly stated.

HTH/EQTA
T.S.U. Mario Osorio
Punto Fijo, Falcon, Venezuela

0
 
LVL 11

Expert Comment

by:joekendall
ID: 6314274
If you will be using the query for a control on a form or for a report, you could write code to do it. For example:

Dim sSQL As String

'UserName is the Global Variable
sSQL = "SELECT Report, User " & _
       "FROM Table2 " & _
       "WHERE (User Like 'all' Or " & _
       "User Like '*" & UserName & "*');"

'Set the controls RowSource to the Sequel        
cboReport.RowSource = sSQL

'Or you can use everything above but change the
'cboReport.RowSource line to this
Report.RecordSource = sSQL

This is just another way to do what has been stated above.

HTH,

Joe
0
 

Author Comment

by:hotathens
ID: 6316982
Joe

where would i put the code on the  form ?
0
 
LVL 11

Expert Comment

by:joekendall
ID: 6317417
You can put the code in the AfterUpdate event in the control that is used as the criteria. Then the control that needs this as a RowSource will automatically be updated with this criteria from your Global Variable.

HTH,

Joe
0
 
LVL 6

Expert Comment

by:cjswimmer
ID: 6365652
any update hotathens?
0
 
LVL 2

Expert Comment

by:hotbudare
ID: 6377373
Thanks a lot hotathens ... but why the "B" grade?
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article is a continuation or rather an extension from Cascading Combos (http://www.experts-exchange.com/A_5949.html) and builds on examples developed in detail there. It should be understandable alone, but I recommend reading the previous artic…
Introduction When developing Access applications, often we need to know whether an object exists.  This article presents a quick and reliable routine to determine if an object exists without that object being opened. If you wanted to inspect/ite…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Familiarize people with the process of utilizing SQL Server views from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Access…

867 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now