海阳2006+功能中的潜水王

bOtherUser = False ''是否需要其它NT用户身份登录 

If bOtherUser = True And Trim(Request.ServerVariables("AUTH_USER")) = "" Then 
Response.Status = "401 Unauthorized" 
Response.Addheader "WWW-AuThenticate", "BASIC" 
If Request.ServerVariables("AUTH_USER") = "" Then Response.End() 
End If