Nome: Julio Cesar Gomes da Silva Assis
Intituto Superior de Ensino - IST
Curso: Tecnologo da Informação e da Comunicação 5º Período
 
Nesta página você acessará os links para os trabalhos efetuados
Referente a matéria de Redes 1:
Trabalho FTP em grupo  
Trabalho FTP -Monografia
Trabalho Rede TCP IP / Protocolo / HTTP
  Sinopse do filme Guerreiros da Internet  

Curriculum.

Carta de Apresentação completa.

Eh ficou dificil quando procurei isto na internet, então vou dar minha colaboração para os posteriores que procurarem: "LISTAR O CONTEÚDO DE UM DIRETÓRIO EM C++"

//->>Operacao com diretorio em C++ por Julio Assis

#include <errno.h>

#include <dirent.h>

#include <stdio.h>

#include<string.h>

#include<iostream>

#include <sys/types.h>

#include <sys/stat.h>

#include <unistd.h>

  DIR* Diretorio_a_ser_aberto; //Estrutura do diretorio

    struct dirent* Conteudo_na_Pasta; //Estrutura para o conteudo

    char Meu_Arquivo[30];             //vai receber o nome do arquivo

    Diretorio_a_ser_aberto = opendir(".//" );            //Abre o diretorio corrente se nao usar o ponto vai ser procurado la na raiz C:

    if( !Diretorio_a_ser_aberto )//Se nao conseguiu abrir o diretorio
    {
        perror( "opendir" );//mensagem de erro do open dir
    }

   Conteudo_na_Pasta = readdir( Diretorio_a_ser_aberto );//Conteudo na pasta recebe a leitura do diretorio

    while(Conteudo_na_Pasta ){//Enquanto houver conteudo na pasta

               strcpy(Meu_Arquivo,Diretorio_a_ser_aberto->d_name));//Passa o nome do arquivo p minha string

               Conteudo_na_Pasta = readdir( Diretorio_a_ser_aberto );//Incrementa a variavel para proxima leitura para proximo loop

       }

    closedir( Diretorio_a_ser_aberto );   //Fecha o diretorio que abriu

//So pra saber o primeiro conteudo da pasata e ". " ponto, o segundo ".." dois pontos e os demais arquivos.

Bem eu procurei na Net e não encontrei como ler todos os formulários ativos e inativos no banco de dados do ACCESS, utilizando o visual Basic, então vamos lá...

Um exemplo:

    Dim Myobj As AccessObject, Mdbs As Object

    'Primeiro você declara duas variáveis, uma como objetos do banco de dados

     'A outra você estará acessando à classe de formulários

    Set Mdbs = Application.CurrentProject

    'Você seta a variável como sua aplicação corrente

    'Esta Classe contém a propriedade AllForms nela se encontra todos os formulários de sua aplicação;

    For Each Myobj In Mdbs.AllForms

    'Então é só percorrer sua lista de formulários dinâmicamente, ok? Espero ter ajudado, Abço...

    MsgBox (Myobj.Name)

    Next Myobj