*--George: dbfForums 2007 *---+ Get Windows NT Username private lcUserIDBuffer, lnBufferSize, RetVal RetVal = 0 lcUserIDBuffer = Space(25) && Return buffer for user ID string lnBufferSize = 25 && Size of user ID return buffer Declare Integer GetUserName In Win32API As GetName; String @lcUserIDBuffer,; Integer @lnBufferSize RetVal = GetName(@lcUserIDBuffer, @lnBufferSize) lcNTUsername = Left(lcUserIDBuffer, lnBufferSize-1) If empty(lcNTUsername) lcNTUsername = "Unknown" ENDIF ?lcNTUsername *---+ Username retrieved.