Wrox Programmer Forums
|
Access VBA Discuss using VBA for Access programming.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Access VBA section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
 
Old March 29th, 2006, 06:47 AM
Registered User
 
Join Date: Mar 2006
Posts: 8
Thanks: 0
Thanked 0 Times in 0 Posts
Default Call set_globals

Hi All,
I went to this web site
http://www.blueclaw-db.com/microsoft...s_security.htm
which has some VBA code about -- Access Database Security Alternative
(Security without Work Group Administrator). I found it quite useful so that I create what should be needed(form and table) for the this VBA to run.
However, as soon as it ran to the second line of the code,

Private Sub Form_Open(Cancel As Integer)
    'initialize global variables
    Call set_globals
    'Hide tabs
    ....

I had this 'Compile error - Sub or Function not defined' come up. As I don't know much about VBA, I don't know how to fixed it.
Please help me :( Please

Thank you very much

 
Old March 29th, 2006, 08:41 AM
Friend of Wrox
 
Join Date: Mar 2004
Posts: 3,069
Thanks: 0
Thanked 10 Times in 10 Posts
Default

That is calling a subroutine most likely. The subroutine was left out of the code that was posted. I did a search on the page and couldn't find it. So unless you can come up with that code, your solution won't work.

Later in the code another sub is called and the code is provided, so maybe the poster left out the code by accident. You will need to contact them directly.

HTH

mmcdonal
 
Old March 29th, 2006, 11:17 PM
Registered User
 
Join Date: Mar 2006
Posts: 8
Thanks: 0
Thanked 0 Times in 0 Posts
Default

I emailed him and has fixed the webpage. But now I got another complie error on
'set welcome to include users name or invalid logon if bad logon
Me.TabCtl0.Pages.Item(0).Caption = "Welcome " & Nz(DLookup("USername", "L_Employees", "employee_id=" & get_global"Employee_ID")), "Invalid Login")

Anyone please kindly help me again...






Similar Threads
Thread Thread Starter Forum Replies Last Post
How to Call Sub in ASP dpkbahuguna Classic ASP Basics 8 January 31st, 2007 03:46 PM
don't know how to call it stasnikov Access 2 January 17th, 2007 04:02 AM
Call a Function stealthdevil Access VBA 2 November 2nd, 2006 10:38 AM
how to call the form? hussar91404 C# 2 June 11th, 2006 08:10 AM
How to call a sub in a sub busybee ASP.NET 1.0 and 1.1 Basics 4 March 22nd, 2006 01:39 AM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.