Function getUser()
getUser = StripDomain( Request.ServerVariables("AUTH_USER") )
End Function
Function StripDomain(strLogonUser)
strLogonUser = Replace(strLogonUser,"/","\")
StripDomain2 = Right(strLogonUser, (Len(strLogonUser) - InStrRev(strLogonUser, "\", -1, vbTextCompare)))
End Function