NUNCA MAIS PASSE RAIVA POR NÃO CONSEGUIR RESOLVER UM PROBLEMA COM O EXCEL - GARANTIDO!

UNIVERSIDADE DO VBA - Domine o VBA no Excel Criando Sistemas Completos - Passo a Passo - CLIQUE AQUI

Você está em: PrincipalArtigos › ASP 3.0 › Capítulo 11 : 04
Quer receber novidades e e-books gratuitos?
« Lição anterior Δ Página principal ¤ Capítulos Próxima lição »
SITES DINÂMICOS COM ASP 3.0 - CURSO COMPLETO
Autor: Júlio Battisti


Promoção: Livro Windows Server 2012 R2 e Active Directory - Curso Completo, 2100 Páginas. Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

Promoção: Livro Windows Server 2012 R2 e Active Directory

Curso Completo, 2100 páginas.

Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

MAIS DETALHES | COMPRAR ESTE LIVRO


Lição 086 - Capítulo 11 - O objeto Folder

Para criar um objeto do tipo Folder, utilizamos o método GetFolder ou o método GetSpecialFolder do objeto FileSystemObject, conforme descrito anteriormente. Um objeto do tipo Folder também é retornado pela propriedade RootFolder do objeto Drive.

No exemplo a seguir, criamos um objeto do tipo Folder, chamado folderobj:

<%

                Set fileobj=Server.CreateObject(“Scripting.FileSystemObject”)

                Set folderobj = fileobj.GetFolder(“D:\meus documentos”)

%>

Agora podemos ter acesso a todas as propriedades e métodos do objeto folderobj. Então vamos ao estudo destas propriedades e métodos.

Propriedades do objeto Folder.

Na Tabela 11.3 temos uma descrição das propriedades do objeto Folder.

Propriedade Descrição
Attributes Pode ser utilizada para definir ou retornar os atributos para a pasta. Os valores possíveis são os seguintes: 0 - Arquivo normal, sem nenhum atributo definido. 1 - Somente leitura, 2- Arquivo oculto, 4 - Arquivo de sistema, 8 - Label do drive, 16 - Pasta ou subpasta, 32 - Indica se o arquivo foi alterado desde o último Backup, 64 - Link ou atalho e 128 - Arquivo compactado.
DataCreated Retorna a data e a hora de criação da pasta.
DateLastAccessed Retorna a data e a hora da última vez que a pasta foi acessada.
DateLastModified Retorna a data e a hora da última vez que a pasta foi modificada. 
Drive Retorna a letra do drive onde está a pasta.
Files Retorna uma coleção, a qual contém todos os arquivos existentes no objeto Folder.
IsRootFolder Retorna True se a pasta for a raiz do drive e False caso contrário.
Name Pode ser utilizada para definir ou retornar o nome da pasta.
ParentFolder Retorna um objeto Folder que é o objeto de nível superior para a pasta, isto é, é a pasta dentro da qual a pasta atual encontra-se. Por exemplo, para a pasta C:\documentos\cartas, a pasta de nível superior é C:\documentos. Em inglês o termo é conhecido como "ParentFolder".
Path Retorna o caminho completo para a pasta, inclusive utilizando nomes longos.
ShortName Retorna o nome no formato antigo 8.3 da época do DOS.
ShortPath Retorna o caminho completo no formato antigo da época do DOS, sem a utilização de nomes longos.
Size Retorna o tamanho total da pasta, incluindo todos os seus arquivos e subpastas.
SubFolders Retorna uma coleção, a qual contem todas as subpastas, inclusive as subpastas ocultas e de sistema.
Type Retorna uma String que é a descrição do tipo da pasta.

Tabela 11.3 Propriedades do objeto Folder.

No exemplo da Listagem 11.2, podemos ver um exemplo de utilização das propriedades do objeto Folder.

Listagem 11.2 – Utilizando as propriedades do objeto Folder.

1             <%@ Language=VBScript %>

2             <HTML>

3             <HEAD>

4             <TITLE>Utilizando o objeto Folder. </TITLE>

5             </HEAD>

6             <BODY>

