Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
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
If Request("LOGON_USER") = "" Then
Response.Clear
Response.Status = "401 Unauthorized"
End if
xxx = Stripdomain(Request.ServerVariables("LOGON_USER"))