Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Get the full user's name of the PC
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP
Network:
Windows 2003 Server
Database:
MS SQL Server
Miscellaneous
Thread ID:
01406221
Message ID:
01406897
Views:
73
It worked, Hugo!!!!!!!!!!!!!!!!!!!

Thanks.

>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
>>>
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform