Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Get the full user's name of the PC
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP
Network:
Windows 2003 Server
Database:
MS SQL Server
Divers
Thread ID:
01406221
Message ID:
01406896
Vues:
157
This message has been marked as the solution to the initial question of the thread.
Naomi,

I always have ideas, problem is that they never work :)

All my ideas revolve around LDAP, which I am afraid is not working for you, there is an obvious one I forgot that you can try, but it also depends on FullName being configured in LDAP
loUser			= getobject("WinNT://" + Getenv("USERDOMAIN") + "/" + Getenv("USERNAME") + ",User")
? loUser.FullName
I was just reading that there is an API function that might work, but I do not know how to use it http://msdn.microsoft.com/en-us/library/aa374627(VS.85).aspx


>Hi Hugo,
>
>Any other ideas? And also how can we get form's name / class name when we're creating new method (and method name)?
>
>>:(
>>
>>What happens with this code? It is slow, in particular the first time, but just to see what happens
>>
>>
>>clear
>>
>>lnStart			= Seconds()
>>loLDAP			= Getobject('Winmgmts://./root/directory/ldap')
>>loUsers			= loLDAP.ExecQuery([Select * from ds_user where DS_sAMAccountName = '] + Getenv('USERNAME') + ['])
>>loSelectedUser	= null
>>
>>for each loUser in loUsers
>>	loSelectedUser	= loUser
>>	exit
>>endfor
>>	
>>? loSelectedUser.DS_Name, Seconds() - lnStart
>>
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?

"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare

"To die for a religion is easier than to live it absolutely"
Jorge L. Borges
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform