How to set a Property as a Default Property in COM Wrappers(CCW's)

[murtyin]

Hi to All,

I am creating COM Wrappers(CCW's) to the existing .Net Product, which is developed using C#. In this, am getting problem with setting "Item" propertty as the Default Property. My requirement is like this:

I created 4 classess in CCW namely: PdfDocument, PdfForm,PdfFormField and PdfFormFieldList. to the respective .Net classess. Below, am giving the classess in brief. I configured my project for COM Interop .

************************************************** ************************************************** *************************************
PdfDocument:

public class PdfDocument
public readonly property Form() as PdfForm
get
''''''' code for returning PdfForm type
end get
end propety
end class

PdfForm:

public class PdfForm
public readonly property Fields() as PdfFormFieldList
get
''''''' code for returning PdfFormFieldList Type
end get
end property
end class

PdfFormFieldList

public class PdfFormFieldList
default public readonly property Item(byval pdfformfiled as PdfFormField) as PdfFormField
get
''''' code for returning PdfFormField type
end get
end property
end class
************************************************** ************************************************** *************************************

Using the above 4 classes, I want the behavior like below in classic ASP.

Code in classic ASP:

dim doc
set doc = server.createobject("DynamicPDF.PdfDocument")
''''' Instead of calling: doc.Form.Fields.Item(("name of the Pdfformfield")
response.write(doc.Form.Fields("name of the Pdfformfield")

Same code in VB6

dim doc as new PdfDocument
''''' Instead of calling: doc.Form.Fields.Item(("name of the Pdfformfield")
msgbox(doc.Form.Fields(("name of the Pdfformfield")


In Vb6, "Item" porperty is working fine. But, it is not working in classic ASP as a Default Property.In ASP, it is working fine only when I code like: doc.Form.Fields.Item(("name of the Pdfformfield")

In the above, if "Item" property wihtout any parameters, it is working fine in Classic ASP, but , if it is with parameters , it is not working in Classic ASP. In Vb6, it is working fine irrespective of parameters.

I need your help in this regard.

[murtyin]

Hi to All,

I am creating COM Wrappers(CCW's) to the existing .Net Product, which is developed using C#. In this, am getting problem with setting "Item" propertty as the Default Property. My requirement is like this:

I created 4 classess in CCW namely: PdfDocument, PdfForm,PdfFormField and PdfFormFieldList. to the respective .Net classess. Below, am giving the classess in brief. I configured my project for COM Interop .

************************************************** ************************************************** *************************************
PdfDocument:

public class PdfDocument
public readonly property Form() as PdfForm
get
''''''' code for returning PdfForm type
end get
end propety
end class

PdfForm:

public class PdfForm
public readonly property Fields() as PdfFormFieldList
get
''''''' code for returning PdfFormFieldList Type
end get
end property
end class

PdfFormFieldList

public class PdfFormFieldList
default public readonly property Item(byval pdfformfiled as PdfFormField) as PdfFormField
get
''''' code for returning PdfFormField type
end get
end property
end class

PdfFormField:

public class PdfFormField
public function CreateLabel(parameterlist) as Label
'''''''''''''' code
end function
end class

** Label is another Type
************************************************** ************************************************** *************************************

Using the above 4 classes, I want the behavior like below in classic ASP.

Code in classic ASP:

dim doc
set doc = server.createobject("DynamicPDF.PdfDocument")
''''' Instead of calling: doc.Form.Fields.Item(("name of the Pdfformfield").CreateLabel(parameterlist)
response.write(doc.Form.Fields("name of the Pdfformfield").CreateLabel(parameterlist))


Same code in VB6

dim doc as new PdfDocument
''''' Instead of calling: doc.Form.Fields.Item(("name of the Pdfformfield")
msgbox(doc.Form.Fields(("name of the Pdfformfield")..CreateLabel(parameterlist))


In Vb6, "Item" porperty is working fine. But, it is not working in classic ASP as a Default Property.In ASP, it is working fine only when I code like: doc.Form.Fields.Item(("name of the Pdfformfield")

In the above, if "Item" property wihtout any parameters, it is working fine in Classic ASP, but , if it is with parameters , it is not working in Classic ASP. In Vb6, it is working fine irrespective of parameters.

I need your help in this regard.