Amigo Marcos, tenho outra sugest�o!
        Caso voc� use o Oracle e sua rede Windows NT.
        Existe uma tabela chamada user_terminal onde voc� consegue v�rias
coisas como exemplo:

USERNAME - usu�rio do oracle;
OSUSER - usu�rio do NT;
TERMINAL - Nome da Esta��o NT;
PROGRAM - Caminho da rede onde est� sendo executado seu exe
LOGON_TIME - data e hora da conex�o

        Com certeza voc� t�m pode realizar muitos controles atrav�s destas
contantes. Caso voc� n�o tenha dba Oracle voc� pode
continuar a me escrever!!!

        Observa��o: N�o sei se assuntos pertinentes ao oracle podem ser
distutido nesta lista, mas acho que este tipo de informa��o � v�lida para
todos!

        Atenciosamente!

           Alexandre Henrique Barbosa
     Analista de Sistemas/TCO -(61) 313 7870



-----Mensagem original-----
De: Marcos Campos [mailto:[EMAIL PROTECTED]]
Enviada em: Quarta-feira, 16 de Fevereiro de 2000 10:58
Para: [EMAIL PROTECTED]
Assunto: [sqlwin] RES: [sqlwin] RES: [sqlwin] LOGIN do USU�RIO da REDE


        Caro Alexandre e demais da lista

        A demora desta resposta (j� que recebi em 06/01/2000) foi devido a
f�rias.
        Testei a rotina antes de minhas f�rias e deu certo.
        Ao voltar das f�rias fui testar melhor a nova vers�o do sistema
antes de
implantar e est� ocorrendo um problema:
        Esporadicamente ela n�o funciona, n�o recupera o nome do usu�rio.
        J� testei de v�rias maneiras, com m�quina com muitos programas
carregados,
totalmente vazia, ele continua a apresentar o mesmo problema.
        Algu�m tem id�ia do que pode estar ocorrendo?

Marcos Carvalho de Campos
    [EMAIL PROTECTED]


-----Mensagem original-----
De:     [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Em
nome
de Alexandre Henrique Barbosa
Enviada em:     Quinta-feira, 6 de Janeiro de 2000 19:12
Para:   '[EMAIL PROTECTED]'
Assunto:        [sqlwin] RES: [sqlwin] LOGIN do USU�RIO da REDE



External Funcition
Library name: advapi32.dll
Function: GetUserNameA
Description:
Export Ordinal: 0
Returns
Boolean: BOOL
Parameters
Receive String: LPSTR
Receive Number: LPWORD

Inernal function
Function: fGetUser
Description:
Returns
String:
Parameters
Static Variables
Local variables
Number: nBuffer
String: sUser
Actions
Set nBuffer = 100
Call SalStrSetBufferLength( sUser, nBuffer )
Call GetUserNameA(sUser,nBuffer)
Return sUser

On SAM_AppStartup
Set sUsuario = fGetUser( )

Alexandre Henrique Barbosa
Analista de Sistemas/TCO -(61) 313 7870



> -----Mensagem original-----
> De:   Marcos Campos [mailto:[EMAIL PROTECTED]]
> Enviada em:   Quinta-feira, 6 de Janeiro de 2000 16:26
> Para: 'Lista Discuss�o Centura'
> Assunto:      [sqlwin] LOGIN do USU�RIO da REDE
>
>       Caros Colegas
>
>       Trabalho com Centura 1.5.0 .
>       Estou precisando pegar o nome do usu�rio (LOGIN) da rede, para
> utilizar dentro do programa.
>
>       Obrigado.
>
> Marcos Carvalho de Campos
>     <[EMAIL PROTECTED]>
===============Lista de Centura SQLWindows Administrador :
[EMAIL PROTECTED] [ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e com o comando a seguir no
corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
===============

==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
���������������Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
���������������

Responder a