MS Access count msgbox.

Posted on 2010-09-23
Medium Priority
Last Modified: 2013-11-28
Hi I will try to explain as simple as i can. I have 4 tables and I got four checkboxes(1,2,3,4), one load button , one delete button on the form.
 tables A --> B--> C-->D. ( linking order)
So table A is the parent table of all four tables. So when the checkbox 1 is checked. it should delete all the data in table A.  But if the linked tables has got data in it (table B,C,D) then . it should display the count of the records in the linked tables.
So the parent table delete the data based on the count in the linked tables. I have to count the tables twice before any checkbox is checked and after each delete is performed on a linked table to have the most current total.

I can do this through VBA. But It is getting bigger in size. I am not much familiar with the functions. So I was thinking can I create a function module which just takes the count of all tables . then I can call that function wherever I can and use its variables in the message box to display the actual number.
Question by:vihaan
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 4
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 33748497
If you delete the main record you may lose the corresponding Child records if you have cascade deletes turned on.
Either that or you would get a message that you cannot delete the Parent record if it has related child records...
So I am a bit confused by the request.
In the first scenario, if you delete the parent record, all child records would be deleted, hence no child records to count...
(or am I missing something here?)

So, can you give us a bit more detail on this rather unique request?




Author Comment

ID: 33748656
No I did not turned on the cascade deletes. So you will have the child records.

1st scenario:
the thing is that if parent table checkbox is checked and linked tables are not checked. So when you hit the delete button on the form . its gonna display the count of the linked tables failing the delete. So here I would do the count of linked tables before any checkboxes are checked.
2nd scenario:
if the parent table and the linked table is also checked. Then as i explained in the above scenarion, I would have the count on all the linked tables. Now when i hit the delete button , the linked table would delete its records because the linked table checkbox is checked and here i should do the count again to update my linked tables count. because the parent table performs the delete function based on th count of linked tables.Parent table would have a successfull delete if the linked table count is 0 and its fails if the count is  >0. I can do this through VBA but as i said it is getting bigger in size.
I was lookingto use function module which have take the count of all tables. and i can  call it wherever i can and use its values in message box. If you did not understood. I would explain in a most simplistic manner. Thanks for responding.

Author Comment

ID: 33748799
Do not think i was being rude on reading the line "I would explain in a most simplistic manner". I meant i would explain it again. Thank You.

P.S. As I was going through it , i thought that line was more blunt .
Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 33748816
Perhaps if you posted a sample of your database another Expert may be able to assist you further...

Sample database notes:
Back up your database(s).
Combine the front and back ends into one database file.
Remove any startup options, unless they are relevant to the issue.
Delete any objects that do not relate directly to the issue.
Remove, obfuscate, encrypt, or otherwise disguise, any sensitive data.
Compile the code. (From the database window, click: Debug-->Compile)
Run the compact/Repair utility.
Remove any Passwords and/or security.
Post explicit steps to replicate the issue.
Test the database before posting.

In other words, ...post a database that we can easily open and immediately see the issue.


Author Comment

ID: 33748848
one more question Can you use the variables declared in Function module . Use it values and display those values in a event procedure (like on current event) in a message box. If you can , how should i do it .
LVL 74

Accepted Solution

Jeffrey Coachman earned 2000 total points
ID: 33749975
You can put the Function in a module and make it Public:

Public Function GetMyVal()

Then call the Function from anywhere in your app to retrieve this value:
    "SELECT * FROM Yourtable WHERE Age=" & GetMyVal()

Or you can create a Public variable, and this value can be set or referenced, in code, from anywhere in your Project.
Public lngMyVal as long


Author Closing Comment

ID: 33833112
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 33833144

Featured Post

[Webinar] How Hackers Steal Your Credentials

Do You Know How Hackers Steal Your Credentials? Join us and Skyport Systems to learn how hackers steal your credentials and why Active Directory must be secure to stop them.

Question has a verified solution.

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

As tax season makes its return, so does the increase in cyber crime and tax refund phishing that comes with it
Microsoft Access is a place to store data within tables and represent this stored data using multiple database objects such as in form of macros, forms, reports, etc. After a MS Access database is created there is need to improve the performance and…
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…
Suggested Courses

764 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