MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Chat para Rede de Computadores

    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Chat para Rede de Computadores Empty Chat para Rede de Computadores

    Mensagem  vileman 1/10/2012, 00:07

    Caro Balem, como estás ? Espero que com saúde e paz. Então, amigo, ao usar tua rotina para Chat em Rede de Computadores preciso da sua ajuda no seguinte, após seguir tuas instruções:
    * Uso Access 2003

    1) Instrução: Antes de iniciar, altere o caminho do Back-End no Módulo: basMDB.(\\Servidor\Pasta)
    Ação: Alterei da seguinte forma:

    Function CaminhoMdbRede() As String
    Dim dirFE As String
    'caminho do Back-End na rede altere apenas aqui
    'ORIGINAL: CaminhoMdbRede = "D:\ExemplosAccess\Msg\BalemMSG_BE.mdb"
    CaminhoMdbRede = "L:\SIACAP\05.Chat\BalemMsg_BE.mdb"
    dirFE = CurrentDb.Name
    DirCur = Left(dirFE, InStr(dirFE, Dir(dirFE)) - 1)
    End Function

    Onde “L” = Unidade da Rede, o restante é o caminho do arquivo mdb.
    Mudei a vinculação das Tabelas do arquivo “BalemMsgA2K.mdb” para o caminho acima alterado no Módulo, exceto as tabelas locais.

    2) Instrução: Rode o arquivo: RichTxt_Win2K+.bat para registrar a Richtxt32.ocx se estiver usando o Win2000 ou versão maior, ou o RichTxt_Win9x.bat se o Windows for Win9x.

    Ação: Rodei o arquivo “RichTxt_Win2k+.bat”, pois uso a versão Windows 7 – 64 bits – Professional, confirma que está correta a opção usada?

    3) Instrução: Rode o arquivo cmSystray.bat para registrar a cmsystray.ocx
    Ação: Rodei o arquivo acima.

    4) Instrução: Tabela vinculada tblNomePCS : Mantenha o nome -:Todos:- na Tabela do Gerente do Sistema ou da Loja assim mesmo, como está escrito, com o traço na frente para mantê-lo como primeiro da lista de contatos. Ele serve para enviar avisos simultâneos para todos os PC’s conectados.
    Ação: Mantive conforme orientação acima.

    5) Macro: Autoexec – Instruções abaixo
    Fiz o seguinte, considerando a contagem a partir da 1ª linha do seu arquivo original:

    • Retirei as 02 primeiras linhas, conforme texto;
    • Dúvida: Retirei a Condição “Falso” das 03 Colunas, ou é apenas para retirar das 02 linhas 8 e 9, após texto que diz: “Para usar as linhas seguintes, retire as condições Falso, das linhas”, e deixar a Condição “Falso” da linha 5 ?

    Após as Ações e Dúvidas a esclarecer acima, gostaria de confirmar ainda as seguintes questões:

    A) O arquivo: “BalemMsgA2K.mdb” que seria o Front-End eu coloco em todas as máquinas que irão usar o Chat ?

    B) Preciso copiar e rodar para todas as máquinas que vão usar o Chat, a rotina e os arquivos dos itens 1, 2, 3, 4 e 5 acima, além dos outros arquivos que vieram junto a estes mencionados, ou seja, os ícones, bmp e outros tipos? Ou apenas alguns deles ? Quais seriam ?

    C) A Consulta de Exclusão: “Consulta1” pode Renomear ou Excluir ?

    D) A Tabela "Leiame" do arquivo “BalemMsgA2K.mdb” pode excluir?

    E) Para usar esse Chat com vários usuários em Rede, posso usá-lo separadamente de um sistema que já é utilizado por todos, e mesmo assim, o chat, vai funcionar?, ou seja, em paralelo com esse outro sistema? ou posso incorporar ao mesmo, e se fosse o caso, como seria?

    6) TESTES:
    Após executar os itens do 1 ao 5 acima, fiz alguns testes e resultou no seguinte:

    Observação: Para adiantar o entendimento da rotina do Chat fiz os testes em casa mesmo, então não usei Rede de Computadores, pois só poderei fazer isto quando estiver no trabalho.

    a)Ao executar o arquivo "BalemMsgA2.mdb" e abrir o Formulário: "frmPrincipal" aparecem os “Contatos” que estão como: "-:Todos:-" e abaixo "Comp01", mas não aparece o nome do meu Computador, que por sua vez está na tabela “tblNomePCS”, porque ?

    b)Após clicar 2 vezes na 1ª opção de Contatos, abre uma tela para digitar a mensagem, e após digitar a mesma e teclar Enter (conforme orientação do formulário), fica travado. Após destravar com Ctrl+Alt+Del, fiz novo teste e após digitar uma mensagem e teclar Enter, o cursor sai do campo da caixa de mensagem e fica piscando abaixo do campo da mensagem e não acontece mais nada. Para testar fiquei teclando Enter e cada vez aparece o mesmo formulário para envio de mensagem, mas ao teclar Enter novamente o cursor sai do campo da caixa de mensagem, ou seja, fica nesse ciclo, então fechei esse formulário e cliquei no Botão “cmdOcultar” ao lado do rótulo “Contatos” e o formulário realmente fica oculto, mas o BD fica travada, pois não consigo abrir novamente o arquivo “BalemMsgA2.mdb”, para novos testes, a não ser usando os comandos Ctrl+Alt+Del do Windows.



    avatar
    Convidado
    Convidado


    [Resolvido]Chat para Rede de Computadores Empty Re: [Resolvido]Chat para Rede de Computadores

    Mensagem  Convidado 16/10/2012, 14:10

    Boas Wileman.... Infelizmente o Usuário Balem não mais participa do Fórum.


    Cumprimentos.
    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Chat para Rede de Computadores Empty Chat para Rede de Computadores

    Mensagem  vileman 17/10/2012, 00:00

    Valeu, Piloto, então dou como encerrado este tópico.
    avatar
    Convidado
    Convidado


    [Resolvido]Chat para Rede de Computadores Empty Re: [Resolvido]Chat para Rede de Computadores

    Mensagem  Convidado 17/10/2012, 11:33

    O Fórum agradece o retorno.

    Conteúdo patrocinado


    [Resolvido]Chat para Rede de Computadores Empty Re: [Resolvido]Chat para Rede de Computadores

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 15:15