Clique abaixo para nos ajudar
Conectar-se

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
25 usuários online :: 3 usuários cadastrados, Nenhum Invisível e 22 Visitantes :: 2 Motores de busca

Clebervfp, Napster182, Rubens

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Erro de compatibilidade de cores

28/3/2017, 10:59 por Clebervfp

Boa dia, estou com um problema com vfp9, se alguém poder me ajudar fico agradecido!

Tenho um …

Comentários: 0

Espessura do cursor intermitente

7/3/2017, 09:08 por Jefferson Matakas

Bom dia a todos !!

Existe uma opcao no windows que pode ser acessada atraves da 'central da …

Comentários: 0

DESENVOLVIMENTO EM REDES

4/3/2017, 18:45 por AJC

Pessoal tem ou conhece livros ou material para programação em
redes usando banco de dados nativo …

Comentários: 0

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 4

Como preencher campos vazios

9/2/2017, 11:55 por Linghston

Pessoal boa tarde,

É o seguinte, eu preciso preencher os campos de uma coluna da tabela DBF que …

Comentários: 2

Estatísticas
Temos 7040 usuários registrados
O último usuário registrado atende pelo nome de Napster182

Os nossos membros postaram um total de 32 mensagens em 18 assuntos

Controle de Quem Entra e Sai

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Em curso Controle de Quem Entra e Sai

Mensagem por mfelis em 16/7/2010, 08:21

Olá. um amigo meu tem o sistema de administração de livros e livrarias acho que é o maior desta area do Brasil,mas ele tem um problema, as altualizações são feitas pelos funcionários mas os funcionários do cliente tem de fechar as sessão ai que está geralmente para ele saber se o tem usuário rodando a aplicação dele ele tem que entrar no servidor e procurar com usuário administrativo para saber os processos e verificar os usuários, mas ai que está o problema muitas vezes quem sabe a Senha do Administrador é o Técnico da Empresa, e ai o tecnico não aparece, e vira uma complicação.vamos ao Ponto. ele está procurando uma função para VFP9 que faça uma lista dos processos de todos os usuários sem que o usuário que está utilizando precise ser administrador.?

Entendeu?

Fico a Espera!!
avatar
mfelis
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por hugo em 16/7/2010, 10:39

quando o usuario entrar

controluser.dbf
controluser.usr ( nome do usuario )
controluser.sit ( .t. conectado, .f. desconectado )

quando logar muda pra .t.
quando sair muda pra .f.

no programa, num report voce v todos usuarios com controluser.sit=.t.
ou seja, quem esta conectado

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]
avatar
hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por mfelis em 16/7/2010, 11:38

[Você precisa estar registrado e conectado para ver este link.] escreveu:quando o usuario entrar

controluser.dbf
controluser.usr ( nome do usuario )
controluser.sit ( .t. conectado, .f. desconectado )

quando logar muda pra .t.
quando sair muda pra .f.

no programa, num report voce v todos usuarios com controluser.sit=.t.
ou seja, quem esta conectado

Legal!!
avatar
mfelis
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Em curso Controle de Quem Entra e Sai

Mensagem por mfelis em 16/7/2010, 12:13

Com a ídeia do Nosso Amigo HUGO criei esta classe para o controle de quem entra e sai do sistema:

quando o usuario entrar

controluser.dbf
controluser.usr ( nome do usuario )
controluser.sit ( .t. conectado, .f. desconectado )

quando logar muda pra .t.
quando sair muda pra .f.

no programa, num report voce v todos usuarios com controluser.sit=.t.
ou seja, quem esta conectado.

Link para o Tópico:
Classe - Controle Entra e Sai do Sistema