7             <%

8             ' O primeiro passo é a criação do objeto FileSystemObject.

9             Set fileobj=Server.CreateObject("Scripting.FileSystemObject")

10           %>

11           <HR>

12           <%

13           Set objfolder=fileobj.GetFolder("C:\meus documentos")

14           Response.Write "Atributos de C:\Meus documentos:<B> " & objfolder.Attributes &       "</B><BR>"

15           Response.Write "Date e hora de criação de C:\Meus documentos:<B> " &        objfolder.DateCreated & "</B><BR>"

16           Response.Write "Date e hora do último acesso à C:\Meus documentos:<B> " &              objfolder.DateLastAccessed & "</B><BR>"

17           Response.Write "Date e hora da última modificação em C:\Meus documentos:<B> " &                objfolder.DateLastModified & "</B><BR>"

18           Response.Write "A pasta C:\Meus documentos está no drive:<B> " & objfolder.Drive &               "</B><BR>"

19           Response.Write "A pasta C:\Meus documentos é raiz ? <B> " & objfolder.IsRootFolder &            "</B><BR>"

20           Response.Write "Nome da pasta C:\Meus documentos:<B> " & objfolder.Name & "</B><BR>"

21           Response.Write "Parent Folder de C:\Meus documentos:<B> " & objfolder.ParentFolder &          "</B><BR>"

22           Response.Write "Path de C:\Meus documentos:<B> " & objfolder.Path & "</B><BR>"

23           Response.Write "Nome curto de C:\Meus documentos:<B> " & objfolder.ShortName &               "</B><BR>"

24           Response.Write "Nome curte do caminho de C:\Meus documentos:<B> " &     objfolder.ShortPath & "</B><BR>"

25           Response.Write "Tamanho total de C:\Meus documentos:<B> " & objfolder.Size & "    bytes</B><BR>"

26           Response.Write "Tipo de C:\Meus documentos:<B> " & objfolder.Type & "</B><BR>"

 

27           Response.Write "<HR>"

28           Response.Write "SUPBASTAS DA PASTA C:\MEUS DOCUMENTOS <HR>"

 

29           For each pasta in objfolder.subfolders

30                 Response.Write "Pasta de C:\meus documetnos: <B><I>" & pasta & "</B></I><BR>"

31           Next

32           Response.Write "<HR>"

33           Response.Write "ARQUIVOS DA PASTA C:\MEUS DOCUMENTOS <HR>"

34             For each arquivo in objfolder.Files

35                 Response.Write "Arquivo de C:\meus documetnos: <B><I>" & arquivo &                                         "</B></I><BR>"

36             Next

37           %>

38           </BODY>

39           </HTML>

A Figura 11.9 mostra a parte inicial do resultado desta página ao ser carregada no Internet Explorer.

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 11.9 Utilizando as propriedades do objeto Drive.

Na Figura 11.10 vemos uma parte do resultado, onde são exibidos os elementos da coleção Files.

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 11.10 A coleção Files do objeto Folder.

Métodos do objeto Folder.

O objeto Folder possui 4 métodos.

  • Método Copy(destino,substituir): Este método copia o objeto Folder atual, para o local especificado no parâmetro destino.

Se o destino termina com o caracter “\”, o método Copy considera que o destino representa o nome de uma pasta já existente, para a qual deve ser copiada a pasta representada pelo objeto Folder. Caso contrário o método assume que o parâmetro destino especifica o nome  completo de uma nova pasta que deve ser criada.

O parâmetro substituir pode assumir os valores True ou False. O valor padrão é True. Se a pasta especificada no parâmetro destino já existe e o parâmetro substituir estiver definido em Falso, ocorrerá um erro.

Considere o exemplo:

<%

                Set fileobj=Server.CreateObject(“Scripting.FileSystemObject”)

                Set folderobj = fileobj.GetFolder(“D:\meus documentos”)

                folderobj.copy(“E:\meus documentos”,true)

%>

  • O método CreateTextFile(nomearquivo,substituir,unicode): Este método cria o arquivo de texto especificado pelo parâmetro nomearquivo e retorna um objeto do tipo TextStream, o qual pode ser utilizado para gravar informações no arquivo e ler informações do arquivo.

