Retrieving email addresses from nt logins
Will this help?
Public Function ReturnNetworkName() As String
'RETURNS NETWORK LOGIN ID OF CURRENT USER
ReturnNetworkName = Environ("UserName")
End Function
AND:
Public Function ReturnComputerName() As String
'RETURNS COMPUTER NUMBER USER IS ON
ReturnComputerName = Environ("ComputerName")
End Function
Regards,
Ryan---
--
RyGuy
"Alok Joshi" wrote:
Hi Friends and Experts,
I have an Excel application in which I have already got a table of the nt
logins of the valid users which I use to validate the user. However, I would
like the application to figure out the users full name and internal e-mail
address. This is becuase the application is expected to automatically send
e-mails etc.
Is there a way I can do this?
|