<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2600.0" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><STRONG>Shamil,</STRONG></DIV>
<DIV> </DIV>
<DIV> Could you kindly send me a copy of the version suitable
for Access 2002 (as & when ready).</DIV>
<DIV> </DIV>
<DIV>Regards,</DIV>
<DIV><STRONG>A.D.Tejpal</STRONG></DIV>
<DIV><STRONG>--------------</STRONG></DIV>
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B>
<A title=shamil@smsconsulting.spb.ru
href="mailto:shamil@smsconsulting.spb.ru">Shamil Salakhetdinov</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A title=accessd@databaseadvisors.com
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Friday, June 06, 2003 23:31</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [AccessD] Where does
WithEvents go?</DIV>
<DIV><BR></DIV>> Just as an aside, I now routinely go through<BR>> this
process so that each and every class is exposed.<BR>John,<BR><BR>Do you do
that manually of you've an add-in?<BR>I've a ClassExposer Add-In for MS Access
97:<BR><BR><A
href="http://smsconsulting.spb.ru/shamil_s/articles/cexposer.htm">http://smsconsulting.spb.ru/shamil_s/articles/cexposer.htm</A><BR><BR><BR>If
you and/or other developers from this group need something like that for<BR>MS
Access 2000/XP I think I can make a conversion.<BR><BR>On the other hand I'd
strictly recommend TO NOT use exposed CREATABLE<BR>classes/forms/reports - and
use wrapper/helper/class factory code to create<BR>custom classes' instances -
IMO using class factories makes your coding<BR>more organized and easier
to debug...<BR><BR>Shamil<BR><BR>----- Original Message -----<BR>From: "John
Colby" <<A
href="mailto:jcolby@colbyconsulting.com">jcolby@colbyconsulting.com</A>><BR>To:
<<A
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A>><BR>Sent:
Friday, June 06, 2003 6:13 PM<BR>Subject: RE: [AccessD] Where does WithEvents
go?<BR><BR><BR>> LOL. I think the man is happy!<BR>><BR>>
You're welcome!<BR>><BR>> Just as an aside, I now routinely go through
this process so that each and<BR>> every class is exposed.<BR>><BR>>
BTW, I learned about this from using an FTP class from Dev Ashish
and<BR>Terry<BR>> Kreft. It came in a lib, and worked just
fine. I tried to move it into<BR>my<BR>> framework lib and it no
longer worked. Of course I had simply imported<BR>it.<BR>> The
process of importing a class apparently resets those two
attributes<BR>back<BR>> to False (Thanks Microsoft for protecting us
children). It took several<BR>> days of research and asking (this
list I believe, Shamil provided the<BR>answer<BR>> IIRC) to get the
solution I passed on to you.<BR>><BR>> John W. Colby<BR>> <A
href="http://www.colbyconsulting.com">www.colbyconsulting.com</A><BR>><BR>>
-----Original Message-----<BR>> From: <A
href="mailto:accessd-bounces@databaseadvisors.com">accessd-bounces@databaseadvisors.com</A><BR>>
[mailto:accessd-bounces@databaseadvisors.com]On Behalf Of Bob Bedell<BR>>
Sent: Friday, June 06, 2003 10:02 AM<BR>> To: <A
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A><BR>>
Subject: RE: [AccessD] Where does WithEvents go?<BR>><BR>><BR>>
Outstanding! Phenonmenal! This is great! Think of the
endless<BR>possibilities!<BR>><BR>> Oh, it worked...<BR>><BR>>
That's great John. clsInventory is now "creatably" exposed to my
event<BR>sink<BR>> app, with custom events firing and all. Thanks for
adding several<BR>productive<BR>> years to my life.<BR>><BR>>
Bob<BR>><BR>><BR>> >From: "John Colby" <<A
href="mailto:jcolby@colbyconsulting.com">jcolby@colbyconsulting.com</A>><BR>>
>Reply-To: <A
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A><BR>>
>To: <<A
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A>><BR>>
>Subject: RE: [AccessD] Where does WithEvents go?<BR>> >Date: Fri, 6
Jun 2003 08:56:25 -0400<BR>> ><BR>> >Bob,<BR>> ><BR>>
>Classes built directly in a library database are not visible outside
of<BR>the<BR>> >library in VBA. No Se Por Que. I guess that
since Microsoft considers<BR>VBA<BR>> >developers to be children, giving
us such powers is considered<BR>dangerous -<BR>> >kinda like playing
with knives or matches I suppose. At any rate, it<BR>> >absolutely
is possible to get your classes exposed such that they can be<BR>> >seen
and used outside of the library.<BR>> ><BR>> >The easiest way to
do this is to:<BR>> ><BR>> >1) Export the class to a text
file.<BR>> >2) Open the class module with a text editor<BR>> >3)
Look for two attributes at the top of the module. Change
Creatable<BR>and<BR>> >Exposed to True.<BR>> >4) Save the class
and close the text file.<BR>> >5) In your library, click Insert / Class
module<BR>> >6) In the editor window that opens, click Insert /
File. Navigate to and<BR>> >select the txt file that you saved the
class in. This will cause Access<BR>to<BR>> >pull in the contents
of whatever file you selected and insert it in your<BR>> >class.
In this case it is the contents of the modified class.<BR>> >7) At the
top of the class you will see something like:<BR>> ><BR>> >Option
Compare Database<BR>> >Option Explicit<BR>> ><BR>> >VERSION
1.0 CLASS<BR>> >BEGIN<BR>> > MultiUse = -1
'True<BR>> >End<BR>> >Option Compare Database<BR>> >Option
Explicit<BR>> ><BR>> >Select and delete everything from the first
Option down through the End.<BR>> ><BR>> >8) Compile and save the
class<BR>> ><BR>> >The class will now be visible from any database
that references your<BR>> >library.<BR>> >John W. Colby<BR>>
>www.colbyconsulting.com<BR>> ><BR>><BR>><BR>><BR>>
_______________________________________________<BR>> AccessD mailing
list<BR>> <A
href="mailto:AccessD@databaseadvisors.com">AccessD@databaseadvisors.com</A><BR>>
<A
href="http://databaseadvisors.com/mailman/listinfo/accessd">http://databaseadvisors.com/mailman/listinfo/accessd</A><BR>>
Website: <A
href="http://www.databaseadvisors.com">http://www.databaseadvisors.com</A><BR><BR>_______________________________________________<BR>AccessD
mailing list<BR><A
href="mailto:AccessD@databaseadvisors.com">AccessD@databaseadvisors.com</A><BR><A
href="http://databaseadvisors.com/mailman/listinfo/accessd">http://databaseadvisors.com/mailman/listinfo/accessd</A><BR>Website:
<A
href="http://www.databaseadvisors.com">http://www.databaseadvisors.com</A><BR></BLOCKQUOTE></BODY></HTML>