I don't know how to user VBstr

[YOUNGHEE]

This source don't work correctly.
I Don't know what problem is.

long numOfShape;
char *name;

app.Documents(docs);
docs.Item(VVariant(1L), doc);
doc.Pages(pages);
pages.Item(VVariant(1L), page);
page.Shapes(shapes);

shapes.Count(&numOfShape);

for(i=1; i<numOfShape; i++)
{
name = NULL;
shapes.Item(VVariant(i), shape);
shape.getName(VBstr(name));
AfxMessageBox(name);
SysFreeString(bstr);
}

 

[Scott Metzger]

This source don't work correctly.
I Don't know what problem is.

long numOfShape;
char *name;

app.Documents(docs);
docs.Item(VVariant(1L), doc);
doc.Pages(pages);
pages.Item(VVariant(1L), page);
page.Shapes(shapes);

shapes.Count(&numOfShape);

for(i=1; i<numOfShape; i++)
{
name = NULL;
shapes.Item(VVariant(i), shape);
shape.getName(VBstr(name));
AfxMessageBox(name);
SysFreeString(bstr);
}

AfxMessageBox expects a null terminated array of chars. VBstr is an
object. You need to convert the VBstr to a char* with something like...

TCHAR strChar[256];
ULONG size;
name.ConvertToLPTSTR(strChar, &size);