novice2001

[Guest_imported]

The following source code is in a module:

Public gDDApp As Datadicky.clsDDApp 'declaration
..
..
Public Function Main()
Set gDDApp = Nothing
Set gDDApp = New Datadict.clsDDApp
gDDApp.Application = Access.Application
End Function

Assuming I have a dll called 'datadict' containing a class called 'clsDDApp', why should the last statement(gDDApp.Application = Access.Application ) not function??
kingsley

 

[hennep]

Access.Application is an object variable, it should be "set"

like this:

set gDDApp.Application = Access.Application
or
set gDDApp.Application = new Access.Application

 

[RickSpr]

Besides that, the Application property is read-only. You can't assign anything to it, nor do you need to. What are you trying to do this for? Rick Sprague

 

[Guest_imported]

I have managed to find out that I had to use:
gDDApp.Application = CreateObject("Access.Application&quot
then it works!!
What I'm doing generally is capsuling vba code alone into a dll which can then be called up outside of access. However, I have my own menubars...next problem!!Normally I refer to these by:
Application.MenuBar = strMenuBar
in VBA! however not even this helps:
gDDapp.Application.MenuBar = strMenuBar

where strmenubar is the name of the menubar as a string!
CAn u help me?

 

[KingZ]

can anybody help please?? Urgent?? Any advise is most welcome!!Thanx