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



The information in this article applies to:

  • Microsoft Site Server 3.0

This article was previously published under Q225118

SYMPTOMS

The tree control used to set the Web site mappings in the Personalization and Membership (P&M) Web Admin does not enumerate the folder.

CAUSE

Authscript.asp is not accessible due to a permission or Web site configuration problem.

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:

Request.ServerVariables("SERVER_PORT")

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") & "/"))


Modification Type:MajorLast Reviewed:4/10/1999
Keywords:kbprb KB225118