Propriété Folder2.OfflineStatus

Article
06/13/2023

Contient le status hors connexion du dossier.

Cette propriété est en lecture seule.

Syntaxe

iOfflineStatus = Folder2.OfflineStatus

Valeur de la propriété

Entier défini sur l’une des valeurs suivantes.

(OFS_DIRTYCACHE)

Le serveur est en ligne avec des modifications non synchronisées.

(OFS_INACTIVE)

La mise en cache hors connexion n’est pas activée pour ce dossier.

(OFS_OFFLINE)

Le serveur est hors connexion.

(OFS_ONLINE)

Le serveur est en ligne.

(OFS_SERVERBACK)

Le serveur est hors connexion, mais est accessible.

Notes

Les fichiers hors connexion doivent être activés via les options de dossier pour que OfflineStatus fonctionne correctement. Si l’option Fichiers hors connexion n’est pas activée, la propriété retourne OFS_INACTIVE.

Exemples

L’exemple suivant montre l’utilisation appropriée de OfflineStatus pour JScript, VBScript et Visual Basic.

Jscript:

<script language="JScript">
    function fnOfflineStatusJ()
    {
        var objShell   = new ActiveXObject("shell.application");
        var objFolder2 = new Object;
        
        objFolder2 = objShell.NameSpace("\\\\server\\share\\folder");
        if (objFolder2 != null)
        {
            var nReturn;

            nReturn = objFolder2.OfflineStatus;
        }
    }
</script>

Vbscript:

<script language="VBScript">
    function fnOfflineStatusVB()
        dim objShell
        dim objFolder2
       
        set objShell = CreateObject("shell.application")
        set objFolder2 = objShell.NameSpace("\\server\share\folder")

        if (not objFolder2 is nothing) then
            dim nReturn

            nReturn = objFolder2.OfflineStatus
        end if

        set objFolder = nothing
        set objShell = nothing
    end function
</script>

Visual Basic :

Private Sub fnOfflineStatusVB()
    Dim objShell   As Shell
    Dim objFolder2 As Folder2
    
    Set objShell = New Shell
    Set objFolder2 = objShell.NameSpace("\\server\share\folder")

    If (Not objFolder2 Is Nothing) Then
        Dim nReturn As Integer
        
        nReturn = objFolder2.OfflineStatus()
    End If

    Set objFolder2 = Nothing
    Set objShell = Nothing
End Sub

Spécifications

Condition requise	Valeur
Client minimal pris en charge	Windows 2000 Professionnel, Windows XP [applications de bureau uniquement]
Serveur minimal pris en charge	Windows Server 2003 [applications de bureau uniquement]
En-tête	Shldisp.h
IDL	Shldisp.idl
DLL	Shell32.dll (version 5.0 ou ultérieure)

Voir aussi

Dossier2
Dossier

Partager via