CLasse:
Código:
Define Class Usuario As Custom


  Function MudaStatusUsuario
      Lparameters Usuario, Status


      Local lMemo, lLinhas, lLinhaAgora, lUsuario, lStatus, lNovaString,;
        lStringAntiga, lStringFinal, lArquivoControl, lStringArquivo, lContador



      lArquivoControl = Sys(5) + Curdir() + "\ControlUser.users"

      lMemo = Set("Memowidth")

      Set Memowidth To 500

      If File(lArquivoControl)
        lStringArquivo  = Filetostr(lArquivoControl)

        lLinhas = Memlines(lStringArquivo)

        For lContador = 1 To lLinhas
            lLinhaAgora = Mline(lStringArquivo,lContador)
            lUsuario = Getwordnum(lLinhaAgora,1,";")
            lStatus = Getwordnum(lLinhaAgora,2,";")

            If Alltrim(lUsuario) = Alltrim(Usuario)
              lNovaString = Alltrim(lUsuario) + ";" + Alltrim(Transform(Status))

              lStringAntiga = Strtran(lStringArquivo,lLinhaAgora,lNovaString)

              lStringFinal = lStringAntiga

              Delete File(lArquivoControl)

              Strtofile(lStringFinal,lArquivoControl)
              Exit
            Else
              If lContador = lLinhas && Se Não Achar insere um novo!
                  lStringArquivo  = Filetostr(lArquivoControl)
                  lStringFinal = lStringArquivo  + Chr(13) + Chr(10) +;
                    Alltrim(Usuario) + ";" + Alltrim(Transform(Status))
                  Strtofile(lStringFinal,lArquivoControl)
              Endif
            Endif
        Endfor
      Else
        lStringFinal = Alltrim(Usuario) + ";" + Alltrim(Transform(Status))
        Strtofile(lStringFinal,lArquivoControl)
      Endif

      Set Memowidth To lMemo
  Endfunc

  Function PegaStatus
      Lparameters Usuario


      Local lMemo, lLinhas, lLinhaAgora, lUsuario, lStatus, lNovaString,;
        lStringAntiga, lStringFinal, lArquivoControl, lStringArquivo, lContador

      lArquivoControl = Sys(5) + Curdir() + "\ControlUser.users"

      lMemo = Set("Memowidth")

      Set Memowidth To 500

      If File(lArquivoControl)
        lStringArquivo  = Filetostr(lArquivoControl)

        lLinhas = Memlines(lStringArquivo)

        For lContador = 1 To lLinhas
            lLinhaAgora = Mline(lStringArquivo,lContador)
            lUsuario = Getwordnum(lLinhaAgora,1,";")
            lStatus = Getwordnum(lLinhaAgora,2,";")

            If Alltrim(lUsuario) = Alltrim(Usuario)
              Return lStatus
            Else
              If lContador = lLinhas
                  Return .F.
              Endif
            Endif
        Endfor
      Endif

      Set Memowidth To lMemo
  Endfunc

Enddefine
avatar
mfelis
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por hugo em 16/7/2010, 12:50

marcos

como sabem sou novo no Visual FP

mais ainda me fica a impressao pra mim de que controlar do jeito
que era no foxpro dos bem mais simples

podem falar um pouco sobre isto

fico impressionado como algo tao pequeno deve ser trocado por algo
tao extenso

valeu


_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]
avatar
hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por Marcos Guedes em 16/7/2010, 13:05

[Você precisa estar registrado e conectado para ver este link.] escreveu:marcos

como sabem sou novo no Visual FP

mais ainda me fica a impressao pra mim de que controlar do jeito
que era no foxpro dos bem mais simples

podem falar um pouco sobre isto

fico impressionado como algo tao pequeno deve ser trocado por algo
tao extenso

valeu

Não entendi!
Estais se referindo à classe criada pelo Marcelo?
Caso seja, é a melhor maneira de utilização de códigos numa linguagem orientada a objeto pois evita o "reinventar a roda" e facilita no agrupamento de código.

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por hugo em 16/7/2010, 13:34

a forma que coloquei fica como um prg e que pode ser
acessado por qualquer form

qual a diferenca?

nao estou falando exatamente da comparacao da forma dos e visual
sei que o opp eh melhor

mais estava querendo que voce realmente analisa-se o que postei
e o que o o mfelis postou

tipo

eh realmente isto

este codigo realmente vai ficar deste tamanho????

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]
avatar
hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por mfelis em 16/7/2010, 13:52

Se for Utilizar um Arquivo e Não uma Tabela Provalvemente, ficara assim
avatar
mfelis
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por Marcos Guedes em 16/7/2010, 23:45

[Você precisa estar registrado e conectado para ver este link.] escreveu:a forma que coloquei fica como um prg e que pode ser
acessado por qualquer form

qual a diferenca?

nao estou falando exatamente da comparacao da forma dos e visual
sei que o opp eh melhor

mais estava querendo que voce realmente analisa-se o que postei
e o que o o mfelis postou

tipo

eh realmente isto

este codigo realmente vai ficar deste tamanho????
Não vi código seu, mas sim instruções.
Neutral

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Em curso Re: Controle de Quem Entra e Sai

Mensagem por Marcos Guedes em 18/10/2010, 10:11

Resolveu, mfelis?

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum