Fake Response Object
Q: I'm trying to create a *dummy* response object and I get errors implementing the Response objects. My code looks like this:
--------------------------------------------------------------------
Implements Response
Private Property Let Response_ExpiresAbsolute(ByVal RHS As Date)
End Property
Private Property Get Response_ExpiresAbsolute() As Variant
End Property
:
--------------------------------------------------------------------
I used the drop downs at the top of VB6's code window to create the functions so I'm not sure why I get this error:
--------------------------------------------------------------------
Compile Error:
Definitions of property procedures are inconsistent, or property procedure has an optional parameter, a ParamArray, or invalid Set final parameter
--------------------------------------------------------------------
Any ideas? Thx...
|
