oh, and another thing
in addition to my previous entry and completely un-
related, Is there anyway to return a string for whichever user is logged on? We use Xp and log in in the usual way and it would be useful to have something like dim currentuser as string if currentuser = "ARoberts" then usefform21.show blah blah blah end if |
oh, and another thing
Hi
try msgbox Environ("UserName") -----Original Message----- in addition to my previous entry and completely un- related, Is there anyway to return a string for whichever user is logged on? We use Xp and log in in the usual way and it would be useful to have something like dim currentuser as string if currentuser = "ARoberts" then usefform21.show blah blah blah end if . |
oh, and another thing
Hi Ted,
Here's a simple little function to get it Public Declare Function GetUserName Lib "advapi32.dll" _ Alias "GetUserNameA" _ (ByVal lpBuffer As String, _ nSize As Long) As Long Public Function UserName() As String Dim sName As String * 256 Dim cChars As Long cChars = 256 If GetUserName(sName, cChars) Then UserName = Left$(sName, cChars - 1) End If End Function -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "ted daniels" wrote in message ... in addition to my previous entry and completely un- related, Is there anyway to return a string for whichever user is logged on? We use Xp and log in in the usual way and it would be useful to have something like dim currentuser as string if currentuser = "ARoberts" then usefform21.show blah blah blah end if |
All times are GMT +1. The time now is 08:05 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com