O parâmetro substituir pode assumir os valores True e False. Quando este parâmetro tiver o valor True, se o arquivo já existir o mesmo será eliminado e um novo arquivo será criado. O padrão para o parâmetro substituir é False. Este parâmetro é opcional.

O parâmetro unicode pode assumir os valores True e False. Se este parâmetro tiver o valor True, o texto será salvo com caracteres unicode, os quais utilizam dois bytes por caractere, ao invés de um byte por caracter como é o caso do padrão ASCII. O valor padrão para o parâmetro unicode é False. Este parâmetro é opcional.

Considere o exemplo a seguir:

<%

                   Set fileobj=Server.CreateObject("Scripting.FileSystemObject")

                   Set folder=fileobj.GetFolder(“C:\”)

                   Set arqtexto = folder.CreateTextFile("c:\teste.txt",true)

                   arqtexto.WriteLine("*************************")

                   arqtexto.writeline("LINHA 1 DO TEXTO")

                   arqtexto.writeline("LINHA 2 DO TEXTO")

                   arqtexto.writeline("LINHA 3 DO TEXTO") 

                   arqtexto.writeline("*************************")

%>

Este fragmento de código cria um objeto do tipo TextStream, o qual é associado a variável arqtexto. Depois utilizamos o método writeline para escrever linhas de texto no arquivo c:\teste.txt.

Na Figura 11.11 temos o conteúdo do arquivo teste.txt, após a execução do código do nosso exemplo.

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 11.11 Utilizando o método CreateTextFile do objeto Folder.

  • O método Delete(force): Este método elimina a pasta associada com o objeto Folder e todo o seu conteúdo, isto é, arquivos e subpastas. O parâmetro force pode assumir os valores True ou False. Se o parâmetro force for definido como True, a pasta será eliminada mesmo se a pasta ou qualquer um de seus arquivos ou subpastas, tiver o atributo de Somente leitura marcado. O valor padrão do atributo force é False.

Considere o exemplo:

folderobj.Delete(True)

  • O método Move "destino": Move a pasta e todo o seu conteúdo, para a pasta especificada no parâmetro destino.

Se o destino termina com o caracter “\”, o método Move considera que o destino representa o nome de uma pasta já existente, para a qual deve ser movida a pasta . Caso contrário o método assume que o parâmetro destino especifica o nome de uma nova pasta que deve ser criada e para a qual deve ser movido o conteúdo da pasta de origem.

Caso a pasta de destino já exista, ocorrerá um erro.

Considere o exemplo:

folderobj.Move “C:\copia de seguranca\documentos"

Com isso encerramos o estudo do objeto Folder. Agora vamos ao estudo do objeto File.


Promoção: Livro Windows Server 2012 R2 e Active Directory - Curso Completo, 2100 Páginas. Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

Promoção: Livro Windows Server 2012 R2 e Active Directory

Curso Completo, 2100 páginas.

Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

MAIS DETALHES | COMPRAR ESTE LIVRO


« Lição anterior Δ Página principal ¤ Capítulos Próxima lição »
Quer receber novidades e e-books gratuitos?

Cursos Online

  • Banco de Dados
  • Carreira
  • Criação/Web
  • Excel/Projetos
  • Formação
  • + Todas as categorias
  • Contato: Telefone: (51) 3717-3796 | E-mail: webmaster@juliobattisti.com.br | Whatsapp: (51) 99627-3434

    Júlio Battisti Livros e Cursos Ltda | CNPJ: 08.916.484/0001-25 | Rua Vereador Ivo Cláudio Weigel, 537 - Universitário, Santa Cruz do Sul/RS, CEP: 96816-208

    Todos os direitos reservados, Júlio Battisti 2001-2019 ®

    [LIVRO]: MACROS E PROGRAMAÇÃO VBA NO EXCEL 2010 - PASSO-A-PASSO

    APRENDA COM JULIO BATTISTI - 1124 PÁGINAS: CLIQUE AQUI