[AccessD] Importing VB6 cls file as Class Module in Access VBA

You need to (from the menu):

Insert class
Insert file
Navigate to and import the file into the class.

Save the class

John W. Colby
www.ColbyConsulting.com


Borge Hansen wrote:
> Hi there,
> 
> I am swimming in the deep end of the pool and threading water so to speak
> .... I need help!
> 
> I have imported a VB6 .cls file into VBA
> 
> The following shows up in red and will not compile
> 
> 'Will not compile :
> VERSION 1.0 CLASS
> 
>  Attribute VB_Name = "HTTPClass"
> Attribute VB_GlobalNameSpace = False
> Attribute VB_Creatable = True
> Attribute VB_PredeclaredId = False
> Attribute VB_Exposed = True
> 'End of lines not compiling
> 
> Here is the beginning of the module - it's the HTTPClass.cls from available
> from some VB6 website, can't remember the link right now ...;
> all other code lines appear ok in VBA
> 
> What do I need to do??
> 
> 
> 
> '**** Beginning of VBA Class Module ::
> Option Compare Database
> Option Explicit
> VERSION 1.0 CLASS
> BEGIN
>   MultiUse = -1  'True
>   Persistable = 0  'NotPersistable
>   DataBindingBehavior = 0  'vbNone
>   DataSourceBehavior = 0   'vbNone
>   MTSTransactionMode = 0   'NotAnMTSObject
> End
> Attribute VB_Name = "HTTPClass"
> Attribute VB_GlobalNameSpace = False
> Attribute VB_Creatable = True
> Attribute VB_PredeclaredId = False
> Attribute VB_Exposed = True
> 
> Public Enum ePort
>    INTERNET_DEFAULT_HTTP_PORT = 80
>    INTERNET_DEFAULT_HTTPS_PORT = 443
> End Enum
> ...
> 
> 
> Regards
> borge