P&M Web Admin Tree Control Does Not Enumerate Folder (225118)

RESOLUTION

Use one of the following resolutions, depending on the cause of your problem.

Make sure that AuthScript.asp is set to Basic (Clear Text) and not Anonymous. To do this, perform the following steps:

1. Open the IIS Microsoft Management Console (MMC).
2. Go to Default Web Site.
3. Go to SiteServer\Admin\Knowledge\Persmbr.
4. Select Authscript.asp property.
5. Make sure "File Security" is set to Basic (Clear Text) and that Anonymous is turned off.

-OR-

If the TCP Port for the default Web site is not set to Port 80, the Site Server Web Admin pages do not handle the Server_port and are missing the following code: Use the following steps to insert the above command and retrieve the proper TCP Port:

1. Open AuthTree.asp and modify the following:

   AddTreeAppletParam "baseurl",GetProtocol() &
   Request.ServerVariables("Server_Name") & g_pthMembership &
   "/AuthScript.asp"

   to:

   AddTreeAppletParam "baseurl",GetProtocol() &
   Request.ServerVariables("Server_Name") & ":" &
   Request.ServerVariables("SERVER_PORT") & g_pthMembership &
   "/AuthScript.asp"

2. Change the following from:

   AddTreeAppletParam "iconurl",GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & g_pthMembership &
   "/images/AuthIcons.gif"

   to:

   AddTreeAppletParam "iconurl",GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & ":" &
   Request.ServerVariables("SERVER_PORT") & g_pthMembership &
   "/images/AuthIcons.gif"

3. Change the following from:

   TreeNodeSetPlusUrl(GetProtocol() & Request.ServerVariables("SERVER_NAME")
   & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) & "&Loc=" &
   Server.URLEncode(m_oServerRoot.AdsPath) & "&node=0")

   to:

   TreeNodeSetPlusUrl(GetProtocol() & Request.ServerVariables("SERVER_NAME")
   & ":" & Request.ServerVariables("SERVER_PORT") & g_pthMembership
   & "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) &
   "&Loc=" & Server.URLEncode(m_oServerRoot.AdsPath) &
   "&node=0")

4. Open AuthScript.asp and modify:

   Response.Write "tree.setUrl(idxNode, """ & GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) &
   "&Loc=" &Server.URLEncode(SubBranch.AdsPath) &"&LMPath="
   &Server.URLEncode(StrMakeLMPath(SubBranch.AdsPath)) &
   "&Instance=" &m_iInstance & """);" & vbCrLf

   to:

   Response.Write "tree.setUrl(idxNode, """ & GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & ":" &
   Request.ServerVariables("SERVER_PORT") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) &
   "&Loc=" & Server.URLEncode(SubBranch.AdsPath) & "&LMPath="
   & Server.URLEncode(StrMakeLMPath(SubBranch.AdsPath)) &
   "&Instance=" & m_iInstance & """);" & vbCrLf

5. Change the following from:

   Response.Write "tree.setPlusUrl(idxNode, """ & GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) &
   "&Loc=" & Server.URLEncode(SubBranch.AdsPath) & "&node="""
   & " + idxNode);" & vbCrLf

   to:

   Response.Write "tree.setPlusUrl(idxNode, """ & GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & ":" &
   Request.ServerVariables("SERVER_PORT") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) &
   "&Loc=" & Server.URLEncode(SubBranch.AdsPath) & "&node="""
   & " + idxNode);" & vbCrLf
   

6. Change the following from:

   Request.ServerVariables("SERVER_NAME") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) & "&Loc=" & Server.URLEncode(ParentAdsPath & Path & "/" &
   strPath) & "&LMPath=" &
   Server.URLEncode(StrMakeLMPath(ParentAdsPath & Path & "/" &
   strPath)) & "&Instance=" & m_iInstance & """);" & vbCrLf

   to:

   Request.ServerVariables("SERVER_NAME") & ":" &
   Request.ServerVariables("SERVER_PORT") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) & "&Loc=" &
   Server.URLEncode(ParentAdsPath & Path & "/" & strPath) &
   "&LMPath=" & Server.URLEncode(StrMakeLMPath(ParentAdsPath & Path
   & "/" & strPath)) & "&Instance=" & m_iInstance & """);" & vbCrLf

7. Change the following from:

   Response.Write "tree.setPlusUrl(idxNode, """ & GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) &
   "&Loc=" & Server.URLEncode(ParentAdsPath) & "&path=" &
   Server.URLEncode(Path & "/" & strPath) & "&node=""" & " +
   idxNode);" & vbCrLf

   to:

   Response.Write "tree.setPlusUrl(idxNode, """ & GetProtocol() &
   Request.ServerVariables("SERVER_NAME") & ":" &
   Request.ServerVariables("SERVER_PORT") & g_pthMembership &
   "/AuthScript.asp?ServerComment=" &
   Server.URLEncode(CStr(Request.QueryString("ServerComment"))) &
   "&Loc=" & Server.URLEncode(ParentAdsPath) & "&path=" &
   Server.URLEncode(Path & "/" & strPath) & "&node=""" & " +
   idxNode);" & vbCrLf

8. Change the following from:

   strAdsPath = Mid(strAdsPath,1+Len("IIS://" &
   Request.ServerVariables("SERVER_NAME") & "/"))

   to:

   strAdsPath = Mid(strAdsPath,1+Len("IIS://" &
   Request.ServerVariables("SERVER_NAME") & ":" &
   Request.ServerVariables("SERVER_PORT") & "/"))