Método Folder.MoveHere

Move um item ou itens para essa pasta.

Sintaxe

Folder.MoveHere(
  vItem,
  [ vOptions ]
)

Parâmetros

vItem [in]

Tipo: Variant

O item ou os itens a serem movidos. Essa pode ser uma cadeia de caracteres que representa um nome de arquivo, um objeto FolderItem ou um objeto FolderItems .

vOptions [in, opcional]

Tipo: Variant

Opções para a operação de movimentação. Esse valor pode ser zero ou uma combinação dos valores a seguir. Esses valores são baseados em sinalizadores definidos para uso com o membro fFlags da estrutura SHFILEOPSTRUCT do C++. Esses sinalizadores não são definidos como tal para Visual Basic, VBScript ou JScript, portanto, você deve defini-los por conta própria ou usar seus equivalentes numéricos.

(4)

Não exiba uma caixa de diálogo de progresso.

(8)

Dê ao arquivo que está sendo operado um novo nome em uma operação de movimentação, cópia ou renomeação se já existir um arquivo com o nome de destino.

(16)

Responda com "Sim a Todos" para qualquer caixa de diálogo exibida.

(64)

Preservar informações de desfazer, se possível.

(128)

Execute a operação em arquivos somente se um nome de arquivo curinga (*.*) for especificado.

(256)

Exibir uma caixa de diálogo de progresso, mas não mostrar os nomes de arquivo.

(512)

Não confirme a criação de um novo diretório se a operação exigir que um seja criado.

(1024)

Não exiba uma interface do usuário se ocorrer um erro.

(2048)

Versão 4.71. Não copie os atributos de segurança do arquivo.

(4096)

Operar somente no diretório local. Não opere recursivamente em subdiretórios.

(9182)

Versão 5.0. Não mova arquivos conectados como um grupo. Mova apenas os arquivos especificados.

Valor retornado

Esse método não retorna um valor.

Comentários

Exemplos

O exemplo a seguir usa MoveHere para mover o arquivo Temp.txt do diretório raiz da unidade C para a pasta C:\Windows. O uso adequado é mostrado para JScript, VBScript e Visual Basic.

Jscript:

<script language="JScript">
    var FOF_NOCONFIRMATION = 16;

    function fnFolderObjectMoveHereJ()
    {
        var objShell  = new ActiveXObject("shell.application");
        var objFolder = new Object;
        
        objFolder = objShell.NameSpace("C:\\WINDOWS");
        if (objFolder != null)
        {
            objFolder.MoveHere ("C:\\temp.txt", FOF_NOCONFIRMATION);
        }
    }
</script>

Vbscript:

<script language="VBScript">
    private const FOF_NOCONFIRMATION = 16
    
    function fnFolderObjectMoveHereVB()
        dim objShell
        dim objFolder

        set objShell = CreateObject("shell.application")
        set objFolder = objShell.NameSpace("C:\WINDOWS")

        if (not objFolder is nothing) then
            objFolder.MoveHere "C:\temp.txt", FOF_NOCONFIRMATION
        end if

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

Visual Basic:

Private Const FOF_NOCONFIRMATION = &H10

Private Sub btnMoveHere_Click()
    Dim objShell  As Shell
    Dim objFolder As Folder

    Set objShell = New Shell
    Set objFolder = objShell.NameSpace("C:\WINDOWS")

    If (Not objFolder Is Nothing) Then
        objFolder.MoveHere "c:\temp.txt", FOF_NOCONFIRMATION
    End If

    Set objFolder = Nothing
    Set objShell = Nothing
End Sub

Requisitos