|
Gets an array of dossiers in the given cabinet. |
|
|
VARIANT GetDossiers ( BSTR bsCabinet ) |
|
|
Parameters | bsCabinet | [in] The full path to an existing and connected filing cabinet, e.g. C:\Venice\Data. | | Return value |
A VARIANT, subtype SafeArray of VARIANTs, subtype BSTRING containing a list of directory names of all dossiers in the given cabinet path. | | Remarks |
| A user must be logged on to Venice first. |
|
|
See Also |
|
|
|
Samples |
|
|
C++ |
|
// Get all dossiers of the given filing cabinet path
COleVariant vDossiers = pVenice->GetDossiers (bsCabinet);
if (vDossiers.vt & VT_ARRAY) // Check if the array is empty
{
COleSafeArray saDossiers (vDossiers); // Construct a Safe Array from the VARIANT
VARIANT vDossier;
long lUB, lInd;
saDossiers.GetUBound (1, &lUB); // Get the upper bound of the array
for (lInd = 0; lInd <= lUB; lInd++)
{
saDossiers.GetElement (&lInd, &vDossier);
// Process vDossier
}
}
|
|
|
C# |
|
// Get all dossiers of the given filing cabinet path
Array aDossiers = (Array)oVenice.GetDossiers (oCabinet.ToString ());
if (aDossiers != null)
{
foreach (Object oDossier in aDossiers)
{
// Process oDossier
}
}
|
|
|
VBS |
|
' Get all dossiers of the given filing cabinet path
Dim vDossiers, vDossier
vDossiers = oVenice.GetDossiers(vCabinet)
If Not IsEmpty(vDossiers) Then
For Each vDossier In vDossiers
' Process vDossier
Next
End If
|
|
|
VB.NET |
|
' Get all dossiers of the given filing cabinet path
Dim oDossiers, oDossier As Object
oDossiers = oVenice.GetDossiers(oCabinet)
If Not IsNothing(oDossiers) Then
For Each oDossier In oDossiers
' Process oDossier
Next
End If
|
|